Πώς να μετρήσετε τα συνολικά κλικ σε ένα καθορισμένο κελί στο Excel;
Αυτό το άρθρο αναφέρεται στη μέτρηση των συνολικών κλικ σε ένα καθορισμένο κελί στο Excel.
Μετρήστε τα συνολικά κλικ σε ένα καθορισμένο κελί με κωδικό VBA
Μετρήστε τα συνολικά κλικ σε ένα καθορισμένο κελί με κωδικό VBA
Κάντε τα εξής για να μετρήσετε τα συνολικά κλικ σε ένα καθορισμένο κελί στο Excel.
1. Στο φύλλο εργασίας περιέχει το κελί που πρέπει να μετρήσετε τα συνολικά του κλικ, κάντε δεξί κλικ στην καρτέλα φύλλου και, στη συνέχεια, κάντε κλικ στο Προβολή κωδικού από το μενού περιβάλλοντος.
2. Στο Microsoft Visual Basic για εφαρμογές παράθυρο, αντιγράψτε και επικολλήστε κάτω από τον κώδικα VBA στο παράθυρο Code.
Κωδικός VBA: Μετρήστε τα συνολικά κλικ σε ένα καθορισμένο κελί στο Excel
Public xRgS, xRgD As Range
Public xNum As Long
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
On Error Resume Next
If Target.Cells.Count > 1 Then Exit Sub
Set xRgS = Range("E2")
If xRgS Is Nothing Then Exit Sub
Set xRgD = Range("H2")
If xRgD Is Nothing Then Exit Sub
If Intersect(xRgS, Target) Is Nothing Then Exit Sub
xNum = xNum + 1
xRgD.Value = xNum
End Sub
Σημείωση: Στον κώδικα, το E2 είναι το κελί που πρέπει να μετρήσετε τα συνολικά του κλικ και το H2 είναι το κελί εξόδου της καταμέτρησης. Αλλάξτε τα όπως χρειάζεστε.
3. Πάτα το άλλος + Q πλήκτρα για να κλείσετε το Microsoft Visual Basic για εφαρμογές παράθυρο.
Από τώρα και στο εξής, όταν κάνετε κλικ στο κελί E2 σε αυτό το καθορισμένο φύλλο εργασίας, τα συνολικά κλικ θα συμπληρωθούν αυτόματα στο κελί H2 όπως φαίνεται στο παρακάτω στιγμιότυπο οθόνης. Για παράδειγμα, εάν κάνετε κλικ στο κελί E2 5 φορές, ο αριθμός 5 θα εμφανίζεται στο κελί H2.

Ξεκλειδώστε το Excel Magic με Kutools AI
- Έξυπνη εκτέλεση: Εκτελέστε λειτουργίες κυψέλης, αναλύστε δεδομένα και δημιουργήστε γραφήματα—όλα αυτά καθοδηγούνται από απλές εντολές.
- Προσαρμοσμένες φόρμουλες: Δημιουργήστε προσαρμοσμένους τύπους για να βελτιστοποιήσετε τις ροές εργασίας σας.
- Κωδικοποίηση VBA: Γράψτε και εφαρμόστε τον κώδικα VBA χωρίς κόπο.
- Ερμηνεία τύπου: Κατανοήστε πολύπλοκους τύπους με ευκολία.
- Μετάφραση κειμένου: Σπάστε τα γλωσσικά εμπόδια στα υπολογιστικά φύλλα σας.
Τα καλύτερα εργαλεία παραγωγικότητας γραφείου
Αυξήστε τις δεξιότητές σας στο Excel με τα Kutools για Excel και απολαύστε την αποτελεσματικότητα όπως ποτέ πριν. Το Kutools για Excel προσφέρει πάνω από 300 προηγμένες δυνατότητες για την ενίσχυση της παραγωγικότητας και την εξοικονόμηση χρόνου. Κάντε κλικ εδώ για να αποκτήσετε τη δυνατότητα που χρειάζεστε περισσότερο...
Το Office Tab φέρνει τη διεπαφή με καρτέλες στο Office και κάνει την εργασία σας πολύ πιο εύκολη
- Ενεργοποίηση επεξεργασίας και ανάγνωσης καρτελών σε Word, Excel, PowerPoint, Publisher, Access, Visio και Project.
- Ανοίξτε και δημιουργήστε πολλά έγγραφα σε νέες καρτέλες του ίδιου παραθύρου και όχι σε νέα παράθυρα.
- Αυξάνει την παραγωγικότητά σας κατά 50% και μειώνει εκατοντάδες κλικ του ποντικιού για εσάς κάθε μέρα!