VBA ხაზის წაშლა სტანდარტული და ხშირად გამოყენებული პროცედურაა დეველოპერებისთვის. ამასთან, ნაკლებად გამოცდილი მომხმარებლებისთვის ამ ოპერაციამ შეიძლება გარკვეული სირთულეები გამოიწვიოს.
ინსტრუქციები
Ნაბიჯი 1
დარწმუნდით, რომ გესმით წაშლის ხაზის ბრძანების სინტაქსი ბრძანების წაშლის გამოყენებით. ასე რომ, აქტიური უჯრედის შემცველი მწკრივისთვის ბრძანება ჰგავს ActiveCell. EntireRow. Delete და რიგი რიგების წაშლის აუცილებლობა შეცვლის მას Rows ("first_line_number: last_line_number"). წაშლა (Excel- ისთვის).
ნაბიჯი 2
გამოიყენეთ მსგავსი სინტაქსი VBA– ში შერჩეული მწკრივის ბრძანების წაშლისთვის, მაგრამ მოწინავე ვარიანტებით. ამისათვის, პირველ რიგში, განსაზღვრეთ საჭირო მოქმედება: Private Sub Delete line_Click (). მიუთითეთ საჭირო პროგრამა Dim ea As Excel. აპლიკაცია და შეარჩიეთ საჭირო სამუშაო წიგნი Dim ewb როგორც Excel. სამუშაო წიგნი. შემდეგ მიუთითეთ Dim ews– ის Excel– ის გვერდი. სამუშაო ფურცლის რედაქტირების დოკუმენტი.
ნაბიჯი 3
გამოტოვეთ ერთი ხაზი და შეიყვანეთ Set XLAp = CreateObject (კლასი: = "Excel. Application"). დააყენეთ ზუსტი განთავსება შემდეგ სტრიქონზე: დააყენეთ XLWb = XLAp. სამუშაო წიგნები. გახსენით ("drive_name: 1.xls") გამოიყენეთ შემდეგი მნიშვნელობა: დააყენეთ XLWs = XLWb. ActiveSheet.
ნაბიჯი 4
გამოტოვეთ სხვა ხაზი და შეიყვანეთ არჩეული სამუშაოს მნიშვნელობა: XLWs. Rows (1). წაშლა. შეინახეთ შესწორებული დოკუმენტი: XLWb. Save. დატოვეთ ღია კოდის პროგრამა: XLAp. Quit.
ნაბიჯი 5
გამოტოვეთ შემდეგი სტრიქონი და შეცვალეთ ცვლადები მეხსიერების ობიექტებით: დააყენეთ XLWs = არაფერი. გაიმეორეთ იგივე ბრძანება თითოეული ღია ცვლადისთვის: დააყენეთ XLWb = არაფერი და ბოლოს ბოლოს: დააყენეთ XLAp = არაფერი. შეასრულეთ ბრძანება სტანდარტული End Sub- ით.
ნაბიჯი 6
გამოიყენეთ მაკროები უფრო რთული ოპერაციების შესასრულებლად, რომ წაშალოთ დოკუმენტში ზედმეტი ხაზები. ამისათვის შექმენით ახალი Excel სამუშაო წიგნი და შეიტანეთ საჭირო მნიშვნელობები. გახსენით პროგრამის ფანჯრის ზედა პანელის "სერვისის" მენიუ და აირჩიეთ "მაკრო" ელემენტი. აირჩიეთ "Visual Basic Editor" ქვეპუნქტი და გააფართოვეთ "Insert" მენიუ. აირჩიეთ "მოდული" პუნქტი და ჩადეთ შექმნილი დოკუმენტი. დაბრუნდით "ინსტრუმენტების" მენიუში და კვლავ გადადით "მაკრო" ერთეულზე. გამოიყენეთ "მაკროები" ქვეპუნქტი და მიუთითეთ ახლად შექმნილი. გაუშვით მაკრო, ღილაკზე გაშვება დააჭირეთ.
