Bepaalde Excel File Openen in Access

[sis123]

Dit is voorlopig mijn script :
Probleem = DLP.xls kan niet worden gevonden. Controleer de spelling van de naam en de locatie van het bestand.

Private Sub WEW_open_Click()
On Error GoTo Err_WEW_open_Click

Dim oApp As Object

Shell "excel.exe \\J:\Firma\DLOGISTICS\Packing\Produktie\
DLP Control Tools\WEWtoepassing", vbMaximizedFocus ' Opens Specified file


Exit_WEW_open_Click:
Exit Sub

Err_WEW_open_Click:
MsgBox Err.Description
Resume Exit_WEW_open_Click

End Sub

Ook als de map geen blanco spaties bevat geeft hem deze fout

 

[Raceman]

Probeer eens:

Shell "excel.exe \\J:\Firma\DLOGISTICS\Packing\Produktie\
DLP%20Control%20Tools\WEWtoepassing", vbMaximizedFocus ' Opens Specified file

 

[sis123]

Geplaatst door Raceman
Probeer eens:

Shell "excel.exe \\J:\Firma\DLOGISTICS\Packing\Produktie\
DLP%20Control%20Tools\WEWtoepassing", vbMaximizedFocus ' Opens Specified file

Heb deze wijziging toegepast maar de fout blijft, hij opent excel en kan de file niet vinden.
Toch al bedankt voor de respons

 

[beheer25]

Er moeten quotes om de filenaam omdat er spaties in voorkomen. Hij probeert DLP.xls te openen omdat ie daarna aan het volgende argument in de shell regel begint.

Shell "excel.exe ""\\J:\Firma\DLOGISTICS\Packing\Produktie\ 
DLP Control Tools\WEWtoepassing""", vbMaximizedFocus

Het is even vlooien met hoeveel quotes er precies moeten staan om en de string en de opdracht kloppend te maken.


Grtz,

 

[frin]

Probeer dit eens :







Private Sub WEW_open_Click()
On Error GoTo Err_WEW_open_Click

Dim stAppName As String



stAppName = "EXCEL.EXE \\J:\Firma\DLOGISTICS\Packing\Produktie\DLPControlTools\WEWtoepassing.xls "

Call Shell(stAppName, 1)



Exit_WEW_open_Click:


Exit Sub



Err_WEW_open_Click:

MsgBox Err.Description
Resume Exit_WEW_open_Click



End Sub

* opgelet met spaties in het pad
* dubbele slash enkel voor servertoepassingen \\servernaam\d:\bestand.xls bvb
\\servernaam\localpath\.....\bestand.xls
onder netwerklocaties staan normaal gezien de servers