Met een knop wordt "Blad1" gekopieerd naar een nieuw blad.
Het is de bedoeling dat de kopie identiek is qua formaat, lettergrootte, voorw.opmaak enz..
Ondanks onderstaande code, is de kopie niet identiek.
Wat is er fout?
Het is de bedoeling dat de kopie identiek is qua formaat, lettergrootte, voorw.opmaak enz..
Ondanks onderstaande code, is de kopie niet identiek.
Code:
With Sheets(tabnaam).Range("A1")
.PasteSpecial xlPasteValues
.PasteSpecial xlPasteColumnWidths
.PasteSpecial xlPasteFormats
.Range("A1").Select
End With