Vba: hoe waarden alleen te plakken zonder opmaak

U kunt de volgende syntaxis in VBA gebruiken om een specifiek cellenbereik te kopiëren en de waarden alleen op een nieuwe locatie te plakken zonder opmaak:

 Sub PasteNoFormatting()

Range(" A1:D9 ").Copy
Range(" A12 ").PasteSpecial Paste:=xlPasteValues
Application.CutCopyMode = False

End Sub

Deze specifieke macro kopieert de cellen in het bereik A1:D9 en plakt de celwaarden zonder enige opmaak in het bereik, beginnend bij cel A12 .

Opmerking : de regel Application.CutCopyMode = False geeft aan dat de knip- en kopieermodus moet worden uitgeschakeld nadat de macro is uitgevoerd.

Het volgende voorbeeld laat zien hoe u deze syntaxis in de praktijk kunt gebruiken.

Voorbeeld: Plak waarden alleen zonder opmaak met VBA

Stel dat we de volgende gegevensset in Excel hebben die informatie bevat over verschillende basketbalspelers:

Laten we zeggen dat we alle waarden in het bereik A1:D9 willen kopiëren en plakken naar een nieuwe locatie zonder de opmaak.

We kunnen hiervoor de volgende macro maken:

 Sub PasteNoFormatting()

Range(" A1:D9 ").Copy
Range(" A12 ").PasteSpecial Paste:=xlPasteValues
Application.CutCopyMode = False

End Sub

Wanneer we deze macro uitvoeren, ontvangen we de volgende uitvoer:

Merk op dat de originele celwaarden zonder enige opmaak op een nieuwe locatie zijn geplakt.

Opmerking : u kunt hier de volledige documentatie voor de VBA PasteSpecial- methode vinden.

Aanvullende bronnen

In de volgende tutorials wordt uitgelegd hoe u andere veelvoorkomende taken in VBA kunt uitvoeren:

VBA: hoe u de laatst gebruikte regel kunt vinden
VBA: het aantal rijen binnen bereik tellen
VBA: het aantal gebruikte kolommen tellen