1 Κάντε κλικ στο κουμπί " Έναρξη", " Όλα τα προγράμματα " και "Microsoft Excel " για να εισάγετε το πρόγραμμα Excel . Κάντε κλικ στο " Ενεργοποίηση του Excel Visual Basic ", όταν εισέρχονται για πρώτη φορά το Excel . Πατήστε το πλήκτρο " Alt " και " F11 " ταυτόχρονα για να εισέλθετε στο περιβάλλον επεξεργασίας VBA . 2
Επιλέξτε το " Φύλλο εργασίας " ρύθμιση και επιλέξτε το "Change " ρύθμιση στο drop -down μενού στο παράθυρο κώδικα . Αυτό προσθέτει τη δήλωση διαδικασία συμβάντος για την "Αλλαγή" συμβάν στη λειτουργική μονάδα κώδικα
εικόνων 3
Προσθήκη κώδικα στη διαδικασία WorkSheet_Change ως εξής : .
If Not Application.Intersect ( Target , Me.Range ( " A2 : C11 " ) ) Is Nothing τότε
Δεν κυττάρων του Target στην περιοχή Α2 'Εκτέλεση κάποια ενέργεια
Else
». : C11 . Έξοδος
Exit Sub
ελέγχους WorkSheet_Change κάθε κύτταρο . Μέθοδος Τομή ( ) επιστρέφει το φάσμα των κυττάρων είναι κοινά σε δύο σειρές : Στόχος και Me.Range ( " A2 : C11 " ) . Αν στόχος είναι εντός του εύρους ( " A2 : C11 " ) , κάποια δράση θα διεξαχθεί από τον κωδικό
Η
εικόνων .
Πνευματικά δικαιώματα © Γνώση Υπολογιστών Όλα τα δικαιώματα κατοχυρωμένα