cs_Le routier
Messages postés16Date d'inscriptionlundi 20 février 2006StatutMembreDernière intervention19 mai 2006
-
20 févr. 2006 à 14:10
cs_Le routier
Messages postés16Date d'inscriptionlundi 20 février 2006StatutMembreDernière intervention19 mai 2006
-
21 févr. 2006 à 09:53
Bonjour,
Je débute en VBA sous Excel et j'ai un souci : Pour l'execution de ma macro, j'ai besoins de récup des données d'un autre fichier (différent à chaque fois). Pour cela j'utilise l'application GetOpenFilename qui m'ouvre la fenêtreOUVRIR un fichier.
Ca marche bien seulement je n'arrive pas a lui donner le chemin vers le serveur et le dossier contenant mon fichier ( il se dirige vers "Mes documents") car chdir et chdrive ne marchent pas pour les serveurs aparament ....
Voici mon code :
Sub Macro1()
NO:
ChDir (" \\Serveur1\Dossier1\ " ) ' Ne marche pas ...
If FICHIERAOUVRIR <> False Then
r = MsgBox("Validez vous la sélection de ce fichier ?" + Chr(10) + Chr(10) + Chr(13) + FICHIERAOUVRIR, vbQuestion + vbYesNo, "VALIDATION")
Select Case r
Case vbNo
GoTo NO
Case vbYes
End Select
End If
'
End Sub
Si vous avez une idée n'hésitez pô...
Merci
Bonne jrnée
Tous pour un, rhume pour tous ....
A voir également:
"Url de la page, sur votre site, où est affiché le lien vers"
cs_Le routier
Messages postés16Date d'inscriptionlundi 20 février 2006StatutMembreDernière intervention19 mai 2006 21 févr. 2006 à 09:53
J'ai réussi à me dépatouiller !!!
Comme j'ai vu plusieurs fois cette question et qu'il n'y avait pas de réponses vraiment adéquates (enfin pour moi en tt cas) je met donc en ligne ma proposition et je me la valide !! :
With Application
.DefaultFilePath = " \\Serveur1\dossier1\sousdossier1"
End With
Si kk'1 connais une autre solution plus "PRO" n'hésitez pas ...