Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.misc
|
|||
|
|||
Current Directory
I am writing a Macro that does some stuff then saves the file as "NAME.txt"
but the directory that I am will change with each new file. How do I grab the directory of the active workbook? I can grab the full file path (ActiveWorkbook.FullName) but I can not convert this to the directory. Any help? |
#2
Posted to microsoft.public.excel.misc
|
|||
|
|||
Current Directory
=CELL("filename") will return the file's directory path.
Keep the quotes and filename. Odd function but it gives you the info you need. Dave -- Brevity is the soul of wit. "Mallasch" wrote: I am writing a Macro that does some stuff then saves the file as "NAME.txt" but the directory that I am will change with each new file. How do I grab the directory of the active workbook? I can grab the full file path (ActiveWorkbook.FullName) but I can not convert this to the directory. Any help? |
#3
Posted to microsoft.public.excel.misc
|
|||
|
|||
Current Directory
Another way.
-- Jim Cone San Francisco, USA http://www.realezsites.com/bus/primitivesoftware Sub FindWhatFolder() MsgBox WhatFolder(ThisWorkbook.Path) End Sub Function WhatFolder(strPath) As String Dim FSO As Object Dim oFold As Object Set FSO = CreateObject("Scripting.FileSystemObject") Set oFold = FSO.GetFolder(strPath) WhatFolder = oFold.Path End Function '-------------------- "Mallasch" wrote in message I am writing a Macro that does some stuff then saves the file as "NAME.txt" but the directory that I am will change with each new file. How do I grab the directory of the active workbook? I can grab the full file path (ActiveWorkbook.FullName) but I can not convert this to the directory. Any help? |
#4
Posted to microsoft.public.excel.misc
|
|||
|
|||
Current Directory
That will actually tell you the name of drive/path/filename/sheet name that was
active when excel last calculated. In this case, you'd want to specify a range: =cell("Filename",a1) =========== In code, you could use: msgbox activeworkbook.path Dave F wrote: =CELL("filename") will return the file's directory path. Keep the quotes and filename. Odd function but it gives you the info you need. Dave -- Brevity is the soul of wit. "Mallasch" wrote: I am writing a Macro that does some stuff then saves the file as "NAME.txt" but the directory that I am will change with each new file. How do I grab the directory of the active workbook? I can grab the full file path (ActiveWorkbook.FullName) but I can not convert this to the directory. Any help? -- Dave Peterson |
#5
Posted to microsoft.public.excel.misc
|
|||
|
|||
Current Directory
Thanks. activeworkbook.path worked well. I was using
activeworkbook.fullname which gave me the filename that I didn't want... "Dave Peterson" wrote: That will actually tell you the name of drive/path/filename/sheet name that was active when excel last calculated. In this case, you'd want to specify a range: =cell("Filename",a1) =========== In code, you could use: msgbox activeworkbook.path Dave F wrote: =CELL("filename") will return the file's directory path. Keep the quotes and filename. Odd function but it gives you the info you need. Dave -- Brevity is the soul of wit. "Mallasch" wrote: I am writing a Macro that does some stuff then saves the file as "NAME.txt" but the directory that I am will change with each new file. How do I grab the directory of the active workbook? I can grab the full file path (ActiveWorkbook.FullName) but I can not convert this to the directory. Any help? -- Dave Peterson |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Excel 2k3 query path to current directory | Excel Discussion (Misc queries) | |||
Saving to "open" directory | New Users to Excel | |||
Staying it its own directory. | Excel Worksheet Functions | |||
Update Links to current Directory?? | Excel Discussion (Misc queries) | |||
Extracting data from the current date | Excel Worksheet Functions |