Using VBA å erstatte formel sin områdenavn med cellereferanser, kan du få det gjort trinnvis slik: Erstatt områdenavn med relative cellereferanser Erstatt områdenavn med absolutte cellereferanser
1. Velg området som inneholder formlene du ønsker å erstatte deres navn med cellereferanser.
To. Klikk Developer > Visual Basic eller Alt + F11 for å åpne en ny Microsoft Visual Basic for Applications vinduet vil vise, klikker du Sett > Module, og deretter skriver du inn følgende koder i modulen:
VBA-kode: Bytt områdenavn med Absolute henvisning
Sub AbsoleteNamesWithRelativeRefs () 'Updateby20140603Dim RNG Som RangeDim WorkRng Som RangeDim xName Som NameOn Error Resume NextxTitleId = "KutoolsforExcel" Set WorkRng = Application.SelectionSet WorkRng = Application.InputBox ("Range", xTitleId, WorkRng.Address, Type: = 8) Set WorkRng = WorkRng.SpecialCells (xlCellTypeFormulas) for hver RNG I WorkRng For Hver xName I ThisWorkbook.Names Hvis InStr (Rng.Formula, xName.Name) > 0 Then Rng.Formula = VBA.Replace (Rng.Formula, xName.Name, VBA.Replace (VBA.Replace (xName.RefersTo, "=", ""), "$", "")) End If NextNextEnd Sub
VBA-kode: Bytt områdenavn med relativ referanse
Sub ReplaceNamesWithRelativeRefs () 'Updateby20140603Dim RNG Som RangeDim WorkRng Som RangeDim xName Som NameOn Error Resume NextxTitleId = "KutoolsforExcel" Set WorkRng = Application.SelectionSet WorkRng = Application. InputBox ("Range", xTitleId, WorkRng.Address, Type: = 8) Sett WorkRng = WorkRng.SpecialCells (xlCellTypeFormulas) for hver RNG I WorkRng For Hver xName I ThisWorkbook.Names Hvis InStr (Rng.Formula, xName.Name) > 0 Then Rng.Formula = VBA.Replace (Rng.Formula, xName.Name, VBA.Replace (xName.RefersTo, "=", "")) End If NextNextEnd Sub
3. Klikk deretter på knappen for å kjøre koden, en dialog skjermer for å velge et område å erstatte. Se skjermbilde:
4. Klikk deretter på OK. og alle de valgte formelen områdenavn har blitt erstattet. Se skjermbilde:
Raskt og enkelt erstatte områdenavn med Kutools for Excel
Hvis du har Kutools for Excel, sin Erstatt treet Names verktøyet vil hjelpe deg å erstatte områdenavn med cellereferanser raskt og enkelt
Kutools for Excel. med mer enn 120 praktiske Excel-tillegg, gratis å prøve uten begrensning i 30 dager. Få den nå
Trinn 1. Vennligst gjelder dette verktøyet ved å klikke Kutools > Mer Verktøy > Bytt områdenavn. Se skjermbilde:
Trinn 2. En pop-up dialog oppkalt Erstatt treet navn vises, og klikk Range seksjonen og velg deretter området du ønsker å erstatte med cellereferanser fra Base Range. Se skjermbilde:
Trinn 3. Klikk på Erstatt, en annen Erstatt treet Names pop-up dialog vil vises for å fortelle deg hvor mange modifiserte formler og uendret formler, klikk OK, og deretter områdenavn i den valgte rang har blitt erstattet med cellereferanser. Se skjermbilde:
For mer detaljert informasjon om Erstatt områdenavn, kan du gå Erstatt treet Names funksjonen beskrivelse
Relativ Artikkel:.
Endre cellereferansen i formler for å variere navn i Excel
Datamaskin læring 