Μετάβαση στο κύριο περιεχόμενο

Πώς να αποκτήσετε τη διεύθυνση του ενεργού κελιού στο Excel;

Κατά τη χρήση του Microsoft Excel, μπορείτε εύκολα να βρείτε τη θέση του επιλεγμένου κελιού στο πλαίσιο ονόματος που εμφανίζεται στα αριστερά της γραμμής τύπων. Αλλά αν το κελί έχει όνομα, δεν μπορείτε να εξετάσετε τη θέση του με βάση την εμφάνιση στο Όνομα πλαισίου. Και αν θέλετε να εμφανίσετε απευθείας την πλήρη διεύθυνση του ενεργού κελιού ή να εμφανίσετε τη διεύθυνση του ενεργού κελιού σε ένα καθορισμένο κελί, τι θα κάνατε; Σε αυτό το σεμινάριο, θα σας δείξουμε πώς μπορείτε να λάβετε εύκολα τη διεύθυνση του ενεργού κελιού με μεθόδους τύπου και VBA.

Λάβετε τη διεύθυνση του ενεργού κελιού με τον τύπο
Λάβετε τη διεύθυνση του ενεργού κελιού με τον κωδικό VBA
Εμφάνιση της διεύθυνσης του ενεργού κελιού σε ένα καθορισμένο κελί με κωδικό VBA
Δυναμική εμφάνιση της διεύθυνσης του ενεργού κελιού με ένα καταπληκτικό εργαλείο


Λάβετε τη διεύθυνση του ενεργού κελιού με τον τύπο

Σε αυτήν την ενότητα, θα σας παρέχουμε έναν τύπο για να λάβετε εύκολα τη διεύθυνση του ενεργού κελιού.

1. Επιλέξτε ένα κελί για να το ενεργοποιήσετε.

2. Εισαγάγετε τον παρακάτω τύπο και, στη συνέχεια, πατήστε το εισάγετε κλειδί.

=ADDRESS(ROW(),COLUMN())

Στη συνέχεια, μπορείτε να δείτε ότι η διεύθυνση του τρέχοντος επιλεγμένου κελιού εμφανίζεται αμέσως στο κελί.

Note: Εάν επιλέξετε να επιλέξετε ένα διαφορετικό κελί, η διεύθυνση δεν θα αλλάξει αυτόματα. Για να αποκτήσετε μια δυναμική διεύθυνση ενώ επιλέγετε διαφορετικά κελιά, εφαρμόστε τις παρακάτω μεθόδους.

Δυναμική εμφάνιση της διεύθυνσης του ενεργού κελιού:

Η Βελτιωμένη γραμμή επεξεργασίας χρησιμότητα του Kutools για Excel βοηθά στην εμφάνιση της διεύθυνσης του ενεργού κελιού στο φύλλο εργασίας στο Excel. Εκτός αυτού, μπορείτε να προβάλετε και να επεξεργαστείτε το επιλεγμένο περιεχόμενο κελιού απευθείας στο παράθυρο, όπως φαίνεται στην παρακάτω επίδειξη.
Κατεβάστε το και δοκιμάστε το τώρα! (Δωρεάν διαδρομή 30 ημερών)


Λάβετε τη διεύθυνση του ενεργού κελιού με τον κωδικό VBA

Μπορείτε επίσης να λάβετε τη διεύθυνση του ενεργού κελιού με τον κωδικό VBA. Κάντε τα εξής:

1. Πάτα το άλλος + F11 ταυτόχρονα για να ανοίξετε το Microsoft Visual Basic για εφαρμογές παράθυρο.

2. Στο Microsoft Visual Basic για εφαρμογές παράθυρο, κάντε διπλό κλικ στο όνομα του τρέχοντος χρησιμοποιώντας το φύλλο εργασίας στο αριστερό παράθυρο για να ανοίξετε το πρόγραμμα επεξεργασίας κώδικα και, στη συνέχεια, αντιγράψτε και επικολλήστε τον παρακάτω κώδικα VBA στον επεξεργαστή κώδικα.

Κωδικός VBA: Λήψη διεύθυνσης ενεργού κελιού

Sub selectRange()
	MsgBox ActiveCell.Address
End Sub

3. Στη συνέχεια, κάντε κλικ στο τρέξιμο κουμπί για να εκτελέσετε τον κωδικό.

4. Στη συνέχεια, θα εμφανιστεί ένα παράθυρο διαλόγου με τη διεύθυνση του ενεργού κελιού που αναγράφεται στο εσωτερικό.


Εμφάνιση της διεύθυνσης του ενεργού κελιού σε ένα καθορισμένο κελί με κωδικό VBA

Σε μια άλλη περίπτωση, θα θέλατε να εμφανίζεται η διεύθυνση του ενεργού κελιού σε ένα καθορισμένο κελί. Κάθε φορά που μετακινείτε από το ένα κελί στο άλλο, η διεύθυνση του κελιού αλλάζει και εμφανίζεται αυτόματα στο καθορισμένο κελί. Κάντε τα εξής:

