Hvordan kopieres den aktuelle celleadresse til en anden placering i Excel?

I Excel kan du nemt kopiere indholdet af den aktuelle celle med genveje eller genvejsmenu, men hvordan kunne du kopiere den aktuelle celleadresse til en anden placering？

Kopier den aktuelle celleadresse

Kopier den aktuelle celleadresse og indsæt med VBA

---

Kopier den aktuelle celleadresse

Her er en formel, der kan få den aktuelle celleadresse i Excel.

Vælg en celle, som du vil placere celleadressen, skriv denne formel =ADDRESS(ROW(),COLUMN()), så er den aktuelle celleadresse blevet vist.

Tryk derefter på Ctrl + C for at kopiere den og højreklikke på en celle for at vælge indsætte den som værdi.

---

Kopier den aktuelle celleadresse og indsæt med VBA

Her er VBA-koden, der kan kopiere celleadressen og derefter indsætte den i en anden celle.

1. Trykke Alt + F11 for at aktivere Microsoft Visual Basic for Applications vindue.

2. klik Insert > Module, og indsæt koden under scriptet.

VBA ： Kopier og indsæt celleadresse

Sub AddressCopy()
'UpdatebyExtendoffice20180307
    Dim xSRg As Range
    Dim xDRg As Range
    On Error Resume Next
    Set xSRg = Application.InputBox("Select cell(s) to copy its address:", "KuTools for Excel", Selection.Address, , , , , 8)
    If xSRg Is Nothing Then Exit Sub
    Set xDRg = Application.InputBox("Select a cell to paste:", "KuTools for Excel", , , , , , 8)
    If xDRg Is Nothing Then Exit Sub
    xDRg(1).Value = xSRg.Address
End Sub

3. Trykke F5 nøgle, en dialog vises for at vælge den celle, du vil kopiere dens adresse.

4. klik OK, vælg en celle for at indsætte celleadressen.

5. klik OK.