Using Current File Name And Sheet Name?
Mar 8, 2014
for someone that might have files they need to process named the same with an index. How can I set this up so when they open the file to run the macro to grab that specific filename they opened and the sheet name? I need to set the filename to a string and the sheetname to string but I dont know how to get that to work.
example...
filename: download.csv, sheetname: download
filename: download (1).csv, sheetname: download (1)
filename: download (2).csv, sheetname: download (2)
Code:
Set wb2 = Workbooks("DOWNLOAD.CSV")
cnt = wb2.Sheets("download").Cells.SpecialCells(xlCellTypeLastCell).Row
strReportCount = (CStr(cnt))
View 1 Replies
ADVERTISEMENT
Oct 27, 2008
EXAMPLE: Complete Sheet called "Day1". When day1 is complete you click on button and it then copies itself and creates and renames new sheet to "Day2", then when "Day2" is complete you click on button and it then copies itself and creates and renames new sheet to "Day3", and so on and so forth to "Day30".
View 9 Replies
View Related
Jul 5, 2009
I have an excel file which I use when I book keep journals in work. Each time I come across a new piece of bookkeeping I add to the file, name the sheet and index it. (I've attached a loose example for illustration) so the bookkeeping template.xls gets bigger every day.
Currently, when I book keep on a particular day, I open the template.xls workbook;
draft my journals;
and then manually copy the worksheets I have completed during the day from the template.xls workbook and paste the sheets into a new book and save the days bookkeeping as the current date.
With the file I have attached can someone show me how to write a macro and apply it to each of the buttons on the various work sheet tabs (each button will run the same macro).
Upon clicking a button, I would like the macro to;
Copy the active sheet into a new book and save the file as the current date.
Each subsequent click of a button the macro will check if the .xls file exists for the current date, if it does, then it will just copy the active worksheet to the file that has already been created.
In the new file which is saved as the current date, I need to remove the macro button and the hyperlink that reads back to index.
I have had some helpful macro's provided from another forum, however, the other forum does not appear to enable users to upload files, so I can't quite convey what it is I am trying to achieve.
View 14 Replies
View Related
Oct 10, 2011
VBA coding for automatically saving an excel file as another file using the current date as part of the file name together with "32ga" as a constant add-in. I also what this macro to run at a particular time of the day let say 00:20hrs. The excel file i want to save as is always open . It has data that changes every 24-hrs.
View 1 Replies
View Related
Dec 12, 2012
I have numerous spreadsheets that I need to open and unhide a sheet, that has XML data stored in cell A1. What I need to do is copy that data in cell A1 and paste it into a text document and save that as an XML file saved as the XLS workbook name with a date stamp.
I'm running into many issues, the main issue is the saving as current file name, and the formatting of the text/XML file.
Here is my current code, which doesn't reference the current file name and is just very generic. Once I get the saving as file-name correct and the formatting of the xml file correct, I will work on it a bit more.
Code:
Sub Test()
Dim Rng As Range
Dim wb As Workbook
Set Rng = Range("A1:A2")
Set wb = Workbooks.Add
With wb
Rng.Copy
[code]....
View 4 Replies
View Related
Oct 20, 2009
I have the need to be able to open a closed file to archive some data from a
current file.
what coding i need to be able to kick the "open file" bit off?
View 4 Replies
View Related
Feb 19, 2014
I have a blank file and a data file for current year with formulas.
So I am trying to take a couple of tabs from current year data file and pasting them into the blank file.
My question when is do that all the formulas get referenced to the current years file. i want to keep the same formulas but reference the tabs on blank file.
Is there a quicker way to do this rather and going into all the cells and changing reference from current years files data to blank files data.
View 3 Replies
View Related
Jun 1, 2009
I've got a bit of a quandary here that my novice programming skills can't seem to solve.
Here is the scenario. I work for a photographic library. We have a spreadsheet that contains 5 or so columns, and a couple of thousand rows. Essentially each row contains an imagine code (the number we use to file away the imagine, ie. US_NY_NYC_1 ) in the first cell, and the image information in the following cells (ie metadata, keywords, photographer, date, etc).
so a typical row would look as follows:
Filename | Keywords | Photographer | Metadata | Location |
all the keyword, photographer, metadata, and location information can only be tied to the one image code whose cell begins the row.
Now, here is my dilemma. This sheet (lets call it the master sheet) contains all the images we have in a given batch. However, when a client orders images, we will send them most images in that batch, but not all, and we may send a few additional. So I have a separate sheet that contains only those image codes that the client requested. What I need to do is essentially take a code from the second sheet, find that same code in the master sheet, and copy over all the cells associated with that code's row. If the number does not exist in the master sheet, simply leave that row with only the code in the first cell, and the rest blank, and move on.
so for example, in my second sheet lets say I have the following A_B_C . I would like for excel to find that same code in the master sheet, and then copy over the metadata, photographer, date, etc, associated with that code, and paste it into the second sheet, so that that row in the second sheet now looks identical to the row with the same image code in the master sheet . If A_B_C does not exist in the master spreadsheet, then I would like excel to simply leave that code in its own row, leave the rest of the row blank, and move on to the next code.
View 12 Replies
View Related
Nov 3, 2009
I'm trying to create a function in a template invioce that will look up a value in another spread sheet (fees).The data will be based off three values entered in the invioce from drop down boxes. I've attached the workbook with the master sheet and the invioce (sheet 5) The three criteria that can be selected is the project, month and name and I want the amount of hours to be returned based on that information in column e. The projects are seperated and billed by month.
View 3 Replies
View Related
Apr 2, 2009
How do I change this macro to refer to the current sheet name instead of "FullScreen (2)"?
View 4 Replies
View Related
Jun 23, 2008
I have an Excel 2003 application that creates a new workbook and adds hyperlinks that link up to other tabs withing the same new workbook.
Issue is that if say the default workbook name was "Book1" but the user saves this workbook with any other name, the hyperlinks die.
Is there anyway to use the current name of the file (instead of "Book1" in this example) in the formula "=HYPERLINK("[book1.xls]Sheet3!A1", "test")"
View 9 Replies
View Related
Jul 21, 2008
Sub Macro1()
DoCmd.TransferSpreadsheet acImport, acSpreadsheetTypeExcel8, "COOPtbl1", "C:Documents and SettingskanegrMy DocumentsBook1.xls", True, ""
End Sub
Heres the code I keep getting a
"Run-time error '424':
Object required"
Message.
View 9 Replies
View Related
Apr 23, 2009
I'm running a macro that intially opens an input box where you specify the filepath and name of a .ped file to import into the macro. The default path of H:BOM2.ped may not always be the path I use. It may be just H:.ped or H:Bom1.ped.
HTML INITIAL CHECK
Response = MsgBox(".............do you want to import BOM data?", vbYesNo)
Do Until Response = vbNo
'SELECT RAW FILE
Dim Message, Title, Default, MyValue
Message = "Please Enter PathFile Name for Source File"
Title = "Create CHINA INSPECTION REPORT(s)" ' Set Title.
Default = "H:BOM2.ped" ' Set Default.......
View 9 Replies
View Related
Apr 10, 2007
ChDir "C:Documents and SettingssysxxxDesktopcode testNew Folder"
ActiveWorkbook. SaveAs Filename:= _
"C:Documents and SettingssysxxxDesktopcode testNew FolderBillsFileName.xlw" _
, FileFormat:=xlExcel4Workbook, Password:="", WriteResPassword:="", _
ReadOnlyRecommended:=False, CreateBackup:=False
Here's the code. My only question is how would I change "BillsFileName.xlw" to be the name of the current workbook?
Is it something as simple as
New Folderactiveworkbook.name.xlw
View 3 Replies
View Related
May 20, 2006
Why is Excel so back-***wards on this? Is there a VBA solution to having a new sheet inserted after, not before, the current sheet that can be attached to an icon?
View 3 Replies
View Related
May 4, 2006
I get an xl file sent to me every day which I upload into a database. I then save the file keeping its name and save it into a selected folder. Is it possible to add a macro at the beginning of my current macro that saves the file using its name to a selected folder?
View 4 Replies
View Related
Sep 25, 2008
What is the easiest way to display in a cell the opened file's directory path where the file is stored? I would like to use some sort of formula (instead of the VB route) but I don't know if such a thing exists.
View 5 Replies
View Related
Sep 26, 2011
I'm a novice at Excel trying to create some forms for work. My goal is to have a working workbook that holds all my values from multiple jobs that gets updated daily with additional worksheets that gets sent to me. I'd like to be able to hit a macro in my workbook that allows me to select a file that has been emailed to me and import their values into mine. For example:
While using my active workbook I want to select a file. Then take cells A1:A15 from selected file and paste to cells F1:F15 in my active workbook.
View 2 Replies
View Related
Nov 13, 2008
I have the following Macro that I run assigned to a Button.
Sub AskAndDo()
If MsgBox("Have you Finished collecting data ?", vbYesNo + vbQuestion) = vbNo Then
Exit Sub
Else
If MsgBox("Have you Printed the Reports ?", vbYesNo + vbQuestion) = vbNo Then
Exit Sub
Else
ActiveWorkbook.SaveAs Filename:="\gamingntcompanyFLOAT MASTERFloat_Sheet_" & Format(Date, "_YY_MM_DD")
End If
End If
Application.Quit
End Sub.......
View 9 Replies
View Related
Dec 4, 2007
I recorded a macro to save a workbook to a specific folder using the current file name. However, I've tried to remove the absolute reference to a specific filename but it is not working for me. Am I close?
ActiveWorkbook.SaveAs Filename:= _
"H:Files and DocumentsPROJECTSSR 2 SS Phase Two Component ReliabilityWinTrac Files xt_conversionsexcel_version" & SheetName _
, FileFormat:=xlOpenXMLWorkbook, CreateBackup:=False
View 2 Replies
View Related
Aug 6, 2008
I have a report send to me daily. And I want to have a macro to save this report in the daily folder, such as “c:
eports8052008”, so tomorrow 's folder would be “c:eports8062008”.
All the daily folders already exist. Just need to change the file path. I tried some codes including sPath and format(now(), “mmddyyyy”), get error message.
View 9 Replies
View Related
May 2, 2008
I want to create a standard macro that will copy values from a Master workbook to the current, active workbook I have open. The problem I have run into is when I record a macro it also records the name of the active workbook I'm copying data into and I would like it so when I bring up a workbook I just run the macro and it copies the values in. I'll be doing 8 different macros that each copy different values from the Master spreadsheet
View 8 Replies
View Related
Feb 26, 2010
Is possible to copy all of the contents of the current worksheet into another worksheet in the same workbook via a click of a button on the worksheet i.e. like a copy and paste.
View 9 Replies
View Related
Apr 3, 2014
In sub which will convert file to PDF and save it to assigned folder and then attach it to email in outlook. All works fine.
However is is possible to modify the code to save fole to respective month folder ( as per current date and year)?
e.g. I have created folder Named 'Trial' in C drive . This has sub folders 2014, 2015, 2016, 2017, 2018 Each year folder will have sub-sub folders month wise like This has sub folders as Jan , Feb , Mar , Apr .... till Dec Now e.g. if date when the pdf was created is 23/4/14 then it is saved in C:Trials2014Apr automatically. Currently every year I keep creating new folders etc... bit primitive though.
View 2 Replies
View Related
Apr 14, 2009
I am trying to determine the currently active row on another sheet; that is, the row that would be active if I switched to that sheet. Is there any way of doing that without using the ActiveWindow object? It seems clumsy to have to change the active window to the one I am interested in, get the information I need and then change it back again; but I haven't been able to find a property that I can just retrieve off the sheet object. Even so, I am using the following code and it isn't fetching the value from the target sheet anyway. It is returning the current row from the sheet that is calling the function.
View 3 Replies
View Related
Dec 8, 2012
I have a spreadsheet witht the following design:
Column A = Date
Column B = Value 1
Column C = Value 2
I have a folder with excel files named by date (e.g. 081212 = 8th December 12). Within each of those files is Value 1 and Value 2. They are always in the same cell (B6= Value 1, B16= Value 2).
How can i create a macro/script where the Values in Column B and Column C in my spreadsheet are automatically updated where there is a Date in Column A but no values in Column B or C?
In other words, i need the script to read the date in Column A and if Column B and Column C are blank, then it needs to find the corresponding date excel file and copy Value 1 and Value 2 into the cells in my spreadsheet.
View 3 Replies
View Related
Jul 13, 2009
I wrote this macro that will work on two named sheets but i want to copy the column from the active sheet:
View 4 Replies
View Related
Jun 3, 2009
i have a workbook with two sheets. lets just call them sheet 1 and sheet 2. on sheet 1 i have data for employees and their current wages and other info. on sheet 2 the data is for compensation scale on three separate columns.......
in order for me to automatically get the data from (sheet 2 B3) the formula for sheet 1 E1 would be: ='Sheet 1'!B3. how do i formulate the equation so that i can do ='Sheet 2'!(C1)(D1)?. in other words i want to specify the column and row from the values declared in sheet 1 column c and column d respectively.
View 4 Replies
View Related
Mar 28, 2008
Is it possible to sum across worksheets from the first sheet to the CURRENT sheet so that a week on week average total can be calculated which will not be altered by the addition of future worksheets?
eg. We have 10 weeks named week 1, week 2 etc.
In week 2 I want a total average (in this case leads/hours) of week 1 and week 2.
In week 3 I want a total average of week 1, week 2 and week 3.
View 14 Replies
View Related
Jun 2, 2009
I have a form button I am currently using to save the workbook. However due to the workbook being so large is taking a little longer than I want to save. Is there a way to change the macro to save the current sheet only?
Sub Save()
'
'
'
ActiveWorkbook.Save
End Sub
View 9 Replies
View Related