1. Ανοίξτε το Microsoft Visual Basic για εφαρμογές παράθυρο πατώντας άλλος + F11 την ίδια στιγμή.

2. Κάντε διπλό κλικ στο όνομα του φύλλου στο αριστερό παράθυρο για να ανοίξετε το πρόγραμμα επεξεργασίας κώδικα και, στη συνέχεια, αντιγράψτε και επικολλήστε τον παρακάτω κώδικα σε αυτό.

Κωδικός VBA: εμφάνιση της διεύθυνσης του ενεργού κελιού σε ένα καθορισμένο κελί

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

Note: Το A1 είναι το κελί όπου θέλετε να τοποθετήσετε την ενεργή διεύθυνση κελιού, μπορείτε να το αλλάξετε στο καθορισμένο κελί για τις δικές σας ανάγκες.

3. Στη συνέχεια κάντε κλικ στο κουμπί Αρχεία > Κλείσιμο και επιστροφή στο Microsoft Excel για έξοδο από το Microsoft Visual Basic για εφαρμογές παράθυρο.

Μπορείτε να δείτε τη διεύθυνση των ενεργών εμφανίσεων κελιού στο κελί A1 και η διεύθυνση θα αλλάξει αυτόματα με βάση την αλλαγή του ενεργού κελιού. Δείτε το στιγμιότυπο οθόνης:


Δυναμική εμφάνιση της διεύθυνσης του ενεργού κελιού με ένα καταπληκτικό εργαλείο

Εάν θέλετε να εμφανίσετε δυναμικά τη διεύθυνση του ενεργού κελιού στο φύλλο εργασίας, συνιστώ ανεπιφύλακτα το Βελτιωμένη γραμμή επεξεργασίας εργαλείο του Kutools για Excel. Ας δούμε πώς αυτό το εργαλείο μπορεί να εμφανίσει δυναμικά τη διεύθυνση του ενεργού κελιού στο φύλλο εργασίας.

Πριν από την εφαρμογή Kutools για Excel, σας παρακαλούμε κατεβάστε και εγκαταστήστε το πρώτα.

1. κλικ Kutools > Εμφάνιση απόκρυψη > Βελτιωμένη γραμμή επεξεργασίας για να ενεργοποιήσετε τη λειτουργία.

Από τώρα και στο εξής, κάθε φορά που κάνετε κλικ σε ένα κελί, θα εμφανίζεται το παράθυρο της Βελτιωμένης γραμμής επεξεργασίας. Και η διεύθυνση του ενεργού κελιού θα εμφανίζεται στο κάτω μέρος του παραθύρου.
Συμβουλές: Μπορείτε να προβάλετε και να επεξεργαστείτε απευθείας το περιεχόμενο του κελιού απευθείας στο παράθυρο.

  Εάν θέλετε να έχετε μια δωρεάν δοκιμή (30-ημερών) αυτού του βοηθητικού προγράμματος, κάντε κλικ για να το κατεβάσετεκαι μετά πηγαίνετε για να εφαρμόσετε τη λειτουργία σύμφωνα με τα παραπάνω βήματα.


Τα καλύτερα εργαλεία παραγωγικότητας γραφείου

🤖 Kutools AI Aide: Επανάσταση στην ανάλυση δεδομένων με βάση: Ευφυής Εκτέλεση   |  Δημιουργία κώδικα  |  Δημιουργία προσαρμοσμένων τύπων  |  Αναλύστε δεδομένα και δημιουργήστε γραφήματα  |  Επίκληση Λειτουργιών Kutools...
Δημοφιλή χαρακτηριστικά: Εύρεση, επισήμανση ή αναγνώριση διπλότυπων   |  Διαγραφή κενών γραμμών   |  Συνδυάστε στήλες ή κελιά χωρίς απώλεια δεδομένων   |   Γύρος χωρίς φόρμουλα ...
Σούπερ Αναζήτηση: VLookup πολλαπλών κριτηρίων    VLookup πολλαπλών τιμών  |   VLookup σε πολλά φύλλα   |   Ασαφής αναζήτηση ....
Σύνθετη αναπτυσσόμενη λίστα: Γρήγορη δημιουργία αναπτυσσόμενης λίστας   |  Εξαρτημένη αναπτυσσόμενη λίστα   |  Πολλαπλή αναπτυσσόμενη λίστα ....
Διαχειριστής στήλης: Προσθέστε έναν συγκεκριμένο αριθμό στηλών  |  Μετακίνηση στηλών  |  Εναλλαγή κατάστασης ορατότητας κρυφών στηλών  |  Συγκρίνετε εύρη και στήλες ...
Επιλεγμένα Χαρακτηριστικά: Εστίαση πλέγματος   |  Προβολή σχεδίου   |   Μεγάλη Formula Bar    Διαχείριση βιβλίου εργασίας & φύλλου   |  Βιβλιοθήκη πόρων (Αυτόματο κείμενο)   |  Επιλογή ημερομηνίας   |  Συνδυάστε φύλλα εργασίας   |  Κρυπτογράφηση/Αποκρυπτογράφηση κελιών    Αποστολή email ανά λίστα   |  Σούπερ φίλτρο   |   Ειδικό φίλτρο (φίλτρο με έντονη γραφή/πλάγια γραφή/διαγραφή...) ...
Κορυφαία 15 σύνολα εργαλείων12 Κείμενο Εργαλεία (Προσθήκη κειμένου, Κατάργηση χαρακτήρων, ...)   |   50 + Διάγραμμα Τύποι (Gantt διάγραμμα, ...)   |   40+ Πρακτικό ΜΑΘΗΜΑΤΙΚΟΙ τυποι (Υπολογίστε την ηλικία με βάση τα γενέθλια, ...)   |   19 Εισαγωγή Εργαλεία (Εισαγωγή κωδικού QR, Εισαγωγή εικόνας από το μονοπάτι, ...)   |   12 Μετατροπή Εργαλεία (Αριθμοί σε λέξεις, Μετατροπή Συναλλάγματος, ...)   |   7 Συγχώνευση & διαχωρισμός Εργαλεία (Σύνθετες σειρές συνδυασμού, Διαίρεση κελιών, ...)   |   ... κι αλλα

