Note: The other languages of the website are Google-translated. Back to English

Cum se obține adresa celulei active în Excel?

În timp ce utilizați Microsoft Excel, puteți obține cu ușurință locația celulei selectate în prezent în caseta Nume care listează în stânga barei de formule. Dar dacă celula este denumită, nu puteți examina locația acesteia pe baza afișării în caseta de nume. Și dacă doriți să afișați direct adresa completă a celulei active sau să afișați adresa celulei active într-o celulă specificată, ce ați face? În acest tutorial, vă vom arăta cum să obțineți cu ușurință adresa celulei active cu formula și metodele VBA.

Obțineți adresa celulei active cu Formula
Obțineți adresa celulei active cu codul VBA
Afișați adresa celulei active într-o celulă specificată cu cod VBA
Afișați dinamic adresa celulei active cu un instrument uimitor


Obțineți adresa celulei active cu Formula

În această secțiune, vă vom oferi o formulă pentru a obține cu ușurință adresa celulei active.

1. Selectați o celulă pentru ao activa.

2. Introduceți formula de mai jos și apoi apăsați pe Intrați cheie.

=ADDRESS(ROW(),COLUMN())

Apoi, puteți vedea adresa celulei selectate curent se afișează imediat în celulă.

notițe: Dacă alegeți să selectați o altă celulă, adresa nu se va schimba automat. Pentru a obține o adresă dinamică în timp ce selectați diferite celule, vă rugăm să aplicați metodele de mai jos.

Afișați dinamic adresa celulei active:

Bara de editare îmbunătățită utilitatea Kutools pentru Excel ajută la afișarea dinamică a adresei celulei active în foaia de lucru în Excel. În plus, puteți vizualiza și edita conținutul celulei selectate direct în fereastră, așa cum se arată în demonstrația de mai jos.
Descărcați și încercați acum! (30- traseu liber de o zi)


Obțineți adresa celulei active cu codul VBA

De asemenea, puteți obține adresa celulei active cu codul VBA. Vă rugăm să faceți următoarele.

1. apasă pe Alt + F11 simultan pentru a deschide Microsoft Visual Basic pentru aplicații fereastră.

2. În Microsoft Visual Basic pentru aplicații fereastra, faceți dublu clic pe numele curentului folosind foaia de lucru din panoul din stânga pentru a deschide editorul de cod, apoi copiați și lipiți codul VBA de mai jos în editorul de cod.

Cod VBA: obțineți adresa celulei active

Sub selectRange()
	MsgBox ActiveCell.Address
End Sub

3. Apoi faceți clic pe Alerga pentru a rula codul.

4. Apoi va apărea o casetă de dialog cu adresa celulei active listate în interior.


Afișați adresa celulei active într-o celulă specificată cu cod VBA

În altă situație, doriți ca adresa celulei active să fie afișată într-o celulă specificată. De fiecare dată când vă mutați de la o celulă la alta, adresa celulei va fi modificată automat și afișată în celula specificată. Vă rugăm să faceți următoarele.

1. Vă rugăm să deschideți Microsoft Visual Basic pentru aplicații fereastra apăsând Alt + F11 în acelaşi timp.

2. Faceți dublu clic pe numele foii din panoul din stânga pentru a deschide editorul de cod, apoi copiați și lipiți codul de mai jos în el.

Cod VBA: afișează adresa celulei active într-o celulă specificată

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
	Range("A1").Value = ActiveCell.Address
End Sub

notițe: A1 este celula în care doriți să puneți adresa activă a celulei, o puteți schimba în celula specificată pentru propriile nevoi.

3. Apoi apasa Fișier > Închideți și reveniți la Microsoft Excel pentru a ieși din Microsoft Visual Basic pentru aplicații fereastră.

Puteți vedea adresa afișajelor de celule active pe celula A1, iar adresa se va schimba automat în funcție de schimbarea celulei active. Vedeți captura de ecran:


Afișați dinamic adresa celulei active cu un instrument uimitor

Dacă doriți să afișați dinamic adresa celulei active în foaia de lucru, vă recomand cu drag Bara de editare îmbunătățită instrument de Kutools pentru Excel. Să vedem cum acest instrument poate afișa dinamic adresa celulei active în foaia de lucru.

Înainte de a aplica Kutools pentru Excel, Vă rugăm să descărcați-l și instalați-l mai întâi.

1. clic Kutools > Arată ascunde > Bara de editare îmbunătățită pentru a activa caracteristica.

De acum înainte, de fiecare dată când faceți clic pe o celulă, va apărea fereastra Bara de editare îmbunătățită. Și adresa celulei ative va fi afișată în partea de jos a ferestrei.
sfaturi: Puteți vizualiza și edita direct conținutul celulei direct în fereastră.

  Dacă doriți să aveți o încercare gratuită (30-zi) a acestei utilitati, vă rugăm să faceți clic pentru a-l descărca, și apoi mergeți pentru a aplica operația conform pașilor de mai sus.



Cele mai bune instrumente de productivitate Office

