Πώς να κάνετε διπλό κλικ σε ένα κελί και να προσθέσετε 1 σε αυτήν την τιμή κελιού στο Excel;
Αυτό το άρθρο θα σας δείξει τη μέθοδο προσθήκης 1 σε μια τιμή κελιού αυτόματα με διπλό κλικ σε αυτήν στο Excel.
Κάντε διπλό κλικ σε ένα κελί και προσθέστε 1 με τον κωδικό VBA
Κάντε διπλό κλικ σε ένα κελί και προσθέστε 1 με τον κωδικό VBA
Ο ακόλουθος κωδικός VBA μπορεί να σας βοηθήσει να προσθέσετε 1 σε μια τιμή κελιού μετά από διπλό κλικ. Κάντε τα εξής:
1. Κάντε δεξί κλικ στην καρτέλα φύλλου στην οποία οι τιμές του κελιού πρέπει να προσθέσετε 1 με διπλό κλικ. Στη συνέχεια κάντε κλικ Προβολή κωδικού από το μενού με δεξί κλικ.
2. Στο αναδυόμενο παράθυρο Microsoft Visual Basic για εφαρμογές παράθυρο, αντιγράψτε και επικολλήστε τον παρακάτω κώδικα VBA στο παράθυρο Code.
Κωδικός VBA: Προσθέστε 1 σε μια τιμή κελιού με διπλό κλικ
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
On Error Resume Next
If Not Intersect(Target, Range("A1")) Is Nothing Then
Range("A1").Value = Range("A1").Value + 1
Cancel = True
End If
End Sub
Note: Στον κώδικα, το Α1 είναι το κελί στο οποίο θα προσθέσετε τον αριθμό 1 με διπλό κλικ.
3. Πάτα το άλλος + Q ταυτόχρονα για να κλείσετε το παράθυρο της Microsoft Visual Basic for Applications.
Τώρα, κάντε διπλό κλικ στο κελί A1 θα προσθέσει 1 στην υπάρχουσα τιμή όπως φαίνεται στο παρακάτω στιγμιότυπο οθόνης.
Σχετικά Άρθρα:
- Πώς να προσθέσετε / εισαγάγετε αυτόματα την τρέχουσα ημερομηνία / ώρα σε ένα κελί με διπλό κλικ στο Excel;
- Πώς να προσθέσετε το σημάδι επιλογής σε ένα κελί με διπλό κλικ στο Excel;
Τα καλύτερα εργαλεία παραγωγικότητας γραφείου
Αυξήστε τις δεξιότητές σας στο Excel με τα Kutools για Excel και απολαύστε την αποτελεσματικότητα όπως ποτέ πριν. Το Kutools για Excel προσφέρει πάνω από 300 προηγμένες δυνατότητες για την ενίσχυση της παραγωγικότητας και την εξοικονόμηση χρόνου. Κάντε κλικ εδώ για να αποκτήσετε τη δυνατότητα που χρειάζεστε περισσότερο...
Το Office Tab φέρνει τη διεπαφή με καρτέλες στο Office και κάνει την εργασία σας πολύ πιο εύκολη
- Ενεργοποίηση επεξεργασίας και ανάγνωσης καρτελών σε Word, Excel, PowerPoint, Publisher, Access, Visio και Project.
- Ανοίξτε και δημιουργήστε πολλά έγγραφα σε νέες καρτέλες του ίδιου παραθύρου και όχι σε νέα παράθυρα.
- Αυξάνει την παραγωγικότητά σας κατά 50% και μειώνει εκατοντάδες κλικ του ποντικιού για εσάς κάθε μέρα!