Cum se copiază adresa curentă a celulei în altă locație din Excel?
În Excel, puteți copia cu ușurință conținutul celulei curente cu comenzile rapide sau meniul contextual, dar cum ați putea copia adresa curentă a celulei în altă locație?
Copiați adresa actuală a celulei
Copiați adresa curentă a celulei și lipiți cu VBA
Copiați adresa actuală a celulei
Iată o formulă care poate obține adresa actuală a celulei în Excel.
Selectați o celulă în care veți plasa adresa celulei, tastați această formulă =ADDRESS(ROW(),COLUMN()), apoi a fost afișată adresa curentă a celulei.
Apoi apăsați Ctrl + C pentru a o copia și faceți clic dreapta pe o celulă pentru a selecta lipiți-o ca valoare.
![]() |
![]() |
![]() |
Copiați adresa curentă a celulei și lipiți cu VBA
Iată codul VBA care poate copia adresa celulei, apoi o poate lipi într-o altă celulă.
1. presa Alt + F11 tastele pentru a activa Microsoft Visual Basic for Applications fereastră.
2. clic Insert > Moduleși lipiți codul de mai jos în script.
VBA : Copiați și lipiți adresa celulei
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. presa F5 , apare un dialog pentru selectarea celulei pe care doriți să o copiați adresa.
4. clic OK, selectați o celulă pentru a lipi adresa celulei.
5. clic OK.
Cele mai bune instrumente de productivitate de birou
Îmbunătățiți-vă abilitățile Excel cu Kutools for Excelși experimentați eficiența ca niciodată înainte. Kutools for Excel Oferă peste 300 de funcții avansate pentru a crește productivitatea și a economisi timp. Faceți clic aici pentru a obține funcția de care aveți cea mai mare nevoie...
Office Tab Aduce interfața cu file la Office și vă face munca mult mai ușoară
- Activați editarea și citirea cu file în Word, Excel, PowerPoint, Publisher, Access, Visio și Project.
- Deschideți și creați mai multe documente în filele noi ale aceleiași ferestre, mai degrabă decât în ferestrele noi.
- Vă crește productivitatea cu 50% și reduce sute de clicuri de mouse pentru dvs. în fiecare zi!
