Πώς να χρησιμοποιήσετε μεταβλητές στη Visual Basic Σειρά Excel

Microsoft Excel είναι το πιο δημοφιλές πρόγραμμα υπολογιστικών φύλλων του κόσμου . Ένα από τα πιο ισχυρά χαρακτηριστικά του είναι Visual Basic for Applications , η οποία επιτρέπει στους χρήστες να δημιουργήσουν μακροεντολές που αυτοματοποιούν κοινές εργασίες . Σχεδόν κάθε λειτουργία στο Excel περιλαμβάνει τη χρήση του φάσματος των κυττάρων - οι εν λόγω πράξεις είναι αυτό που κάνει λογιστικά φύλλα ισχυρό . Υπάρχουν αρκετοί διαφορετικοί τρόποι για να χρησιμοποιήσετε μεταβλητές για να χειραγωγήσουν σειρές και τα συστατικά τους , και όλοι τους μπορούν να κάνουν τις μακροεντολές σας πιο ευέλικτη . Τα πράγματα που θα χρειαστείτε για Microsoft Excel
Η Εμφάνιση Περισσότερες οδηγίες
Η 1

Δημιουργήστε μια μεταβλητή για να κρατήσει μια ολόκληρη σειρά . Μπορείτε να το κάνετε αυτό , όπως αυτό :

Set myRange = Φύλλα εργασίας ( " MyWorksheet " ) Range. ( "A1 : C3 " )

Αυτό θα σώσει μια αναφορά στην περιοχή A1 : C3 σχετικά με την φύλλο σημασμένο " MyWorksheet " στη μεταβλητή που ονομάζεται « myRange . " Αφού έχετε κάνει αυτό το μεταβλητό εύρος , μπορείτε να έχετε πρόσβαση στα μεμονωμένα κύτταρα χρησιμοποιώντας την ιδιότητα κύτταρα , όπως αυτό :

myRange.Cells ( 1 , 2 ) = "Hello "

Αυτό θα θέσει το κείμενο " Hello" στο κελί A2 . 2

Χρησιμοποιήστε μεταβλητές για να αποθηκεύσετε τη θέση της σειράς . Για παράδειγμα :

worksheetName = " MyWorksheet " rangeString = " A1 : C3 "

Στη συνέχεια , κάθε φορά που θέλετε να χρησιμοποιήσετε το εύρος , μπορείτε να το χρησιμοποιήσετε σαν αυτό :

Φύλλα εργασίας ( worksheetName ) . Range ( rangeString )

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

Σπάστε τα συστατικά του string φάσμα σε ξεχωριστές μεταβλητές , και στη συνέχεια να τα συνδυάσουν με τη μύγα . Για παράδειγμα :

worksheetName = " MyWorksheet " startColumn = " A " endColumn = " C " StartRow = " 1 " endRow = " 3 "