Jag har ett excel-ark med ca 100 kolumner. Nu skulle jag vilja ta bort de kolumner som inte innehåller mer än rubrikraden (rad 1), finns det något snabbare (smartare) sätt än att loopa igenom alla celler och kolla dem? Det enklaste borde varaRader tomma kolumner
Sv: Rader tomma kolumner
for i = 1 to maxcol
if cells(1,i).end(xldown).row = 65535 then
columns(i).delete
i =i-1
end if
next i
Otestat, och funkar inte i kommande versioner av excel. Du skulle också kunna använda worksheetfunction, med "count" och på så sätt räkna antalet ifyllda celler, lite snabbare än manuellt.