1 Ανοίξτε το Microsoft Word. 2
Κάντε κλικ στο " Εργαλεία ", " Macro " και στη συνέχεια " Visual Basic ". Αυτό θα ανοίξει το πρόγραμμα επεξεργασίας VBA .
Εικόνων 3
Κάντε κλικ στο " Εισαγωγή" και στη συνέχεια " ενότητα ". Πρέπει τώρα να έχετε μια κενή λειτουργική μονάδα κώδικα
Η 4
Πληκτρολογήστε ή αντιγράψτε και επικολλήστε τον ακόλουθο κώδικα στη λειτουργική μονάδα κώδικα : .
Private Sub ControlExcel ( )
Dim intCol As Integer
Dim intRow As Integer
Dim OXL As Object
Dim oBook As Object
Dim oSheet As Object
Dim πορτοκαλί ως αντικείμενο
intCol = 3
intRow = 1
Set OXL = CreateObject ( " Excel.Application " )
oXL.DisplayAlerts = False
Set oBook = oXL.workbooks.Add
Set oSheet = oBook.Sheets ( 1 )
oSheet.cells ( intRow , intCol ) . Value = " Αυτή είναι μια δοκιμή από τη χρήση OLE "
» Προβολή περίοδο λειτουργίας του Excel .
oXL.Visible = True
End Sub
Ο κώδικας χρησιμοποιεί OLE για σύνδεση και να συνδεθούν με Microsoft Excel ? τότε ανοίγει το Excel , προσθέτει ένα βιβλίο εργασίας και φύλλο εργασίας και τα έσοδα να γράψει το κείμενο , " Αυτή είναι μια δοκιμή της χρήσης OLE ".
5
Πατήστε το " F5 " για να εκτελέσετε το πρόγραμμα .
Η
εικόνων
Πνευματικά δικαιώματα © Γνώση Υπολογιστών Όλα τα δικαιώματα κατοχυρωμένα