Hi,
ich habe einen Problem und suche nach einer Lösung.
Ich möchte enen sheet senden, jedoch beinhaltet der mergedcells. Eine Debug Meldung mit verweis euf folgende selection erscheint.
Source.Copy
With Dest.Sheets(1)
.Cells(1).PasteSpecial Paste:=8
.Cells(1).PasteSpecial Paste:=xlPasteValues
.Cells(1).PasteSpecial Paste:=xlPasteFormats
.Cells(1).Select
Application.CutCopyMode = False
End With
Ich muss dazu sagen dass ich ein bluttiger Anfänger was VBA angeht bin deshlab Frage ich Euch. Wie kann ich es am besten lösen?
Danke Euch
|