VBA - plakken zonder opmaak

Status
Niet open voor verdere reacties.

mathvhoo

Nieuwe gebruiker
Lid geworden
17 mrt 2015
Berichten
1
Ik zou graag content vanuit de worksheet maar ook vanaf internet (html) plakken zonder opmaak.
Hieronder mijn code, die ergens de mist ingaat, wat doe ik fout?


Code:
Sub plakken()
'
' plakken Macro
' plakken
'
' Sneltoets: Ctrl+v
'
On Error GoTo ErrorHandler
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks:=False, Transpose:=False



 Exit Sub
ErrorHandler: ActiveSheet.PasteSpecial Format:="Text", Link:=False, DisplayAsIcon:=False

Exit Sub
End Sub
 
De dubbele punt weglaten om mee te beginnen?

Met vriendelijke groet,
Willie roelofs
 
Math,

Je kunt geen Paste of PasteSpecial gebruiken zonder dat je eerst .Copy hebt gebruikt.
Komen de gegevens uit een worksheet, eerst dus Range.Copy gebruiken.

Veel Succes.
 
kopiëren zonder plakken

Code:
sub M_snb()
   with selection
      cells(1,20).resize(.rows.count,.columns.count)=.value
   end with
End Sub
 
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan