What needs to replace the "X:\Files\aa PM Spreadsheet\" so the drive and folder are optional to the user, while retaining the file name ThisFile?![]()
Please Login or Register to view this content.
Thanks
What needs to replace the "X:\Files\aa PM Spreadsheet\" so the drive and folder are optional to the user, while retaining the file name ThisFile?![]()
Please Login or Register to view this content.
Thanks
Last edited by ILoveStMartin; 06-01-2013 at 12:30 AM.
![]()
Please Login or Register to view this content.
Thank you!
First - I am not a programmer and may never have an opportunity again to do a workbook requiring macros as I only work part time / am over 70, so please be patient with me on this!
Couple of things - if a hurricane hits FL this workbook will be on multiple personal computers, and it is not known where the individuals will keep the master workbook. If it is necessary, I could tell them they need put field in c/..., but don't know if that is necessary.
Also, in what I pasted in, there was the "ThisFile". This is the job name and comes from what the user enters into a cell of the First Page tab, and is what the name of the workbook must be. Maybe I am just to inexperienced, but I don't see where the value of ThisFile is picked up. What am I not seeing?
Thank you so much!!
Bill Daily
You're welcome.
I don't understand what you are asking?
ThisFile = Range("SaveAsFileName").ValueAlso, in what I pasted in, there was the "ThisFile". This is the job name and comes from what the user enters into a cell of the First Page tab, and is what the name of the workbook must be. Maybe I am just to inexperienced, but I don't see where the value of ThisFile is picked up. What am I not seeing?
This line of code gets the Name of the file from a Named Range called SaveAsFileName. You would have to make a named range called SaveAsFileName. Do a web search for something like Excel create a named range for several step-by-step-guides.
Alternatively; use this line instead and change the sheet name and cell reference to suit.
ThisFile = Sheets("Sheet1").Range("A1").Value
THANK YOU!!
You understood exactly what my needs were even though my communications were not clear.
Everything now works perfect!
You have no idea how much you are appreciated!!!
Bill - billdaily@cox.net
@ILoveStMartin
Bill,
It would be prudent not to leave your e-mail address in open Forumns. (Spammers love this)
There are currently 1 users browsing this thread. (0 members and 1 guests)
Bookmarks