Hallo,
ich habe so einen Code geschrieben um eine WerteTabelle von MP2 in das Tabellenblatt "Auswahl" zu kopieren
Aber leider wird iwie nichts rein kopiert.
Ich weiß auch nicht woran das liegen könnte
copx = MsgBox("Wollen sie kopieren ?", vbYesNo, "Whl")
If copx = vbYes Then
Sheets("Auswahl").Range("A1:F15") = Sheets("MP2").ListObjects(1).DataBodyRange
End If
|