Code abaendern!!
30.03.2004 10:02:32
Petra
ich habe diesen Code, wie muss ich den abaendern, das beim klicken nur einmal ein neues Workbook geoeffnet wird. Jetzt wrd bei jedem klick ein neues Workbook geoffnet.
Private Sub CommandButton11_Click()
Dim appXL As Excel.Application
Dim wkb As Workbook
Set appXL = New Excel.Application
Set wkb = appXL.Workbooks.Add(1)
appXL.Visible = True
End Sub
Koennt ihr mir helfen?
Petra