Markro macht mich verrückt!?!?!?
26.08.2004 10:23:14
Sebastian
bin langsam am verzweifeln. Hab schon zick Sachen ausprobiert. ABer nix klappt. Will folgendes Makro dahin gehend abändern, dass das kopierte Blatt in meinem aktuellen Excel File in das erste Blatt kopiert wird (und nicht wie jetzt dass ein neues Blatt eingefügt wird). Hoffentlich kann mir jemand helfen.
Danke. Ich hoffe auf euch Profis.
Gruß Sebastian
Sub CommandButton13_Click()
Dim wbkAlt As Workbook
Dim wbkNeu As Workbook
Dim wbkAltName
Dim wks As Worksheet
Dim Rng As Range
Application.ScreenUpdating = False
Set wbkAlt = ActiveWorkbook
wbkAltName = ActiveWorkbook.Name
Workbooks.Open "C:\CEE Actuals with Assessment Bot.Up.xls"
Set wbkNeu = ActiveWorkbook
Sheets("SUM_CEE").Copy after:=Workbooks(wbkAltName).Sheets(1)
wbkNeu.Close savechanges:=False
Application.ScreenUpdating = True
End Sub