VB-Script und Excel Button

[Rouven]

Hello,

ThisWorkbook.Worksheets("Haupt").Copy Worksheets("Haupt") After:=Worksheets("Sheet3")

lass mal das Worksheets("Haupt") weg, du möchtest als Parameter nur das After:= haben. Dafür bin ich relativ sicher, dass du in deiner Mappe kein "Sheet3" 3 hast, also solltest du dort den Namen des Blattes einsetzen, hinter das die Kopie soll.

MfG
Rouven