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 One final question


I would just like to thank everyone that responded to my questions ove
the past few days, and putting up with my ignorance!
The program that I was working on is finally finished, except for on
thing-
When i activate the macro below, it will save all the worksheets, an
then display the save-as window as it is suppose to. If i cancel it a
this point and don't name it, it will close the program and save i
with its base name in a value format, which means i loose all th
formulas in the program.
Is there a way to safe guide the base program and this from happening?
Secondly, I would like to learn more about Visual Basics, could anyon
advise me on what would be a good way to learn the basics
legepe


Sub special()
Dim wsheet As Worksheet
With Application
.ScreenUpdating = False
.DisplayAlerts = False
.Dialogs(xlDialogSaveAs).Show
For Each wsheet In Worksheets
wsheet.Unprotect
With wsheet.UsedRange
.Copy
.PasteSpecial xlPasteValues
End With
wsheet.Protect
Next wsheet
.ScreenUpdating = True
.DisplayAlerts = True
End With
ActiveWorkbook.Close True
End Su

--
legep
-----------------------------------------------------------------------
legepe's Profile: http://www.excelforum.com/member.php...fo&userid=1548
View this thread: http://www.excelforum.com/showthread.php?threadid=27255

 
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
Final attempt save as binary question Kevryl Excel Discussion (Misc queries) 6 June 1st 10 07:17 AM
Final day of month B Excel Worksheet Functions 3 July 25th 07 12:49 AM
My Final #DIV/0! that I'd like to say Goodbye to! Dan the Man[_2_] Excel Worksheet Functions 20 July 23rd 07 05:40 PM
some final help rbekka33[_19_] Excel Programming 1 September 23rd 04 01:19 PM
Help Finding the Final Row No Name Excel Programming 7 May 21st 04 03:13 AM


All times are GMT +1. The time now is 05:16 PM.

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"