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 Properties vanuit het rechtsklikmenu.
3. In de Properties 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 Sub
Note: 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?
Beste Office-productiviteitstools
Geef uw Excel-vaardigheden een boost met Kutools voor Excel en ervaar efficiëntie als nooit tevoren. Kutools voor Excel biedt meer dan 300 geavanceerde functies om de productiviteit te verhogen en tijd te besparen. Klik hier om de functie te krijgen die u het meest nodig heeft...
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 honderden muisklikken voor u elke dag!