Kutools pentru Excel vă rezolvă majoritatea problemelor și vă crește productivitatea cu 80%

  • reutilizarea: Introduceți rapid formule complexe, diagrame și orice ai folosit anterior; Criptați celulele cu parola; Creați o listă de corespondență și trimiteți e-mailuri ...
  • Super Formula Bar (editați cu ușurință mai multe linii de text și formulă); Layout de citire (citiți și editați cu ușurință un număr mare de celule); Lipiți la interval filtrat...
  • Merge celule / rânduri / coloane fără a pierde date; Conținut de celule divizate; Combinați rânduri / coloane duplicate... Prevenirea celulelor duplicate; Comparați gamele...
  • Selectați Duplicat sau Unic Rânduri; Selectați Rânduri goale (toate celulele sunt goale); Super Find și Fuzzy Find în multe cărți de lucru; Selectare aleatorie ...
  • Copie exactă Mai multe celule fără modificarea referinței formulelor; Creați automat referințe la foi multiple; Introduceți gloanțe, Casete de selectare și multe altele ...
  • Extrageți textul, Adăugați text, eliminați după poziție, Eliminați spațiul; Creați și imprimați subtotaluri de paginare; Convertiți conținutul dintre celule și comentarii...
  • Super Filtru (salvați și aplicați scheme de filtrare altor foi); Sortare avansată după lună / săptămână / zi, frecvență și multe altele; Filtru special cu bold, italic ...
  • Combinați cărți de lucru și foi de lucru; Merge Tables pe baza coloanelor cheie; Împărțiți datele în mai multe foi; Conversia în loturi xls, xlsx și PDF...
  • Peste 300 de funcții puternice. Suportă Office / Excel 2007-2021 și 365. Acceptă toate limbile. Implementare ușoară în întreprinderea sau organizația dvs. Funcții complete Probă gratuită de 30 de zile. Garanție de returnare a banilor de 60 de zile.
fila kte 201905

Fila Office aduce interfața cu file în 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!
fundul officetab
Comentarii (5)
Încă nu există evaluări. Fii primul care evaluează!
Acest comentariu a fost redus la minimum de moderatorul de pe site
Buna,

Afișarea referinței de celulă activă este utilă. Dar cum folosesc de fapt această valoare? Citesc examene și am șase coloane (dintre care două vor fi completate). Numele studentului este în coloana A; Pot extrage numele de familie: LEFT(A7,(FIND(",")A7)-1))) [unde A7 este adresa curentă]. Pot folosi codul pentru afișarea adresei actuale a celulei active furnizate mai sus:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Range("A1").Value = ActiveCell.Address
End Sub

Dar ceea ce vreau cu adevărat să fac este ca cursorul să fie undeva în rândul curent (C3:H3) și să extrag numele de familie al studentului actual. Exemplu:

ABCDEFGH
1 Nume ID 1 2 3 4 5 6

2 Smith, John 1234567

Când celula activă este între C1 și H1, vreau să extrag numele studentului din A2 ("Smith, John") [folosind LEFT(A2,(FIND(",")A2)-1)))], dar cu valorile pentru adresa furnizate din codul de mai sus.

Orice sugestie ar fi binevenită.


Proiect de lege
Acest comentariu a fost redus la minimum de moderatorul de pe site
Dragă Bill,
Dacă doriți să utilizați referința de celulă a celulei active, vă rugăm să aplicați codul VBA de mai jos.
(Referința de celulă activă va fi afișată în celula A1. Apoi puteți copia referința de celulă direct în A1 sau puteți efectua alte operațiuni după cum aveți nevoie.)

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
La data de eroare CV următoare
Dacă (Target.Count = 1) Și (Intersect(Target, Range("A1"))) nu este nimic) atunci
Range("A1").Value = ActiveCell.Address
Final, dacă
End Sub
Acest comentariu a fost redus la minimum de moderatorul de pe site
Primul exemplu nu afișează adresa celulei active, ci a celulei care conține formula. Dacă ar fi să selectați o altă celulă, adresa nu s-ar schimba.
De fapt, aceasta este probabil mai multe informații utile decât adunarea adresei celulei active și mai greu de găsit dacă aveți nevoie de ea. Căutam cum să fac asta folosind VBA și nu l-am putut găsi o perioadă, așa că îl voi include aici:

Aplicație.Adresa.Apelantului

Aceasta vă va oferi adresa celulei care apelează funcția și nu celula activă, utilă pentru referințe relative.
Acest comentariu a fost redus la minimum de moderatorul de pe site
Sunt destul de nou în scris VBA.
În loc să raportez caseta de mesaj cu adresa celulei activată, aș dori să extrag adresa celulei unei celule activate din codul meu vba și să o stochez într-un tabel/în altă locație de pe foaie pentru fiecare iterație pe care o ia bucla mea for.

Cum aș proceda pentru a îndeplini această sarcină?


Salutari,
Acest comentariu a fost redus la minimum de moderatorul de pe site
Bună dimineața,
Excelente formula para exibir a célula ativa.
Mas estou precisando utiliza o "conteúdo" de uma célula ativa dentro de uma formula SE.
Entao:

Se
"celula_ativa" = "aluno"
Reveniți la următoarea informație „XXXX”
OU se pentru „profesor”
Reveniți la următoarea informație „YYYY”

Vc consegue me help com isso, por favor?
Nu există comentarii postate aici încă
Lăsa comentarii
Postare ca invitat
×
Evaluează această postare:
0   Caractere
Locații sugerate

Urmărește-ne

Copyright © 2009 - www.extendoffice.com. | Toate drepturile rezervate. Cu sprijinul ExtendOffice. | Harta site-ului
Microsoft și sigla Office sunt mărci comerciale sau mărci comerciale înregistrate ale Microsoft Corporation în Statele Unite și / sau în alte țări.
Protejat de Sectigo SSL