Wypełnij makro pustych wierszy programu Excel - porady programu Excel

Spisie treści

Podziękowania dla Mike'a, który zadał w tym tygodniu pytanie dotyczące programu Excel:

Próbuję napisać makro i jestem w tym nowy. Mam arkusz kalkulacyjny Excela, który ma setki stron i wiele kolumn. Chciałbym, aby makro przeszukało tylko kolumnę „A” pod kątem „” (brak danych), a następnie wykorzystało dane z poprzedniego wiersza, wybierając z kolumn „A” do „CB”, a następnie wypełniało, aż wykryje dane w komórka w kolumnie „A”. Następnie trzeba to powtórzyć, aż wszystko zostanie zrobione.

Poniższe makro załatwi sprawę:

Public Sub CopyDown() LastRow = Range("A65536").End(xlUp).Row For i = 1 To LastRow If Range("A" & i).Value = "" Then Range("A" & i - 1 & ":CB" & i - 1).Copy Destination:=Range("A" & i) End if Next i End Sub

Ale być może nie będziesz musiał używać makra, aby robić to, co chcesz. Szybszym sposobem jest użycie trików wprowadzonych w tipie z 12/12/98, aby osiągnąć to samo bez makra.

Pierwsza sztuczka polega na zaznaczeniu wszystkich pustych komórek w zaznaczeniu. Podświetl od A1 do CB w ostatnim wierszu danych. Wybierz Edycja> Idź do> Specjalne> Puste> OK.

Następnie chcesz wprowadzić tę samą formułę we wszystkich tych pustych komórkach. Aby to zrobić, naciśnij klawisz równości, naciśnij strzałkę w górę, a następnie przytrzymaj Ctrl i naciśnij Enter. Spowoduje to skopiowanie formuły do wszystkich pustych komórek.

Na koniec zmień formuły na wartości. Podświetl cały zakres danych, wybierz Edycja> Kopiuj, Edytuj> Wklej specjalnie> Wartości> OK.

Zwróć uwagę, że jeśli oryginalne dane Mike'a zawierały formuły lub niektóre wiersze, które były częściowo puste, ta procedura nie zadziała, lepiej byłoby trzymać się makra pokazanego powyżej.