Αυτό το σεμινάριο θα εξηγήσει το μοντέλο αντικειμένου VBA
Το Excel αποτελείται από αντικείμενα - το αντικείμενο του βιβλίου εργασίας, το αντικείμενο του φύλλου εργασίας και το αντικείμενο εύρους για να αναφέρουμε μόνο μερικά. Κάθε ένα από αυτά τα αντικείμενα αποτελείται από συμβάντα, ιδιότητες και μεθόδους που μπορούν να ελεγχθούν μέσω κώδικα VBA.
Η Ιεραρχία Αντικειμένων του Excel
Μπορείτε να σκεφτείτε την Ιεραρχία αντικειμένων στο Excel, και μάλιστα σε οποιοδήποτε πρόγραμμα του Microsoft Office, σαν ένα γενεαλογικό δέντρο με το αντικείμενο εφαρμογής (το ίδιο το Excel) να είναι το μοναδικό γονικό αντικείμενο στην κορυφή του δέντρου.
Το ανώτερο επίπεδο - η εφαρμογή Excel είναι ένα μόνο αντικείμενο. Ωστόσο, καθένα από τα επόμενα επίπεδα μπορεί να περιέχει πολλά αντικείμενα. Κάθε ένα από αυτά τα επίπεδα μπορεί να περιέχει μια ΣΥΛΛΟΓΗ αντικειμένων - έτσι το ίδιο το Excel μπορεί να περιέχει πολλά βιβλία εργασίας - μια συλλογή βιβλίων εργασίας. Κάθε βιβλίο εργασίας μπορεί στη συνέχεια να περιέχει πολλά φύλλα εργασίας και κάθε φύλλο εργασίας μπορεί στη συνέχεια να περιέχει πολλά διαφορετικά εύρη, σχήματα, περιστροφικούς πίνακες ή αντικείμενα γραφήματος, για παράδειγμα. Υπάρχουν πολλά άλλα αντικείμενα διαθέσιμα, αλλά το παραπάνω γράφημα θα σας δώσει μια γενική ιδέα για το πώς λειτουργούν όλα μαζί.
Χρήση Αντικειμένων
Το αντικείμενο χρησιμοποιείται σε υπο-διαδικασίες και διαδικασίες συνάρτησης για τον έλεγχο της συμπεριφοράς του Excel.
Η ακόλουθη διαδικασία αναφέρεται σε ένα τρέχον βιβλίο εργασίας χρησιμοποιώντας το Αντικείμενο βιβλίου εργασίας. Στη συνέχεια δημιουργεί ένα νέο φύλλο εργασίας σε αυτό το βιβλίο εργασίας χρησιμοποιώντας το Αντικείμενο φύλλου εργασίαςΤο Τέλος, χρησιμοποιεί το Εύρος αντικειμένου για έντονη γραφή και χρωματισμό ενός εύρους κελιών στο φύλλο εργασίας.
1234567891011121314 | Sub UsingObjects ()Dim wkb Ως βιβλίο εργασίαςΕλαφρύ ως φύλλο εργασίαςDim rngA As RangeDim rngB As Range«ρυθμίστε τα αντικείμεναΟρισμός wkb = ActiveWorkbookΟρίστε wks = wkb.Sheets.AdddΡύθμιση rngA = wks.Range ("A1: E1")Ρύθμιση rngB = wks.Range ("A2: E20")«χειροποίησε το αντικείμενο εύρους με έντονη γραφή και αλλάζοντας χρώμαrngA.Font.Bold = TruerngB.Font.Color = -16776961Τέλος υπο |