Cum să utilizați VBA pentru a insera rânduri în Microsoft Excel: 3 cei mai buni pași

Automatizarea unei foi Excel folosind limbajul de programare Visual Basic este populară printre utilizatorii avansați de Excel, companiile și dezvoltatorii. Acțiunile bazate pe VBA, de exemplu, VBA insert row vor adăuga automat rânduri cu un singur clic.

În plus, Excel VBA poate insera rânduri în conformitate cu o logică specifică, cum ar fi inserarea unui rând atunci când a treia coloană este goală, inserarea rândurilor după celula activă în prezent și așa mai departe. Prin urmare, continuați să citiți pentru a afla cum să utilizați VBA pentru a insera rânduri într-o foaie de lucru Excel.

1. Folosiți VBA pentru a insera rând: Single și Multiple

Puteți scrie cod VBA simplu pentru a insera unul sau mai multe rânduri după referințele de celule desemnate folosind metoda Insert și proprietatea EntireRow a editorului Excel VBA.

Iată pașii pe care îi puteți încerca împreună cu codurile VBA:

• Deschideți registrul de lucru Excel țintă și accesați orice foaie de lucru Excel în care doriți să inserați un rând.
• Apăsați Alt+F11 pentru a afișa editorul Excel VBA.
• În editorul de cod, căutați fila Inserare din secțiunea de meniu și faceți clic pe ea.
• Acum, faceți clic pe Modul pentru a deschide un modul gol de editare a codului VBA.
• Copiați și lipiți codul VBA menționat mai jos pentru a insera un singur rând. Puteți modifica intervalul de celule dacă doriți să inserați rândul într-o altă locație.

Sub vba_insert_row() Range("A3").EntireRow.Insert End Sub

După ce ați terminat de tastat codul, apăsați F5 pentru a executa macrocomanda VBA. Un nou rând va apărea în referința de celulă pe care ați menționat-o în codul VBA.

Pentru a insera mai multe rânduri, modificați referința celulei de la o adresă de celulă la un interval de celule. De exemplu, aveți nevoie de două rânduri între A3 și A6 , introduceți A4:A5 ca referință pentru celulă. Codul VBA va arăta ca acesta după ce introduceți intervalul de celule:

Sub vba_insert_row() Range("A4:A5").EntireRow.Insert End Sub

2. Folosiți VBA pentru a Insert Row: New Copied Row

Puteți folosi următorul cod mic pentru a copia un rând și a-l lipi într-o altă locație.

Sub vba_insert_row() Rows(4).Copy Rows(6).Insert Shift:=xlShiftDown End Sub

Dacă rulați acest cod, Excel va copia rândul A4 și îl va lipi între rândul A5 și A7 , care este A6 . Trebuie să rețineți că modificările automate bazate pe VBA nu pot fi anulate folosind comanda Ctrl+Z . Trebuie să ștergeți manual modificările.

3. Folosiți VBA pentru a insera rând: fără formatare

Să presupunem că doriți să inserați un rând între două rânduri fără a copia formatarea din rândurile adiacente. Puteți face acest lucru cu ușurință rulând acest cod de rând de inserare VBA:

Sub vba_insert_row() Rows(5).EntireRow.Insert Rows(5).ClearFormats End Sub

La rularea scriptului VBA menționat mai sus, va apărea un rând gol și fără formatare acolo unde doriți.

Cuvinte finale

S-ar putea să vă fie mai ușor să inserați rânduri în fișiere Excel mici folosind funcțiile Inserare sau meniul contextual cu clic dreapta. Cu toate acestea, dacă lucrați la analiza de date mari sau la o foaie Excel cu mii de rânduri, inserarea manuală a rândurilor devine un proces care necesită timp. Aici, puteți aplica codurile de rând VBA menționate mai sus pentru a economisi timp.

Căutați mai multe lucruri distractive pe care Excel VBA le poate face pentru dvs.? Iată încă una pentru dvs.: verificarea ortografică în Excel simplificată cu VBA.