Hoe automatisch een lege nieuwe rij invoegen met de Command-knop in Excel?
In veel gevallen moet u mogelijk een lege nieuwe rij invoegen op een opgegeven positie in uw werkblad. In dit artikel laten we u zien hoe u automatisch een lege nieuwe rij invoegt door op een opdrachtknop in Excel te klikken.
Voeg automatisch een lege nieuwe rij in met de Command-knop
Voeg automatisch een lege nieuwe rij in met de Command-knop
U kunt de volgende VBA-code uitvoeren om een lege nieuwe rij in te voegen door op een opdrachtknop te klikken. Ga als volgt te werk.
1. Ten eerste moet u een Command-knop invoegen. Klik alstublieft Ontwikkelaar > Invoegen > Commandoknop (ActiveX-besturingselement). Zie screenshot:
2. Teken vervolgens een Command-knop in het werkblad dat u nodig hebt om nieuwe rijen toe te voegen, klik met de rechtermuisknop op de Command-knop en klik Vastgoed vanuit het rechtsklikmenu.
3. In de Vastgoed dialoogvenster, voert u de weergegeven tekst van de Command-knop in het Onderschrift doos onder de Gecategoriseerd tabblad en sluit vervolgens het dialoogvenster.
U kunt zien dat de weergegeven tekst van de Command-knop is gewijzigd zoals onderstaand screenshot.
4. Klik nogmaals met de rechtermuisknop op de Command-knop en klik vervolgens op Bekijk code vanuit het rechtsklikmenu.
5. Vervolgens de Microsoft Visual Basic voor toepassingen -venster, vervangt u de originele code door de onderstaande VBA-code in het Code venster.
VBA-code: voeg automatisch een lege nieuwe rij in met de Command-knop
Private Sub CommandButton1_Click()
Dim rowNum As Integer
On Error Resume Next
rowNum = Application.InputBox(Prompt:="Enter Row Number where you want to add a row:", _
Title:="Kutools for excel", Type:=1)
Rows(rowNum & ":" & rowNum).Insert Shift:=xlDown
End SubOpmerking:: In de code is CommanButton1 de naam van de Command-knop die u hebt gemaakt.
6. druk op anders + Q toetsen tegelijk om het Microsoft Visual Basic voor toepassingen venster. En zet het Ontwerpmodus onder de Ontwikkelaar Tab.
7. Klik op de ingevoegde Command-knop en een Kutools for Excel dialoogvenster verschijnt. Voer een bepaald rijnummer in waar u een lege nieuwe rij wilt toevoegen en klik vervolgens op OK knop. Zie screenshot:
Vervolgens wordt de lege nieuwe rij ingevoegd op een opgegeven positie van uw werkblad, zoals onderstaand screenshot. En het behoudt de celopmaak van de bovenstaande cel.
Gerelateerde artikelen:
- Hoe de Command-knop te gebruiken om een actief werkblad op te slaan als PDF-bestand in Excel?
- Hoe cel opmaken om eruit te zien als een 3D-knop in Excel?
- Hoe een opdrachtknop te verbergen of zichtbaar te maken op basis van de opgegeven celwaarde in Excel?
De beste tools voor kantoorproductiviteit
Kutools voor Excel lost de meeste van uw problemen op en verhoogt uw productiviteit met 80%
- visfuik: Snel invoegen complexe formules, grafieken en alles wat je eerder hebt gebruikt; Versleutel cellen met wachtwoord; Maak een mailinglijst en stuur e-mails ...
- Super Formula-balk (bewerk eenvoudig meerdere regels tekst en formule); Lay-out lezen (gemakkelijk grote aantallen cellen lezen en bewerken); Plakken in gefilterd bereik...
- Voeg cellen / rijen / kolommen samen zonder gegevens te verliezen; Gespleten cellen inhoud; Combineer dubbele rijen / kolommen... Voorkom dubbele cellen; Vergelijk Ranges...
- Selecteer Dupliceren of Uniek Rijen; Selecteer lege rijen (alle cellen zijn leeg); Super zoeken en fuzzy zoeken in veel werkboeken; Willekeurige selectie ...
- Exacte kopie Meerdere cellen zonder de formuleverwijzing te wijzigen; Maak automatisch verwijzingen naar meerdere bladen; Plaats kogels, Selectievakjes en meer ...
- Extraheer tekst, Tekst toevoegen, Verwijderen op positie, Ruimte verwijderen; Paging-subtotalen maken en afdrukken; Converteren tussen celinhoud en opmerkingen...
- Super filter (bewaar en pas filterschema's toe op andere bladen); Geavanceerd sorteren per maand / week / dag, frequentie en meer; Speciaal filter door vet, cursief ...
- Combineer werkmappen en werkbladen; Tabellen samenvoegen op basis van sleutelkolommen; Gegevens splitsen in meerdere bladen; Batch Converteer xls, xlsx en PDF...
- Meer dan 300 krachtige functies. Ondersteunt Office / Excel 2007-2019 en 365. Ondersteunt alle talen. Eenvoudig te implementeren in uw onderneming of organisatie. Gratis proefperiode van 30 dagen met volledige functies. 60 dagen geld-terug-garantie.
Office-tabblad Brengt een interface met tabbladen naar Office en maakt uw werk veel gemakkelijker
- Schakel bewerken en lezen met tabbladen in Word, Excel, PowerPoint in, Publisher, Access, Visio en Project.
- Open en maak meerdere documenten in nieuwe tabbladen van hetzelfde venster in plaats van in nieuwe vensters.
- Verhoogt uw productiviteit met 50% en vermindert elke dag honderden muisklikken!
