1 Ανοίξτε το φύλλο εργασίας του Excel 2010 που θέλετε να εργαστείτε με . Πατήστε το πλήκτρο " Alt " και " F11 " για να ξεκινήσει η κονσόλα VBA ώστε να μπορείτε να γράψετε τη μακροεντολή σας . 2
δεξί κλικ φύλλο εργασίας σας στην αριστερή πλευρά της κονσόλας . Μετακινήστε το ποντίκι σας πάνω "Εισαγωγή" και επιλέξτε " Ενότητα " από το μενού . Κάντε κλικ στην ενότητα για την αριστερή πλευρά της κονσόλας
εικόνων 3
Κάντε κλικ στο κενό χώρο στη δεξιά πλευρά της κονσόλας και να εισάγετε τον παρακάτω κωδικό : .
Sub Rowfill ( )
Dim a, b , x As Integer
a = 1
β = 10
Για x = α στο Β
Cells ( x , 1 ) = "TEST "
Επόμενο x
End Sub
Αλλαγή "α" στο παραπάνω κώδικα στην πρώτη γραμμή που θέλετε να συμπληρώσετε και να αλλάξετε "b" στην τελευταία γραμμή . Αλλάξτε το " 1 " μετά το " x" με τη στήλη στην οποία θέλετε να συμπληρώσετε τις γραμμές . Αλλαγή "TEST " σε ό, τι σειρά , τύπο ή μεταβλητή που θέλετε να χρησιμοποιήσετε για να συμπληρώσετε τα κύτταρα ? Αφαιρέσετε τα εισαγωγικά , αν χρησιμοποιείτε μια μεταβλητή
Η
4 Κάντε κλικ στο κουμπί " Play" στην κορυφή του . η κονσόλα VBA να εκτελέσει κώδικα σας και να συμπληρώσετε τις καθορισμένες σειρές με πληροφορίες .
Η
εικόνων
Πνευματικά δικαιώματα © Γνώση Υπολογιστών Όλα τα δικαιώματα κατοχυρωμένα