LinkBack Thread Tools Search this Thread Display Modes
Prev Previous Post   Next Post Next
  #1   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 1
Default Save as not working


Please I really need some help... Yesterday I made a post but I must not
have explained the problem well enough.. no response.. let me try
again.

The code follows..(yesterdays did not include the beginning)

When I first get turn on my computer in the morning the following code
will fail at "save as".... If i create a manual dummy excel file and
manually save it to the ftp sight... that save will work... then I can
go back to the workbook that contains the macro and then it works just
fine....

I am running windows 2000 it had been run on a machine that is running
xp with the same result.. and one machine with xp that it worked fine
on..
(It was written using excel 2000)

I need any suggestion I can get... there is something here that I do
not understand...

ub SUBMIT()
'
' SUBMIT Macro
' Macro recorded 12/27/2005 by Randy
'

'
Application.DisplayAlerts = False
Application.ScreenUpdating = False
Sheets("system order").Select
Cells.Select
Selection.Copy
Workbooks.Add
Range("A1").Select
Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone,
SkipBlanks:= _
False, Transpose:=False
Sheets(Array("Sheet2", "Sheet3")).Select
Sheets("Sheet2").Activate
Application.CutCopyMode = False
ActiveWindow.SelectedSheets.Delete
Dim sStr As String
sStr = "ftp://(this has the ftp address signon and passwork/"
sStr = sStr & _
ActiveWorkbook.Worksheets(1) _
..Range("a2").Text
sStr = sStr & "_"
sStr = sStr & Format(Now, "mm-dd-yy_hh-mm")
sStr = sStr & ".csv"
ActiveWorkbook.SaveAs _
Filename:=sStr, FileFormat:=xlCSV
ActiveWorkbook.Close
ActiveWorkbook.Close
Application.DisplayAlerts = True
Application.ScreenUpdating = True
End Sub


--
RANDY IN NC
------------------------------------------------------------------------
RANDY IN NC's Profile: http://www.excelforum.com/member.php...o&userid=29778
View this thread: http://www.excelforum.com/showthread...hreadid=511041

 
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
Disable Save/Save As - not working? Silena K-K Excel Discussion (Misc queries) 3 December 11th 07 03:09 PM
Prompt to save changes not working JaeEmAre Excel Discussion (Misc queries) 0 August 15th 06 04:03 PM
Save as isn't working Kim Excel Discussion (Misc queries) 1 April 21st 06 09:30 PM
What do you do if you have auto save set, but it is not working? Jennifer Excel Discussion (Misc queries) 3 September 16th 05 06:15 PM
Worksheet Buttons (Save, Save As, Cut, Paste, etc.) Not Working SuzieQ12345 Excel Worksheet Functions 5 January 21st 05 02:57 PM


All times are GMT +1. The time now is 08:56 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
Copyright ©2004-2025 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"