I have a workbook with several users. I'd like to present the user with a message when he/she hits the save or save as button, such as "Have all entries been verified?" with a yes or no option.Need to allow save when either button (yes or No) is entered.
View 9 RepliesIs there a way to create a pop-up warning before saving when certain conditions are met in certain cells (e.g., cells contain specific texts).
View 7 Replies View RelatedI have a spreadsheet that imports data, manipulates it then deletes 2 of the sheets then saves the file under a different name to the network. Is there any way to save this new worksheet without it storing the macros - so when the user open it, only the data is there and they get no prompt to enable macros?
View 6 Replies View RelatedI have created a form in a worksheet which I have added questions too and then locked all cells except the ones where I want the answers in.
I have then added a button to the bottom of the sheet called "Print and Save". This work sheet is called "form"
On a second sheet called "database", I have all the titles of the questions running from a -> k and nother else.
What I want to happen is the user input the information on "form" into the boxes available. Once they have completed the questions, I want them to be able to click on "Print and Save" so that firstly the page "form" prints, and then for all of the answers to be saved in "database" below the titles for each question.
I have had a play, but just don't know where to start. Also, once there is a row of questions below the titles, I don't want it to overwrite information already there, it needs to go onto the next empty row available.
Attached is my excel file.
You will see in the code that I have the code for printing.. I just found this on the net and it seems to work fine for me.
How do you add icons into a message box. ie a warning triangle etc.
View 3 Replies View RelatedI'd like to be able to just open the spreadsheet up and have the macros already saved in there. Is there a way to save these macros?
View 2 Replies View RelatedI have been making and so i thought saving a module however every time i close the spreadsheet that module is associated with it deletes. is there any way to prevent this from happening.
Also when trying to edit on PERSONAL.XLSB!Module1 i get a particular error stating
"cannot edit a macro on a hidden workbook. Unhide the workbook using the Unhide command."
The aim of the macro is to save all the sheets in .txt files named as the original sheets.
View 3 Replies View RelatedThe dialog box comes up with file name formatted correctly and shows .xls as file type but when you choose save the dialog box disappears as if the file was saved but the file never gets saved.
View 3 Replies View RelatedI am trying to write a script to import, reformat and save sales files for upload into our master server and had a question.
how to make it store a range as a dim to use later. I would use
Code:
Range(ActiveCell,ActiveCell.End(x1 Down)).Select
on all the columns, but there are often blanks in many of the rows and I am worried about potential errors.
There is a column which always has all of the rows populated, so I was hoping to could store the range of that column and use it for all the others, so they all match length.
Is there a way to save a formula in Excel, or do I need to use the macro function. I would rather not use a macro due to how simple the formula is but I use it often enough that I do not want to retype it each time.
View 9 Replies View RelatedI'm rather new at VBA
I have a small workbook with a userform and some buttons. Each time I press a button a counter increases and the workbook is saved.
This saving seems much too long for such a small file.
I use
Activeworkbook. save
I have two worksheets in a spreadsheet but after I use it I want to be able to click a button and just save Sheet2 Alone. Can I do this.
I have this that works but would need to change it up to just save sheet2
Public FilePath As String
Sub SaveAs()
Dim strSaveAsFile As String, fp As String
FilePath = ""
' Change the FilePath to suit
fp = "S:Depot Outgoing"
Call MakeFolders(fp)
Call MakeFolders(Format(Date, "yyyy") & "")
Call MakeFolders(Format(Date, "mmm yyyy") & "")
Call MakeFolders(Format(Date, "mmm dd") & "")
strSaveAsFile = UCase(ActiveSheet.[B8].Value) & ".xls"
ActiveWorkbook.SaveAs FilePath & strSaveAsFile, xlWorkbookNormal
FilePath = ""
End Sub
I have 2 sheets in a spreadsheet I would like to Save Sheet2 ("Packing Slip") ONLY!
If I can I am trying something like this.
Public FilePath As String
Sub SaveAs()
Dim strSaveAsFile As String, fp As String
FilePath = ""
' Change the FilePath to suit
fp = "S:Projects"
Call MakeFolders(fp)
Call MakeFolders("PCAR " & Format(Date, "yyyy") & "")
Call MakeFolders("PCAR " & Format(Date, "yyyy") & " OUTGOING" & "")
Call MakeFolders(UCase(Format(Date, "mmm yyyy") & "")).........................
I work with alot of reports that are pulled directly from an application.
On each report i need to 'Alt=' at each cost center so that all manual changes are picked up.
However as you can imagine with thousands of rows this could take a while and be very tedious. Is there a quick way to do it?
Subtotals will not work because the costcenters will appear in the same column as the employee numbers.
I have excel 2003 for XP and I have a excel file that is a csv. I used easyfilter to filter my results. (I wanted to delete complete rows that had no information in a certain field in column) Everytime I complete the task and try to save it, it tells me file.csv may contain features that are not compatible with csv do you want to keep the workbook is this format? -to keep this format, which leaves out any incompatible features, click yes. -to preserve the features, click no. then save a copy in the lastest excel format.
My question is this...is there a way to bypass this? Is there a simpler way to delete those rows without using easyfilter so that I can save it after the rows have been deleted.
I have an Excel doc with ~20 tabs. Each type represents 1 type of activities (soccer, tennis, etc). The size of the file (with the 20 tabs) is pretty significant (>1mb), which jams our email traffic.
Is it possible to:
- keep this workbook with the 20 tabs when open by the user;
- let the user select and fill in whatever tab he needs (just one at a time);
- have a button for the user to click that will save only this tab with a different filename (therefore, when sent by email, the file should be pretty small).
I tried to implement many other Saveas macros into it. from other post and members. I can't seem to get it to work. As the macro is, It saves the copy to My Documents. But, I need it to save to the dierctory below. Any help will be appreciated.
',//Tom's-srv01sharedQC DocumentsCustomer Inspection Reports
Sub myBuildDupWB1() 'Static Inprocess
ThisWorkbook.Unprotect
Dim sht As Object
Dim strMyNewWB$, strMyOldWB$
On Error GoTo myErr
strMyOldWB = ThisWorkbook.Name
Workbooks.Add
strMyNewWB = InputBox("New Customer Part Name, below:", "Name Workbook!", "Rename Blank InProcess Op")...........
code for saving individual sheets from a list box, i have the code to print individual sheets but i need to be able to save a selection of sheets at one time to a given file.
View 9 Replies View RelatedI have a form which has col A Surname Col D Post Code Col E The month (for example)
through a formular this gives the unic customer reference number surnamepostcodemonth given in col G but when I save the document I have to copy and paste the value in G1 for the file name is there away of pressing Save As and it auto fills the file name?
the actual value in the field G1 is
='Raw Data'!D2&" "&'Raw Data'!E2&" "&TEXT(('Raw Data'!F2),"MMMYY")&" "&'Raw Data'!G2
I obviously want the result "Smith TW6 Jul09" to be the file name when I save it..
Every year I set up a database for all types of info gathered during the week, this info gets sent to various people around the company on Sunday nights. The workbook has 52 sheets, one for each week.
Normally I type in the week ending date on every sheet, or I have =Sheet1!A1+7 in sheet 2 and so on. Is there anyway I can add the date on sheet 1 and make it put the correct week ending date in the same cell in all subsequent sheets.
if it is possible to save just one sheet out of a workbook. I suppose it would save as a whole new workbook with just that one sheet, which is fine.. but is there a command that does this?
View 9 Replies View Relatedhow to set up a macro that will close my workbook without saving.
View 3 Replies View RelatedI would like to create a button on a toolbar to save my spreadsheet in 2 locations (always going to be the same, just the file name will change).
View 5 Replies View RelatedEverytime this meant that I had to start from scratch in order to have my customized toolbars. This is a bit inconvenient.
Can I simply save some file (containing my XL toolbar settings) from some location and if I ever run into such a situation again, I can simply copy the saved file back into the same folder...
Thanks in advance for your help and BTW would the solution work the same way for different Excel versions or?? My O/S is XP and I use both Excel 2003 (once in a while I also use Excel 97 but that is installed on my other old pc).
Is there a way to automatically save a template as an xls file using the macro below?
ThisWorkbook.Activate
Sheets(" SCHEDULE").Select
ChDir "C:Documents and SettingsChrisDesktopRainforestMASTER LABOR"
ActiveWorkbook.SaveAs Filename:=Sheets("Schedule"). Range("v77").Value
I am trying to make a code that was written for the master schedule available when the workbook is renamed?
I try to save another workbook, say Book_B, inside a BeforeSave routine for say Workbook A. It works fine when triggered by the CommandBar for saving A, but skips the "Save" when triggered by saving A from another workbook, say Book_1. Is this my fault, or some inherent limitation in Excel, and if so:
Following is some simplified code to illustrate the situation:
This is the code for Book_A:
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
Dim fName As String
fName = "Book_C"
For Each w In Workbooks
If w. Name = "Book_B.xls" Then w.SaveAs Filename:=fName
Next w
End Sub
This is the code for Book_1:
Sub Book_A_saving()
For Each w In Workbooks
If w.Name = "Book_A.xls" Then w.Save
Next w
End Sub
I cannot Save my updates and fixes to that Workbook only.
'The macro code uses
Sub Macro1 ()
' over 1000 lines of codes, Loops/Do Until etc
'5-10 worksheets
'3-4 modules with various calculations
Activeworkbook. Save
Macro2
End Sub
I transfered everything to a new workbook, it ran and Saved ok for a while, but each time
I add more lines of code the same error will occur and a message will appear
with "sorry for the inconvenience Excel needs to shutdown", with an error log as long as a football field stating jargon beyond my understanding.
It does not do this error on any other workbook.
Version is Office 2000 ( 9.0.2720 )
I'm trying to close a workbook without saving it. But everytime I get the message box popupped twice.
These are the codes that I use:
VB:
Private Sub Workbook_BeforeClose _(Cancel As Boolean)
Dim YesOrNoAnswerToMessageBox As String
Dim QuestionToMessageBox As String
[Code].....
is there a way to save the value of the textbox to a notepad when I click the "Save" button?Textbox.PNG
View 7 Replies View Related