Loope igennem kolonner vba
Hej alleJeg har brug for et hint i retning af hvordan jeg looper igennem kolonner.
Sagen er den at jeg har et antal rækker, hvor jeg for hver række har 10 kolonner som skal skrives ud til rækker. Jeg havde tænkt mig at sætte det i nyt ark.
Tanken er at kopiere kolonne A 10 gange, derefter indsætte kolonne H så kolonne I så J etc.
Jeg vil derfor lavet noget i stil med:
(vi er hoppet over nogle variable)
intAntalRk = Range("A2").SpecialCells(xlLastCell).Row
wkbProvision.shtData.Range("A2:A" & intAntalRk).Copy ThisWorkbook.Sheets(1).Range("A2")
wkbProvision.shtData.Range("H2:H" & intAntalRk).Copy ThisWorkbook.Sheets(1).Range("B2")
Men jeg ville jo helst kunne loope sidste statement fra H til P f.eks.
Nogen forslag?