lege kolommen verwijderen via macro

[ictopr]

allen;

vermits ik niet zoveel kennis heb van macro's. onderstaande vraag.
ik heb een file waarin een heleboel kolommen staan. op de 1ste lijn staan hier overal gegevens in maar verder is het afhankelijk van de persoon of er gegevens staan.
nu zou ik graag een macro maken dat wanneer er geen gegevens in de kolom staat deze volledig verwijderd wordt inclusief de 1ste lijn mag dan weg.
ik hoop dat jullie mij kunnen helpen.
zal in elke geval het bestandje er bij zetten zodat jullie iets meer informatie hebben om mee te werken.

gtjs

 

[wieter]

Verwijderen van lege kolommen/lege regels lijkt me nogal drastisch, want weg is WEG!!!
Je kan dan het bestand niet meer gebruiken om opnieuw gegevens in te vullen.

Daarom in bijlage een voorbeeldje hoe lege kolommen/regels kunnen verborgen worden.
Door het grote aantal kolommen duurt het wel even voor alles verborgen is.
Regel 3 en kolom KC zet je op verborgen.

Bekijk bijlage kolomverwijderen.xlsm

 

[zapatr]

zie bijlage.
Aangenomen is dat elke kolom een header heeft, zoals in je bestand het geval is.
Toets Ctrl-q om de kolommen te verwijderen.

 

[Cobbe]

Verwijderen van lege kolommen/lege regels lijkt me nogal drastisch, want weg is WEG!!!

Je kan geen kolommen en/of rijen verwijderen.
Je kan enkel de gegevens in die cellen wissen, dus als je een kolom/rij verwijdert wis je in feite enkel de gegevens.
Tegelijkertijd schuif je de resterende gegevens op naar links en of boven.
En je oorspronkelijk werkblad blijft steeds even groot met evenveel kolommen en rijen die je weer kan gebruiken.

 

[ictopr]

bedankt iedereen,

Met het antwoord van Zapatr kan ik perfect verder.

 

[ictopr]

Nu zou ik de macro van Zapatr ook willen uitvoeren op verschillende werkbladen in eenzelfde excel file?

Is dit mogelijk?

groetjes,
Ilse

 

[zapatr]

Dan maak je toch een lusje waarin je de verschillende sheets opneemt.
Om welke bladen gaat het en waar staan die in je bestand?

 

[ictopr]

hier een voorbeeldje. het blad algemeen moet blijven zoals het is. In de andere werkbladen(kan verschillen) moeten de lege kolommen + titel verwijderd worden.

 

[zapatr]

Hier de aanpassing.

 

[ictopr]

Bedankt,

werkt perfect :thumb: