Erik191283
Gebruiker
- Lid geworden
- 13 mei 2015
- Berichten
- 49
Ik heb een bestand waar ik diverse bewerkingen op wil doen. Dit bestand krijg ik maandelijks aangeleverd, maar voor mijn bewerkingen is het handiger als de formules er uit zijn.
Omdat het een bestand betreft met een fors (en steeds verder oplopend) aantal tabbladen wil ik dit graag met een loopje oplossen.
Onderstaande loop heb ik nu gemaakt, maar ik krijg nu de foutmelding:
Als ik dan op OK klik krijg is het woord Paste geselecteerd. Iemand enig idee wat er mis gaat?
(Waarbij wel handig is om te zeggen dat ik mijn kennis van VBA vooral van het internet heb gehaald en bepaald geen specialist ben...)
Omdat het een bestand betreft met een fors (en steeds verder oplopend) aantal tabbladen wil ik dit graag met een loopje oplossen.
Onderstaande loop heb ik nu gemaakt, maar ik krijg nu de foutmelding:
Compileerfout:
Kan het benoemde argument niet vinden
Als ik dan op OK klik krijg is het woord Paste geselecteerd. Iemand enig idee wat er mis gaat?
(Waarbij wel handig is om te zeggen dat ik mijn kennis van VBA vooral van het internet heb gehaald en bepaald geen specialist ben...)
Code:
For Each wsSingleSheet In wbSingleWorkbook.Sheets
wsSingleSheet.UsedRange.Copy_
wwsSingleSheet.PasteSpecial Paste:=xlPasteValues
Next wsSingleSheet