Hoe formule automatisch invullen bij het invoegen van rijen in Excel?
Wanneer u lege rijen invoegt tussen bestaande gegevensrijen, wordt de formule niet gekopieerd en in de nieuwe rij geplakt, u moet deze handmatig slepen of vullen. Maar soms wilt u de formule vullen wanneer u automatisch lege rijen tussen het gegevensbereik invoegt, zoals in het volgende screenshot, in dit artikel zal ik het hebben over enkele snelle trucs om deze taak op te lossen.
Formule automatisch invullen bij het invoegen van lege rijen bij het maken van een tabel
Formule voor automatisch vullen bij het invoegen van lege rijen met VBA-code
Formule automatisch invullen bij het invoegen van lege rijen bij het maken van een tabel
In Excel kan het tabelformaat u helpen om de bovenstaande formule automatisch in de nieuw ingevoegde lege rijen in te vullen, doe dit als volgt:
1. Selecteer het gegevensbereik waarvoor u de formule automatisch wilt invullen en klik vervolgens op Invoegen > tafel, zie screenshot:
2. In de Tabel maken dialoogvenster, controleer het Mijn tabel heeft kopteksten zie screenshot als er kopteksten in uw gegevens staan:
3. Dan klikken OK knop, en de tabel is gemaakt, en nu, wanneer u een lege rij invoegt, wordt de bovenstaande formule automatisch in de nieuwe rij ingevoegd, zie screenshot:
Formule voor automatisch vullen bij het invoegen van lege rijen met VBA-code
Als u de gegevens niet in een tabel wilt wijzigen, kan de onderstaande VBA-code u ook helpen om dit probleem op te lossen.
1. Selecteer het werkbladtabblad dat de formules bevat die u automatisch wilt invullen en klik met de rechtermuisknop om te kiezen Bekijk code vanuit het contextmenu om naar het Microsoft Visual Basic voor toepassingen venster en kopieer en plak de volgende code in de module:
VBA-code: formule voor automatisch vullen bij het invoegen van lege rijen
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
'Updateby Extendoffice 20160725
Cancel = True
Target.Offset(1).EntireRow.Insert
Target.EntireRow.Copy Target.Offset(1).EntireRow
On Error Resume Next
Target.Offset(1).EntireRow.SpecialCells(xlConstants).ClearContents
End Sub
2. Sla vervolgens deze code op en sluit deze, ga terug naar het werkblad. Als u nu dubbelklikt op een cel tussen de gegevens, wordt een nieuwe rij ingevoegd onder de actieve cel en wordt de formule ook automatisch gevuld.
Demo: formule voor automatisch invullen bij het invoegen van lege rijen
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!
