Προγραμματισμός

* Γνώση Υπολογιστών >> Προγραμματισμός >> Visual Βασικά Προγραμματισμός

Πως να αναγκάσετε το Compile του βιβλίου Από VB

γλώσσα προγραμματισμού Visual Basic της Microsoft μπορούν να χρησιμοποιηθούν για την αυτοματοποίηση εργασιών που μπορεί συχνά να εκτελούνται με το χέρι σε πολλά είδη εφαρμογών των Windows , όπως το Microsoft Excel . Χτίσιμο φύλλα εργασίας ενός βιβλίου εργασίας σε ένα βασικό έγγραφο είναι ένα από τα πράγματα που μπορεί να γίνει με την συγγραφή του σεναρίου εφαρμογή VB . Μόλις έχει γράψει το σενάριο , οι χρήστες θα πρέπει να σωθεί από τον κόπο και το χρόνο που έχει να εκτελέσει το χέρι το έργο . Οδηγίες
Η

1 Ανοίξτε την εφαρμογή της Visual Basic που χρησιμοποιείται για να δημιουργήσετε και να επεξεργαστείτε VB κώδικα και εφαρμογών που βασίζονται σε VB . 2

Δημιουργήστε ένα νέο έγγραφο VB και να κινήσει και το όνομα ενός νέα υπο - ρουτίνα? για παράδειγμα :

Sub CompileWorkbook ( )
εικόνων 3

Αποκτήστε τα φύλλα εργασίας του βιβλίου εργασίας με την προσθήκη ενός δεύτερου γραμμή κώδικα :

Sub CompileWorkbook ( ) Dim objX As Object
Η

4 Ρυθμίστε το στόχο της ρουτίνας καθορίζοντας τι θα πρέπει να κάνει συγκεκριμένα :

Sub CompileWorkbook ( ) Dim objX Όπως ObjectOn Συνέχιση Σφάλμα NextSet objX = Application.CommandBars.FindControl ( Τύπος: = msoControlButton )
5

Ορίστε τι το σενάριο θα πρέπει να κάνω αν οι ορισμοί της δεν είναι σε θέση να ανταποκριθεί με την προσθήκη μιας " If Not " επιχείρημα :

Sub CompileWorkbook ( ) Dim objX Όπως ObjectOn Error Resume NextSet objX = Application.CommandBars.FindControl ( Τύπος: = msoControlButton ) If Not objX δεν είναι τίποτα ThenobjX.ExecuteSet objX = Τίποτα

6

Κλείστε το σενάριο σύνταξη με την προσθήκη " End" δηλώσεις του κώδικα :

Sub CompileWorkbook ( ) Dim objX Όπως ObjectOn Error Resume NextSet objX = Application.CommandBars.FindControl ( Τύπος: = msoControlButton ) If Not objX δεν είναι τίποτα ThenobjX.ExecuteSet objX = NothingEnd IfEnd Sub
Η 7

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

Συναφής σύστασή

Πνευματικά δικαιώματα © Γνώση Υπολογιστών Όλα τα δικαιώματα κατοχυρωμένα