Jak automatycznie wypełnić formułę podczas wstawiania wierszy w programie Excel?
Po wstawieniu pustych wierszy między istniejące wiersze danych formuła nie zostanie skopiowana i wklejona do nowego wiersza, należy przeciągnąć lub wypełnić go ręcznie. Ale czasami chciałbyś wypełnić formułę, gdy automatycznie wstawiasz puste wiersze między zakresami danych, jak pokazano na poniższym zrzucie ekranu, w tym artykule omówię kilka szybkich sztuczek, aby rozwiązać to zadanie.
Formuła automatycznego wypełniania podczas wstawiania pustych wierszy podczas tworzenia tabeli
Formuła automatycznego wypełniania podczas wstawiania pustych wierszy z kodem VBA
Formuła automatycznego wypełniania podczas wstawiania pustych wierszy podczas tworzenia tabeli
W programie Excel format tabeli może pomóc w automatycznym wypełnieniu powyższej formuły w nowych wstawionych pustych wierszach, wykonaj następujące czynności:
1. Wybierz zakres danych, dla którego chcesz automatycznie wypełnić formułę, a następnie kliknij wstawka > Stółzobacz zrzut ekranu:
2, w Utwórz tabelę zaznacz Moja tabela ma nagłówki jeśli w danych są nagłówki, zobacz zrzut ekranu:
3. Następnie kliknij OK przycisk, a tabela została utworzona, a teraz, po wstawieniu pustego wiersza, powyższa formuła zostanie automatycznie wstawiona do nowego wiersza, patrz zrzut ekranu:
Formuła automatycznego wypełniania podczas wstawiania pustych wierszy z kodem VBA
Jeśli nie chcesz zmieniać danych w tabeli, poniższy kod VBA również może pomóc w rozwiązaniu tego problemu.
1. Wybierz kartę arkusza zawierającą formuły, które chcesz automatycznie wypełnić, i kliknij prawym przyciskiem myszy, aby wybrać Wyświetl kod z menu kontekstowego, aby przejść do pliku Microsoft Visual Basic for Applications okno, a następnie skopiuj i wklej następujący kod do modułu:
Kod VBA: Formuła automatycznego wypełniania podczas wstawiania pustych wierszy
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. Następnie zapisz i zamknij ten kod, wróć do arkusza roboczego, teraz po dwukrotnym kliknięciu komórki między danymi nowy wiersz zostanie wstawiony pod aktywną komórką, a formuła zostanie również automatycznie wypełniona.
Demo: Formuła automatycznego wypełniania podczas wstawiania pustych wierszy
Najlepsze narzędzia biurowe
Zwiększ swoje umiejętności Excela dzięki Kutools for Excel i doświadcz wydajności jak nigdy dotąd. Kutools dla programu Excel oferuje ponad 300 zaawansowanych funkcji zwiększających produktywność i oszczędzających czas. Kliknij tutaj, aby uzyskać funkcję, której najbardziej potrzebujesz...
Karta Office wprowadza interfejs z zakładkami do pakietu Office i znacznie ułatwia pracę
- Włącz edycję i czytanie na kartach w programach Word, Excel, PowerPoint, Publisher, Access, Visio i Project.
- Otwieraj i twórz wiele dokumentów w nowych kartach tego samego okna, a nie w nowych oknach.
- Zwiększa produktywność o 50% i redukuje setki kliknięć myszką każdego dnia!
