Microsoft– ის ყველა საოფისე პროგრამა მხარს უჭერს ავტომატიზაციას. მათ შეუძლიათ აწარმოონ როგორც COM სერვერები და გამოიყენონ დოკუმენტებში ჩასმული ან გარე სკრიპტებიდან. ასე რომ, თქვენ შეგიძლიათ დაწეროთ მონაცემები Excel დოკუმენტზე vba სკრიპტიდან.
აუცილებელია
- - დაინსტალირებული Microsoft Excel პროგრამა;
- - Visual Basic რედაქტორი / ტექსტური რედაქტორი.
ინსტრუქციები
Ნაბიჯი 1
შექმენით კონტეინერი vba კოდის მასპინძლობისთვის. თუ სკრიპტი ჩადებულია დოკუმენტში, ატვირთეთ შესაბამისი ფაილი Microsoft Excel- ში. გახსენით Visual Basic რედაქტორი Alt + F11 დაჭერით. საჭიროების შემთხვევაში, შექმენით ახალი მოდული (მოდულის ელემენტი ჩასმა მენიუში). გახსენით რომელიმე მოდული ან ფორმა. შექმენით დამმუშავებელი თქვენი ფორმის მართვისთვის, ან უბრალოდ დაამატეთ პროცედურა მოდულს. Მაგალითად:
ქვეტესტი ()
დასრულება ქვე
თუ თქვენ ავითარებთ ცალკეულ სკრიპტს (ანუ ის იმუშავებს Windows Script Host– ის ქვეშ), მაშინ უბრალოდ შექმენით ფაილი ტექსტური რედაქტორის vbs გაფართოებით
ნაბიჯი 2
დოკუმენტში ჩასმულ სკრიპტში, პროცედურის დასაწყისში დაამატეთ ცვლადი დეკლარაციები:
Dim o სამუშაო წიგნი, როგორც Excel. სამუშაო წიგნი
Dim oSheet როგორც Excel. სამუშაო ფურცელი
პირველი არის Excel- ის სამუშაო წიგნის ობიექტზე მითითების შესანახად და მეორე ფურცლისთვის.
ნაბიჯი 3
ცვლადების ინიციალიზაცია ობიექტის მითითებებით. Vbs სკრიპტში შექმენით Excel პროგრამის ობიექტი (ეს დაიწყებს Excel- ს, როგორც COM სერვერს):
დააყენეთ oApplication = CreateObject ("Excel. Application").
დოკუმენტში ჩასმულ სკრიპტში გამოყენებული იქნება გლობალური განაცხადის ობიექტი oApplication ცვლადის ნაცვლად, რომელიც ეხება მიმდინარე აპლიკაციის ობიექტს. შეარჩიეთ არსებული ან გახსენით ახალი Excel სამუშაო წიგნი. Მაგალითად:
დააყენეთ oWorkbook = განცხადება. სამუშაო წიგნები (1)
დააყენეთ oWorkbook = Application. Workbooks ("Book1")
დააყენეთ oWorkbook = oApplication. Workbooks. Open ("D: / vic / relevant / tmp / test.xls")
მიიღეთ ბმული წიგნის სასურველი ფურცლისკენ:
დააყენეთ oSheet = oApplication. Sheets ("ფურცელი 1")
ნაბიჯი 4
დაწერეთ მონაცემები Excel- ში vba სკრიპტიდან. გამოიყენეთ უჯრედების კოლექცია, რომელიც წარმოადგენს სამუშაო წიგნის ფურცლის ობიექტის თვისებას, რომელზეც მითითებულია წინა ნაბიჯი, oSheet ცვლადში. სტრიქონის ერთ საკანში ჩაწერის მაგალითი შეიძლება ასე გამოიყურებოდეს:
oSheet. Cells (1, 1) = "სტრიქონი ჩაიწერება A1 უჯრედში"
ნაბიჯი 5
Vbs სკრიპტში დაამატეთ კოდი მონაცემთა შესანახად და გათიშეთ Excel პროგრამა:
სამუშაო წიგნი. დაზოგე
განაცხადი. საჩივარი
ნაბიჯი 6
შეინახეთ და შეასრულეთ სკრიპტი. Visual Basic რედაქტორში დააჭირეთ Ctrl + S და შემდეგ მოათავსეთ კურსორი პროცედურის ნაწილში და დააჭირეთ F5. შეინახეთ vbs სკრიპტი დისკზე და შემდეგ გაუშვით როგორც ჩვეულებრივი ფაილი.
