Vba Xətti Necə Silinir

Mündəricat:

Vba Xətti Necə Silinir
Vba Xətti Necə Silinir

Video: Vba Xətti Necə Silinir

Video: Vba Xətti Necə Silinir
Video: -13- VBA Excel. Простая математика. Арифметические операции. 2024, Bilər
Anonim

Bir VBA xəttinin silinməsi, inkişaf etdiricilər tərəfindən standart və çox istifadə olunan bir prosedurdur. Lakin daha az təcrübəli istifadəçilər üçün bu əməliyyat bəzi çətinliklərə səbəb ola bilər.

Vba xətti necə silinir
Vba xətti necə silinir

Təlimat

Addım 1

Sil əmrini istifadə edərək silmə sətri əmrinin sintaksisini başa düşdüyünüzdən əmin olun. Beləliklə, aktiv hüceyrəni ehtiva edən sətir üçün əmr ActiveCell. EntireRow. Delete kimi görünəcək və bir sıra sətirlərin silinməsi zərurəti onu Sətirlər ("first_line_number: last_line_number") ilə dəyişdirəcəkdir. Sil (Excel üçün).

Addım 2

VBA-da seçilmiş sətri silmək əmri üçün oxşar sintaksisdən istifadə edin, lakin inkişaf etmiş seçimlərlə. Bunu etmək üçün ilk növbədə tələb olunan əməliyyatı müəyyənləşdirin: Private Sub Sil line_Click (). Tələb olunan tətbiqi Dim ea Excel kimi göstərin. Application və tələb olunan iş kitabını seçin Excel e.b. Sonra Dim ews səhifəsini Excel olaraq təyin edin. Düzenlenecek iş səhifəsi sənəd.

Addım 3

Bir sətri atlayın və Set XLAp = CreateObject (Class: = "Excel. Application") daxil edin. Aşağıdakı sətirdə dəqiq yerləşdirməni təyin edin: XLWb = XLAp. Workbooks seçin. Açın ("drive_name: 1.xls") Aşağıdakı dəyəri istifadə edin: Set XLWs = XLWb. ActiveSheet.

Addım 4

Başqa bir sətri atlayın və seçilmiş işin dəyərini daxil edin: XLWs. Rows (1). Silin. Düzəliş edilmiş sənədi qeyd edin: XLWb. Save. Açıq mənbə tətbiqetməsindən çıxın: XLAp. Quit.

Addım 5

Növbəti sətri atlayın və dəyişənləri yaddaş obyektləri ilə əvəz edin: XLWs = Heç bir şey qoymayın. Hər bir açıq dəyişən üçün eyni əmri təkrarlayın: XLWb = Nothing və nəhayət sonuncusu: Set XLAp = Heç bir şey yoxdur. Əmri standart End Sub ilə tamamlayın.

Addım 6

Sənəddəki lazımsız sətirləri silmək üçün daha mürəkkəb əməliyyatlar həyata keçirmək üçün makrolardan istifadə edin. Bunu etmək üçün yeni bir Excel iş kitabı yaradın və lazımi dəyərləri daxil edin. Proqram pəncərəsinin yuxarı alətlər panelinin "Xidmət" menyusunu açın və "Makro" maddəsini seçin. "Visual Basic Editor" alt hissəsini seçin və "Taxmaq" menyusunu genişləndirin. "Modul" maddəsini seçin və yaradılan sənədi daxil edin. "Alətlər" menyusuna qayıdın və yenidən "Makro" maddəsinə keçin. "Makrolar" alt hissəsini istifadə edin və yeni yaradılanı göstərin. Çalıştır düyməsini basaraq makrosu çalıştırın.

Tövsiyə: