Thread
:
need help with using VBA to access a second spreadsheet
View Single Post
#
2
Posted to microsoft.public.excel.misc
papou[_2_]
external usenet poster
Posts: 112
need help with using VBA to access a second spreadsheet
Hello
- Application.GetOpenFilename returns the FullName (as string) but
some functions want only the Name
Dim Fullname, JustBookName As String
Fullname = Application.GetOpenFilename(filefilter:="Excel Files (*.xls),
*.xls")
If Fullname < False Then
JustBookName =
CreateObject("Scripting.FilesystemObject").GetFile Name(Fullname)
MsgBox JustBookName: End If
HTH
Cordially
Pascal
a écrit dans le message de news:
...
I am writing a "client" spreadsheet using userforms. It needs to be
able to read from a "data" Workbook, and later on it will need to
write back to that workbook. I do not want to "lock" up the "data"
workbook for the entire duration. When finished, the "client" will
run with the Excel application hidden, so only the userforms will be
visible.
I am using "Application.GetOpenFilename" to find the name of the file
and storing that string in a cell.
I do not want the user to see the "data" workbook.
Problems I am experiencing:
-Opening the data workbook with the Excel application being "hidden"
the entire time
- Application.GetOpenFilename returns the FullName (as string) but
some functions want only the Name
Separate issue:
When executing the close command from the userforms, the VBA is
leaving the Excel application still running. How can I make the
actual Excel application close, unless of course the user has other
spreadsheets open?
THANKS
Reply With Quote
papou[_2_]
View Public Profile
Find all posts by papou[_2_]