Excel VBA Rij invoegen

Aangezien er twee dingen in dit woord zijn, is één VBA en de andere is Rij invoegen. Hierin zal ik uitleggen hoe rij in Excel kan worden ingevoegd met VBA (Visual Basic for Applications).

VBA - Het is een programmeertaal voor degenen die in Excel en andere Office-programma's werken, dus men kan taken in Excel automatiseren door zogenaamde macro's te schrijven. Met behulp van VBA-codering kunnen we alle taken uitvoeren die we in Excel uitvoeren, zoals kopiëren, plakken, verwijderen, enz.

Rij invoegen - Het wordt gebruikt om een ​​rij in Excel tussen een andere rij in te voegen met behulp van automatisering, dwz met één klik.

Stel dat we de gegevens van de werknemer in Excel invoeren en we hebben een aantal werknemers overgeslagen en willen de gegevens van de ontbrekende gegevens ertussen invoegen, dus moeten we een spatie maken en een rij invoegen om hun gegevens in te voeren. In plaats van rij één voor één in te voegen, kunnen we de taak automatiseren om rijen in te voegen met VBA en macro's te maken.

Er zijn veel manieren waarop we de rijen kunnen invoegen met behulp van VBA-codering. De functie die wordt gebruikt voor het invoegen van een rij in VBA is:

Range (). Row (). EntireRow.Insert

Laten we eens kijken dat we een gegevensset hebben die bestaat uit kolommen zoals klantnaam , product, verkoop, hoeveelheid, verzendkosten, orderprioriteit.

Stel dat we de kolommen naar beneden moeten schuiven om een ​​nieuwe rij tussen 3 en 4 in te voegen om een ​​nieuw ontbrekend record in te voegen. In plaats van rij één voor één in te voegen, automatiseren we dit om alle 3 rijen met één klik in te voegen.

Hoe rijen invoegen in Excel VBA?

Hieronder staan ​​de verschillende voorbeelden om rijen in Excel in te voegen met behulp van VBA-code.

U kunt deze VBA-rij Excel-sjabloon hier downloaden - VBA-rij Excel-sjabloon invoegen

Voorbeeld # 1 - De hele rij gebruiken

Volg de onderstaande stappen om Rijen in Excel in te voegen met behulp van VBA-code.

Stap 1: Om een ​​macro te maken, moeten we het tabblad Ontwikkelaars selecteren.

Stap 2: Nadat het tabblad Ontwikkelaars is geopend, voegt u een knop in uit de groep Besturing. Klik op Invoegen en selecteer de eerste optie van ActiveX-besturingselementen. Zoals je die opdrachtknop kunt zien.

Stap 3: Sleep de pijl naar een willekeurige cel om een ​​opdrachtknop te maken.

Stap 4: Om de invoegfunctie in te voeren Klik met de rechtermuisknop op de knop Comand dwz 3 rijen invoegen en klik op Code bekijken.

Stap 5: Wanneer u op de View code klikt, verschijnt de volgende code.

Code:

 Private Sub CommandButton1_Click () End Sub

Stap 6: We moeten onze code van INSERT ROW schrijven. Zoals eerder vermeld, moeten we de functie Rows.EntireRow met RANGE in VBA gebruiken. In deze code moeten we 3 tussen 3 en 4 invoegen.

Code:

 Private Sub CommandButton1_Click () Bereik ("A3"). Rijen ("3: 5"). CompleteRow.Invoegen End Sub

In de bovenstaande coderegel is A3 een kolom waarin we rijen moeten invoegen en Rijen (3: 5) moeten we 3 nieuwe rijen invoegen.

Stap 7: Voer de code uit door te klikken op de opdrachtknop 3 rijen invoegen .

Voorbeeld # 2 - Rijnummers gebruiken

Evenzo zullen we een code schrijven om 2 rijen in te voegen met een klik op een knop.

Hierin moeten we rij van startrij tot eindrijnummer vermelden met RANGE gevolgd door INSERT waarmee de rijen worden ingevoegd.

Code:

 Private Sub CommandButton2_Click () Bereik ("3: 4"). Voer End Sub in

Als we op de knop "2 rijen invoegen" klikken, zien we dat er 2 rijen zijn ingevoegd tussen de 3e en 4e rij.

Op dezelfde manier kunnen we onze functie aanpassen om zoveel rijen in te voegen als we kunnen.

Voorbeeld # 3 - Actieve cel gebruiken

Actieve cel betekent de cel die momenteel is geselecteerd. We zullen actieve cel gebruiken om rijen in te voegen. Stel dat we ons op cel B3 bevinden en de cel erboven willen invoegen, gebruiken we de actieve celeigenschap. We gebruiken de volgende code voor de actieve cel.

Code:

 Private Sub CommandButton3_Click () ActiveCell.EntireRow.Invoegen End Sub

Wanneer we op de knop "Actieve celeigenschap" klikken, zien we dat één cel boven de geselecteerde cel wordt ingevoegd. In het bovenstaande hebben we B5 geselecteerd en hieronder kunnen we zien dat er één rij boven wordt ingevoegd.

Voorbeeld # 4 - Actieve cel met offset gebruiken

Stel dat we een rij na 3 rijen van de actieve cel willen invoegen, hiervoor zullen we de OFFSET-functie gebruiken. Stel dat we ons in cel B4 bevinden en rij na 2 rijen moeten invoegen, we zullen deze code gebruiken.

Code:

 Private Sub CommandButton4_Click () ActiveCell.Offset (2, 0) .EntireRow.Invoegen End Sub

Wanneer we op de knop "Actieve cel met offset" klikken, wordt een rij ingevoegd in B6.

Dingen om te onthouden

  • Het wordt gebruikt om rijen in Excel in te voegen door het te automatiseren.
  • VBA-rij invoegen wordt gebruikt met RANGE-object in VBA.
  • Schakel voordat u gaat werken de optie 'Alle macro's inschakelen' in de macro-instellingen in.

Aanbevolen artikelen

Dit is een handleiding voor VBA Rij invoegen. Hier bespreken we hoe Rij in Excel kan worden ingevoegd met behulp van VBA-code, samen met praktische voorbeelden en een downloadbare Excel-sjabloon. U kunt ook de volgende artikelen bekijken voor meer informatie -

  1. Voorbeelden van VBA GetObject-functie
  2. Excel Meerdere rijen invoegen (Excel-sjabloon)
  3. Hoe de VBA StrConv-functie te gebruiken?
  4. Handleiding voor Excel Rij-snelkoppeling invoegen

Categorie:

VBA