Αυξήστε τις δεξιότητές σας στο Excel με τα Kutools για Excel και απολαύστε την αποτελεσματικότητα όπως ποτέ πριν. Το Kutools για Excel προσφέρει πάνω από 300 προηγμένες δυνατότητες για την ενίσχυση της παραγωγικότητας και την εξοικονόμηση χρόνου.  Κάντε κλικ εδώ για να αποκτήσετε τη δυνατότητα που χρειάζεστε περισσότερο...

Περιγραφή


Το Office Tab φέρνει τη διεπαφή με καρτέλες στο Office και κάνει την εργασία σας πολύ πιο εύκολη

  • Ενεργοποίηση επεξεργασίας και ανάγνωσης καρτελών σε Word, Excel, PowerPoint, Publisher, Access, Visio και Project.
  • Ανοίξτε και δημιουργήστε πολλά έγγραφα σε νέες καρτέλες του ίδιου παραθύρου και όχι σε νέα παράθυρα.
  • Αυξάνει την παραγωγικότητά σας κατά 50% και μειώνει εκατοντάδες κλικ του ποντικιού για εσάς κάθε μέρα!
Comments (5)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Bom dia,
Excelente formula para exibir a célula ativa.
Mas estou precisando utilizar o "conteúdo" de uma célula ativa dentro de uma formula SE.
Entao:

Se
"celula_ativa" = "aluno"
Retorna a seguinte informação "XXXX"
OU se for "professor"
Retorna a seguinte informação "YYYY"

Vc consegue me ajudar com isso, por favor?
This comment was minimized by the moderator on the site
I am fairly new to writing VBA.
Instead of reporting the message box with activated cell address, I would like to pull the cell address of an activated cell from my vba code and store it in a table/other location on the sheet for each iteration that my for loop takes.

How would I go about completing this task?


Regards,
This comment was minimized by the moderator on the site
The first example does not display the address of the active cell but of the cell containing the formula. If you were to select a different cell the address would not change.
Actually this is probably more useful information than gathering the active cell's address and harder to find if you need it. I was looking how to do this using VBA and could not find it for a while so I will include it here:

Application.Caller.Address

That will give you the address of the cell calling the function and not the active cell, useful for relative references.
This comment was minimized by the moderator on the site
Hello,

Displaying the active cell reference is helpful. But how do I actually use that value? I'm reading exams, and have six columns (of which two will get filled in). The student name is in column A; I can extract the family name: LEFT(A7,(FIND(",")A7)-1))) [where A7 is the current address]. I can use the code for displaying the current active cell address provided above:

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

But what I really want to do is have the cursor being somewhere in the current row (C3:H3), and extract the family name of the current student. Example:

A B C D E F G H
1 Name ID 1 2 3 4 5 6

2 Smith, John 1234567

When the active cell is between C1 and H1, I want to extract the student name from A2 ("Smith, John") [using LEFT(A2,(FIND(",")A2)-1)))], but with the values for the address supplied from the code above.

Any suggestions would be welcome.


Bill
This comment was minimized by the moderator on the site
Dear Bill,
If you want to use the cell reference of active cell, please apply below VBA code.
(The active cell reference will be displayed in cell A1. Then you can copy the cell reference directely in A1 or do other operations as you need.)

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
On Error Resume Next
If (Target.Count = 1) And (Intersect(Target, Range("A1")) Is Nothing) Then
Range("A1").Value = ActiveCell.Address
End If
End Sub
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations