Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Mid Function with XlInsertObject Hlp!
Hi there,
I'm trying to use XlInsertObject to bring the user to the Insert File dialog, with display as icon True and Link False. I'd like to display the name of the fall (not the entire path) as the label. I've tried to incorporate the Mid function into the code, but am failing miserably. Dim FName As String Application.Dialogs(xlDialogInsertObject).Show , , , True, , , , "=Mid(FName, InStrRev(FName, " \ ") + 1)" Thanks. |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Mid Function with XlInsertObject Hlp!
try using this method instead
chDrive = "C" chDir = "C:\temp" sFileName = Application.GetOpenFilename() "Joyce" wrote: Hi there, I'm trying to use XlInsertObject to bring the user to the Insert File dialog, with display as icon True and Link False. I'd like to display the name of the fall (not the entire path) as the label. I've tried to incorporate the Mid function into the code, but am failing miserably. Dim FName As String Application.Dialogs(xlDialogInsertObject).Show , , , True, , , , "=Mid(FName, InStrRev(FName, " \ ") + 1)" Thanks. |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
Mid Function with XlInsertObject Hlp!
Hi Patrick,
Thanks for your response. Unfortunately, I couldn't get that to work. I get an error message - Path Not Found on the line with chDir "C:temp" Dim SFileName As String ChDrive "C" ChDir "C:\temp" SFileName = Application.GetOpenFilename() "Patrick Molloy" wrote: try using this method instead chDrive = "C" chDir = "C:\temp" sFileName = Application.GetOpenFilename() "Joyce" wrote: Hi there, I'm trying to use XlInsertObject to bring the user to the Insert File dialog, with display as icon True and Link False. I'd like to display the name of the fall (not the entire path) as the label. I've tried to incorporate the Mid function into the code, but am failing miserably. Dim FName As String Application.Dialogs(xlDialogInsertObject).Show , , , True, , , , "=Mid(FName, InStrRev(FName, " \ ") + 1)" Thanks. |
#4
Posted to microsoft.public.excel.programming
|
|||
|
|||
Mid Function with XlInsertObject Hlp!
well of course not. you need to point where your files are. That was my
example, plus you need the '\' "Joyce" wrote: Hi Patrick, Thanks for your response. Unfortunately, I couldn't get that to work. I get an error message - Path Not Found on the line with chDir "C:temp" Dim SFileName As String ChDrive "C" ChDir "C:\temp" SFileName = Application.GetOpenFilename() "Patrick Molloy" wrote: try using this method instead chDrive = "C" chDir = "C:\temp" sFileName = Application.GetOpenFilename() "Joyce" wrote: Hi there, I'm trying to use XlInsertObject to bring the user to the Insert File dialog, with display as icon True and Link False. I'd like to display the name of the fall (not the entire path) as the label. I've tried to incorporate the Mid function into the code, but am failing miserably. Dim FName As String Application.Dialogs(xlDialogInsertObject).Show , , , True, , , , "=Mid(FName, InStrRev(FName, " \ ") + 1)" Thanks. |
#5
Posted to microsoft.public.excel.programming
|
|||
|
|||
Mid Function with XlInsertObject Hlp!
Hi Patrick,
Sorry for my lack of skills. I'll keep trying. This will be on different computers, but I'd like the dialog box to simply open into My Documents. The users can navigate from there. Thanks. "Patrick Molloy" wrote: well of course not. you need to point where your files are. That was my example, plus you need the '\' "Joyce" wrote: Hi Patrick, Thanks for your response. Unfortunately, I couldn't get that to work. I get an error message - Path Not Found on the line with chDir "C:temp" Dim SFileName As String ChDrive "C" ChDir "C:\temp" SFileName = Application.GetOpenFilename() "Patrick Molloy" wrote: try using this method instead chDrive = "C" chDir = "C:\temp" sFileName = Application.GetOpenFilename() "Joyce" wrote: Hi there, I'm trying to use XlInsertObject to bring the user to the Insert File dialog, with display as icon True and Link False. I'd like to display the name of the fall (not the entire path) as the label. I've tried to incorporate the Mid function into the code, but am failing miserably. Dim FName As String Application.Dialogs(xlDialogInsertObject).Show , , , True, , , , "=Mid(FName, InStrRev(FName, " \ ") + 1)" Thanks. |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
User Function Question: Collect Condition in Dialog Box - But How toInsert into Function Equation? | Excel Programming | |||
LINKEDRANGE function - a complement to the PULL function (for getting values from a closed workbook) | Excel Worksheet Functions | |||
Excel - User Defined Function Error: This function takes no argume | Excel Programming | |||
Need to open the Function Arguments window from VBA for a user defined function. | Excel Programming | |||
User-Defined Function pre-empting Built-in Function? How to undo???? | Excel Programming |