View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
Pointerman Pointerman is offline
external usenet poster
 
Posts: 2
Default Errormessage when button is pressed twice or more

Hi

I created a new button in the Toolbar.
Then I connected the button to my macro.
When I press the button for the first time everything works just fine
Everything to this point happened in document.xls

When I press the button a second time I get a Message that Excel can't find macro file.csv!convert.

The macro does these things
1. it stores the name of the active workbook (which is "document.xls"
2. it saves the active workbook (which should also be "document.xls"
3. it saves a sheet of the workbook as "convert.csv
4. it reopens the file stored in (1) because "convert.csv" is the aktive dokumen
6. it closes ThisWorkbook (Funny but it is still "convert.csv"
5. it calls an extern EXE-File that works with "convert.csv" and finally deletes it (But it doesn't delete it now! It needs user Input!

P.S.: It only happens when the macro is called via a button. Using "run Macro" several times works fine


Here is the code
Sub Konvertieren(
Dim WBName As Strin
Const sPath = "E:\test\
WBName = ActiveWorkbook.FullNam
ActiveWorkbook.Sav
Application.DisplayAlerts = Fals
Sheets("transfer").SaveAs Filename:=sPath & "Convert.csv", FileFormat:=xlCS
Application.DisplayAlerts = Tru
Workbooks.Open WBNam
ThisWorkbook.Close savechanges = n
Shell (sVerzeichnis & "convert.exe"
End Sub