Fyld Excel tomme rækker makro - Excel-tip

Tak til Mike, der leverede denne uges Excel-spørgsmål:

Jeg prøver at skrive en makro og er ny på dette. Jeg har et Excel-regneark, der er hundredvis af sider langt og mange kolonner bredt. Jeg vil gerne have, at makroen kun søger i "A" -kolonnen efter "" (ingen data) og derefter bruger dataene fra den foregående række, vælger fra kolonne "A" til "CB" og derefter udfylder, indtil den registrerer data i en celle i kolonnen "A". Derefter skal det gentages, indtil alt er gjort.

Makroen nedenfor gør tricket:

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

Men du behøver muligvis ikke bruge en makro til at gøre, hvad du vil. En hurtigere måde er at bruge de tricks, der er introduceret i tip fra 12/12/98 til at opnå det samme uden en makro.

Det første trick er at vælge alle de tomme celler i dit valg. Fremhæv fra A1 til CB i den sidste række af dine data. Vælg Rediger> Gå til> Special> Blanks> OK.

Dernæst vil du indtaste den samme formel i alle disse tomme celler. For at gøre dette skal du trykke på ligetasten, trykke på pil op og derefter holde Ctrl nede og trykke på Enter. Dette replikerer formlen til alle de tomme celler.

Endelig skal du ændre formlerne til værdier. Fremhæv hele dataområdet, vælg Rediger> Kopier, Rediger> Indsæt speciel> Værdier> OK.

Bemærk, at hvis Mikes originale data indeholdt formler eller indeholdt nogle rækker, der delvist var tomme, fungerer denne procedure ikke, det ville være bedre at holde fast i makroen vist ovenfor.