Daten kopieren und im anderen Tabellenblatt wert einfügen

Question

Hallo Leute,

ich möchte per Makro (durch ein Button) einen Wert in Tabelle1 kopieren (A1:DH40) und diesen dann in Tabelle2 als "Wert" einfügen.

Gruß

Answer 1

Hallo,

Sub Werte_Format()
' Formeln ersetzen durch Werte mit Formate
Workbooks("Datei1.xls").Worksheets("Tabelle1").Range("A1:Dh40").Copy
With Workbooks("Datei2.xls").Worksheets("Tabelle1").Range("A1")
.PasteSpecial Paste:=xlValues ' Werte
.PasteSpecial Paste:=xlFormats ' Formate
End With
Application.CutCopyMode = False
End Sub

Gruß Hajo

Answer 2

vielen Dank!!!!!!! hat super geklappt!!!

Gruß
afetinci