Microsoft Excel

Herbers Excel/VBA-Archiv

paste values per VBA | Herbers Excel-Forum


Betrifft: paste values per VBA von: Deister
Geschrieben am: 25.11.2009 15:23:46

Hallo zusammen,

Ich sitze wieder auf dem Schlauch ;-(

Mit VBA kopiere ich eine Reihe von Formeln. Dann kopiere ich sie wieder als Werte an die gleiche Stelle.

Range("E5:IJ8").Select
Application.CutCopyMode = False
Selection.Copy
Range("E5").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False

Wenn ich die Macro anschliessend laufen lasse bekomme ich immer die Meldung " Do you want to replace the contents of the destination cells". Wie kann ich diese Meldung per VBA unterdrücken?

Danke für die Hilfe

Ant

  

Betrifft: AW: paste values per VBA von: ChrisL
Geschrieben am: 25.11.2009 15:28:59

Hallo

Entweder...
Application.DisplayAlerts = False
Range("E5:IJ8").Select
Application.CutCopyMode = False
Selection.Copy
Range("E5").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Application.DisplayAlerts = True

oder ganz einfach:
Range("E5:IJ5") = Range("E5:IJ5").Value

cu
Chris


  

Betrifft: AW: Danke Chris von: Deister
Geschrieben am: 25.11.2009 15:36:03

Besten Dank Chris,

Application.DisplayAlerts = False
Ist die einfachste Lösung für mich

Gruss
Ant