I am working on a project for work and my first tab is titled "Directions". I have over 500 users coming in and edit multiple tabs at the same time. Is there a macro/or option that would after a user saves changes, would return to the first tab "directions" so that my other users wont be in the middle of what the last person edited?
I do regular saving on random date and un fixed amount as example below...My current investment amount on date 13/06/2013 is USD 20,000 .How much is total return per annum?
Date
Amount Invested
1/1/2005
USD 100
5/1/2006
USD 200
[Code] ...........
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 RelatedI got a problem saving an Excel Sheet as PDF. The problem is that i cant see some parts of sheet on the PDF file. I have uploaded 2 files one of which is that .xlsx file which i want to save as PDF, the other is the PDF file that i see after saving which is not desirable.
View 1 Replies View RelatedIn the attached sheet in module5 I have a save macro with this code
HTML Code:
ActiveWorkbook.SaveAs Filename:="D:Picking Logs" & _
Replace(sFile, "/", "-"), FileFormat:=52
-This saves it to my computers D drive and works fine.
Then I also have the following code whice is suppose to save it to the public drive which is U: drive, but this computer does not have direct access that that drive so i save it to
HTML Code:
ActiveWorkbook.SaveAs Filename:="wcrsan1
owley public1 picking logs" & _
Replace(sFile, "/", "-"), FileFormat:=52
-The wcrsan1 is the path i use to save it to th U:drive.
My issue is the code runs fine, but it does not save it to wcrsan1 owley public1 picking logs. If i save it manually it works but not when the macro runs it.
VBA is password protected.. The password is Kayley98 the sheet password is go
ho.xlsm
I've got a macro that generates some parameters and after they have been generated, the values have to be saved in text file. The problem that I'm facing is that the text file saves the values in double quotes.
I've been searching online for a solution to the problem and what I've found is that if the cell value in excel includes a comma, the resultant text file will store the entire value in double quotes.
I'm using the save as method and I read that if you provide the save format as xlTextPrinter this problem will not occur, but the limitation is that it can only work with values less than 240 characters in length.
All I want to do is save a copy of one sheet called "Patient Stock Form", change the name to "Patient Order", and put it into an email. But my code is putting the entire workbook into the email. Here's the code:
VB:
Sub EMAILFORM()
Dim oApp As Object ' Outlook.Application
Dim oEmail As Object ' MailItem
[Code]....
I am trying to write code which copies the activesheet (called "Data"), opens a new workbook, pastes the data into it and closes the new sheet as "sales 2008" followed by the date. What I have at the moment is:
View 3 Replies View RelatedI would like code to automatically save my spreadsheet with the name that is present in cell F4 of the activesheet. For example, I would like to save my file to desktop and cell F4 contains the text 'hitec 348'
View 5 Replies View RelatedI have a workbook with sheets of data that should be imported into another system. So i would like some code that does the following:
1.) make a copy of worksheet x and paste (paste special) the values in a new worksheet.
2.) Delete row 1 in new worksheet (the labels)
3.) Ask the user for a file name and path and save the worksheet as a tab delimited txt file.
4.) Delete the worksheet created in 1.)
5.) Leave the user with the original .xls file
I will assign this macro to a button so the experience for the user is:
1.) press button
2.) input file name and location and have a text file saved
3.) be left in the original xls document.
I tried with the following code but get stuck with this error : "Run-time error 91: Objeck variable or with block variable not set."
Sub Export_x_DK()
Dim w As Workbook
Application.ScreenUpdating = False
Application.DisplayAlerts = False
ThisWorkbook.Sheets.Add After:=Sheets(Sheets.Count)
ActiveSheet.Name = "Export_2023"
Sheets("Depreciation x (DK)").Select
Cells.Select.........................
I am currently having a slightly annoying issue that only happens 50% of the time, that when trying to re-save a excel sheet on a network location. The network location is a folder on another computer. The same happens when I try and save it as a pdf, but only happens half of the time.
The message which pops up says something along the line of 'Saving as: 'File-ServerDocumentsexcelsheetexample.xls' ' and a sort of green loading bar appears. It does this for about 15 seconds then goes off.
I've checked our anti virus (which is eset) and I've set it to not real time scan network locations.
I have attached a example of the saving message: ExcelWarningExample.jpg
I want two sheets of my Excel workbook to be saved as txt file. The name of the file is compiled of a fixed part ("TrialList" or "BlockList") and two values from another sheet (subject and session number):
[Code] ........
Now, saving the text files with the desired file names works perfectly. However, Excel decides to change the names of the sheets that have been saved as text files accordingly. This is something I want to prevent from happening, since a second loop of actions will end because of the unexpected sheet names...
I want to save a single sheet from my Excel file to PDF. But this Macro saves all the sheets in separate pdf files. How do I adjust it to only save the breakdown sheet of my Quoting workbook?
Sub Save2PDF()
'
' Save2PDF Macro
Range("L66").Select
ActiveWorkbook.SaveAs FileName:= _
"Macintosh HD:Users:myratriegaardt:Desktop:Q1Breakdown.pdf", FileFormat:=xlPDF _
, PublishOption:=xlSheet
ActiveWindow.SmallScroll Down:=-160
End Sub
I am trying to create a data entry sheet to enter quotes on. When a quote is received, I click on my "Add quote" button and a userform appears. Data is entered into the userform (frmEntryForm) and returned back to the next available row.
I also need to be able to:
Edit a row by double-clicking it. When a row is double-clicked, data from that row is passed back to the userform, edited and returned back to the same row (to prevent duplicates).Validate that all fields are complete within the userform where relevant (i.e. if the work is not complete or in progress then the "Invoice Number" and "Actual Cost" fields are disabled and blanked to prevent entry (I think this is almost sorted judging by my tests)
I have attached my sheet : 2014 Gatwick Quote Log (Macro Enabled).xlsm
I am looking to save a range of data from an input sheet, to a data sheet.
I know how to save indivdual cells to a worksheet in the form of a data
what i am looking to do is save A6 - J6 down A19 - J19, but only saving the data which is entered
A6 - J6
A7 - J7
My set up office 2007 win xp pro ie8
is it possible using vba ideally with a button marked save, to save a single worksheet and name it, in CSV format
Then I would like to be able to do the reverse load a CSV file back in to a work sheet
Expanding upon this
1. Click a command button with caption “save”
2. Take the name of a given sheet, in my case DataToUpLoad and append it with a number to give a sheet name of DataToUpLoad 1 the first time it is save and DataToUpLoad 2 the next time and so on
3. Click another command button with the caption “load” interact with usual dialog box.
My current work around is to copy a sheet open a new work book past the sheet in the save that work book as CSV
The reason this is required is to mate up with the php on the server side
I have this excel sheet I'm trying to create (to make my life better at work). It's to track credit card refunds. It'll be saved on sharepoint. So my department will fill in the data on the "Ops" side, and then the accounts department will fill in their side. It's very rudimentary, but anything is better than the old, tattered BOOK we are currently using.
So far, I have the user/date/time stamps autofill, when the user fills in "Entered by" or "Recieved by". I have those cells locked so no one can edit it. I have separte passwords for both sides (Ops and Accounts).
What I want now is to be able to:
1. Lock each line once it's been entered and saved. Say my department fills in one entry. We save it. After that, it CANNOT be edited. If there are any changes, I'll put in a remarks column so people can enter stuff.
2. If someone enters the first two columns (Guest name, booking number), then the "Entered by" HAS to be filled, or the workbook cannot be saved.
3. ONLY letters can be used for Guest Name and Entered by. I've tried different things for this. While I've managed to make it work if the user enters a digit first, I can still enter John56, and it'll pass. I need it to only allow letters (and spaces).
4. The "Booking Number" should only allow six digits. No less no more than six digits. It can be 000001 even. But it has to have six. And, obviously, no letters, no spaces.
In the "ThisWorkbook" module, I've got this code:
Code:
Private Sub Workbook_Open()
Dim wSheet As Worksheet
For Each wSheet In Worksheets
wSheet.Protect Password:="hurlEy!", _
UserInterFaceOnly:=True
Next wSheet
End Sub
In the sheet1 module, I've got this code:
Code:
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
On Error GoTo enditall
Application.EnableEvents = False
If Target.Cells.Column = 3 Then
With Target
If .Value "" Then
.Offset(, 1).Value = Environ("username")
[code]....
I have 2 workbooks in Excel 2010, each contain just 1 sheet. (see attached) I need to compare on sheet 1, cell D1 and column A:A (this column will be much longer), with the data in columns C:C & A:A on sheet 2, if a corresponding match is found, the data contained in column D on the same row on sheet 2 is written to the cell with the matching data in sheet 1.
My attempt is in cell D2 on sheet1.
Create a macro button in 'Spreadsheet 2' that searches 'Spreadsheet 1' for updated information specific to a certain criteria and adds it to a new row in 'Spreadsheet 2.'
There are three sheets
Prospects (where all original data is entered)
Actions -Bob (Bob's new Prospects are added to this sheet)
Actions -Frank (Frank's new Prospects are added to this sheet)
So in this example Row 6 in Prospects (Constituents, Rating, Manager and Solicitor would be added to ACTION - Bob's sheet on Row 5
and
Row 8 in Prospects (Constituents, its Rating, Manager and Solicitor would be added to ACTIONS - Frank sheet on Row 5
Here is the example spreadsheet - Prospects and Actions.xlsx
If I have a cell that has as its contents as sheet name, is there anyway I can use the cell's address to reference that sheet?
As an example, say I have in Sheet1, cell A1, the text Sheet2. And let's say I want to return the value of cell B2 on whichever sheet the text of A1 says. So, on Sheet1, I might have this:
i have two sheets, one to display results (Reults tab) & the other tab containing the data (Data tab)
what i am trying to do is some how create a search function and have a forumula which contains a LIKE function that looks up the data table
RANGE = Data!A2:K255
the search needs to lookup the primary column Data!B2:B255 ... if any results are found .. show them on the results tab.. and if multiple results are found, display those as well.. (in either instance, the whole row of information in respect to the results need to be dislayed and hopefully no duplicates are found .. eg, Data!A:K of a hit)
is there a formula that can achieve this? oh, the search is TEXT based and there should be no empty cells within the dataset
after some MASSIVE googling, i have stumbled accross this
B1 = Search box (txt field)
A6 (which will be a hidden column) contains =MATCH($B$1,Data!A2:A255,0). this formula provides the first instance of the result and provides the row number
A7 contains =MATCH($B$1,OFFSET(Data!$A$1,A6+1,0,8-(A6+1),1),0)+A6.
this is supposed to look for the next row number which contains a match and provide that row number
and througout my other columns, i have
B6=OFFSET(Data!$A$1,A6,1)
B7=OFFSET(Data!$A$1,A6,2)
B8=OFFSET(Data!$A$1,A6,3)
and so on
2 things i cannot recitify..
1, the match has to be EXACT ... unfortunately i cannot use exact .. needs to be LIKE .. eg, i cant use the search word "boat" as the range of data has "boats"
2, it comes up with multile .. irrelevent results.
I have 2 sheets in a work book both contain the customers address if I leave a line not type on on sheet 1 then it will put a 0 on sheet 2 is there a formula to stop this happening.
View 3 Replies View RelatedI've got a User Form that works perfectly. It's activated on Chart Month sheet, you enter data into it and it switches to Comments sheet and copies the data, before returning back to the Chart Month sheet.
I have now added the same functionality to Chart Week sheet. Both Chart sheets use the same comments data, so it doesn't matter if you run the User Form from Chart Month or Chart Week. However, when I run the User Form from Chart Week then it switches to the Chart Month sheet once it copies the data, as I have Chart Month in the code. How do I get it to return to the sheet that it was originally on ie either Chart Week or Chart Month?
Code:
Private Sub CommandButton1_Click()
Dim emptyRow As Long
'Make Sheet30 Active
Sheets("Comments").Activate
'Determine emptyRow
emptyRow = WorksheetFunction.CountA(Range("D:D")) + 1
[Code] .........
I have to match table column name with the column name in the sheets and get the values from column 6 in sheet2 if "# of values" in sheet1 matches with "Counter" of sheets for the same column.
if ("Table Column Name sheet1"="Column Name sheet2" then
if("Counter sheet2"="# of Values sheet1" then
return "Total # of rows Sheet2" from same row.
I am using Excel 2003.
Sheet 1 ....
I 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 a workbook that uses the following for a list of names (in a specific cell) over multiple sheets:
Burns, Charles; Simpson, Bart; Smithers, Waylon; Wiggum, Ralph
Some names appear on different sheets. I would like to create a TOC sheet that lists what sheet each name shows up on. I can pull the names and have a list of all of them, but how to
a.) determine all of the sheets where each name shows up and, subsequently,
b.) how to programmatically create a hyperlink to whatever sheet(s) each name shows up on.
I've attached a dummy workbook. The column in question is Content Owners. There would be a link to each separate sheet in different cells adjacent to the name.
CRSample.xls
I need a formula to add two (2) cells (one cell in sheet 1 and the second cell in sheet 2) and return a value of the two (2) cells in sheet 3. I would like the formula to return a zero (0) value instead of #VALUE! ERROR displayed in sheet 3 if a cell in sheet 1 has zero (0) value and the second cell in sheet 2 is blank. For example: sheet 1 D2 (0) + sheet 2 D2 (blank cell) = zero (0) instead of #VALUE! ERROR
In addition, if cells B11:B12 are blank in both sheet 1 and 2, I would like the formula to display blank in sheet 3 for cell C11:C15 instead of displaying #VALUE! ERROR.
Here is the formula I have: =IF(OR(ISBLANK(Sheet1!D2),ISBLANK(Sheet2!D2)),"",Sheet1!D2+Sheet2!D2)
Note: I have attached a sample data set for better conceptualization of the problem. Sample_Formula.xls
I 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.
I have a spreadsheet with 21 columns. What would be the easiest way to search column I for the word 'pending' and when that word is found to return the entire row to another sheet.
Along with that I also need to return only columns b,c,e,f,g,i,j,k. I also don't want to return rows that have certain number data in column C, that number data can range from 2-4 digits long.
The hyperlink can be activated from a number of difference sheets. Once the user reaches the instruciton sheet they need to be able to scroll around to read it fully but they will not need to enter any data or activate any cells. How can I get it so once they have read the instrucditons they can return to the sheet they started from?
View 6 Replies View Related