Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
How do I open a file from a Network drive using Excel VBA?
I would like to open a file using excel vba from a network drive. Below is the code that I have used to find the file. There are three separate ways below that I have tried, but end up with nothing. The first set of commands results in an error message of "Invalid Procedure call or Argument". The second, my computer does not recognize the FileSystemObject, and the third presents an error message of "Object variable or With block not set". Any help would be greatly appreciated. Private Sub CommandButton1_Click() 'ReturnValue = Shell("C:\Program Files\pipc\Procbook\Procbook.exe", 1) 'ReturnValue = Shell("Y:\Dropbox\bosnyak\Drywell Cooler Temperature PI Trends\803A\T47DT2077.PDI", vbMaximizedFocus) 'Dim fso As FileSystemObject, fil As File 'Set fil = fso.getfile("Y:\Dropbox\bosnyak\Drywell Cooler Temperature PI Trends\803A\T47DT2077.PDI") 'AppActivate ("PI - ProcessBook") 'Dim appX As PBObjLib.Application 'Set disY = appX.ProcBooks.Open(" Y:\Dropbox\bosnyak\Drywell Cooler Temperature PI Trends\T47CT7364.PDI", pbPromptConvert) End Sub -- turnerje ------------------------------------------------------------------------ turnerje's Profile: http://www.excelforum.com/member.php...o&userid=25694 View this thread: http://www.excelforum.com/showthread...hreadid=392301 |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
How do I open a file from a Network drive using Excel VBA?
With regard to the first set, I believe you need to specify an executable
for the Shell command. So your second statement would be the cause. For the second set, you will need a reference to the Microsoft Scripting Runtime of which the FileSystemObject is a part. You will also need to use the NEW keyword when dimensioning the fso variable. For example: Dim fso As New FileSystemObject, fil As File For the third set, I believe that the PBObjLib.Application variable also needs to be dimensioned with the NEW keyword. -- David Lloyd MCSD .NET http://LemingtonConsulting.com This response is supplied "as is" without any representations or warranties. "turnerje" wrote in message ... I would like to open a file using excel vba from a network drive. Below is the code that I have used to find the file. There are three separate ways below that I have tried, but end up with nothing. The first set of commands results in an error message of "Invalid Procedure call or Argument". The second, my computer does not recognize the FileSystemObject, and the third presents an error message of "Object variable or With block not set". Any help would be greatly appreciated. Private Sub CommandButton1_Click() 'ReturnValue = Shell("C:\Program Files\pipc\Procbook\Procbook.exe", 1) 'ReturnValue = Shell("Y:\Dropbox\bosnyak\Drywell Cooler Temperature PI Trends\803A\T47DT2077.PDI", vbMaximizedFocus) 'Dim fso As FileSystemObject, fil As File 'Set fil = fso.getfile("Y:\Dropbox\bosnyak\Drywell Cooler Temperature PI Trends\803A\T47DT2077.PDI") 'AppActivate ("PI - ProcessBook") 'Dim appX As PBObjLib.Application 'Set disY = appX.ProcBooks.Open(" Y:\Dropbox\bosnyak\Drywell Cooler Temperature PI Trends\T47CT7364.PDI", pbPromptConvert) End Sub -- turnerje ------------------------------------------------------------------------ turnerje's Profile: http://www.excelforum.com/member.php...o&userid=25694 View this thread: http://www.excelforum.com/showthread...hreadid=392301 |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Saving Excel File to a Network Drive | Excel Discussion (Misc queries) | |||
Excel can't open network drive! | Excel Discussion (Misc queries) | |||
excel 2003 file converted to .xlsm file when save to network drive | Excel Discussion (Misc queries) | |||
Can't open excel on network drive, it said somebody has opened it | Excel Discussion (Misc queries) | |||
Can't one excel file on network drive? | Excel Discussion (Misc queries) |