Avec Word : Boite de dial Ouvrir = Chemin de fichier ???
cs_Henri
Messages postés
2
Date d'inscription
lundi 21 janvier 2002
Statut
Membre
Dernière intervention
21 janvier 2002
-
21 janv. 2002 à 10:25
fernand22fr Messages postés 25 Date d'inscription jeudi 16 janvier 2003 Statut Membre Dernière intervention 1 avril 2004 - 6 juin 2003 à 11:36
fernand22fr Messages postés 25 Date d'inscription jeudi 16 janvier 2003 Statut Membre Dernière intervention 1 avril 2004 - 6 juin 2003 à 11:36
A voir également:
- Avec Word : Boite de dial Ouvrir = Chemin de fichier ???
- Php word - Conseils pratiques -PHP
- Blob word - Forum Delphi / Pascal
- Automatiser publipostage word excel - Forum Visual Basic 6
- Bookmark word ✓ - Forum Visual Basic
- Fusionner word - Forum Visual Basic
3 réponses
Zackarry
Messages postés
28
Date d'inscription
vendredi 13 juillet 2001
Statut
Membre
Dernière intervention
1 février 2002
21 janv. 2002 à 15:10
21 janv. 2002 à 15:10
-------------------------------
Réponse au message :
-------------------------------
Une colle pour débutant :
Comment faire apparaître sous Word une fenêtre du type ouvrire et ensuite récupérer le chemin du fichier dans une variable VBA.
La commande GetOpenFileName fonctionne avec Excel mais pas avec Word !! ZUT
La boite de dialogue Open de Word ne renvoit pas le chemin du fichier spécifier. RE ZUT.
Je ne comprend pas pourquoi certaines commandes ne fonctionnent pas avec Word et Excel ….
Merci de m’aider..
Tiens gamin !! essaie ca !!
Function opeName() As String
Dim MyDialg As Dialog, backDial As Integer, Nom As String, path As String, nComp As String
Set MyDialg = Dialogs(wdDialogFileOpen)
backDial = MyDialg.Display
If backDial = -1 Then Nom MyDialg.Name: path CurDir: nComp = path & "" & Nom
Else
openName = ""
End If
MsgBox nComp
End Function
Réponse au message :
-------------------------------
Une colle pour débutant :
Comment faire apparaître sous Word une fenêtre du type ouvrire et ensuite récupérer le chemin du fichier dans une variable VBA.
La commande GetOpenFileName fonctionne avec Excel mais pas avec Word !! ZUT
La boite de dialogue Open de Word ne renvoit pas le chemin du fichier spécifier. RE ZUT.
Je ne comprend pas pourquoi certaines commandes ne fonctionnent pas avec Word et Excel ….
Merci de m’aider..
Tiens gamin !! essaie ca !!
Function opeName() As String
Dim MyDialg As Dialog, backDial As Integer, Nom As String, path As String, nComp As String
Set MyDialg = Dialogs(wdDialogFileOpen)
backDial = MyDialg.Display
If backDial = -1 Then Nom MyDialg.Name: path CurDir: nComp = path & "" & Nom
Else
openName = ""
End If
MsgBox nComp
End Function
cs_Henri
Messages postés
2
Date d'inscription
lundi 21 janvier 2002
Statut
Membre
Dernière intervention
21 janvier 2002
21 janv. 2002 à 21:04
21 janv. 2002 à 21:04
-------------------------------
Réponse au message :
-------------------------------
Merci du coup de main …..
So long man…..
-------------------------------
Réponse au message :
-------------------------------
Une colle pour débutant :
Comment faire apparaître sous Word une fenêtre du type ouvrire et ensuite récupérer le chemin du fichier dans une variable VBA.
La commande GetOpenFileName fonctionne avec Excel mais pas avec Word !! ZUT
La boite de dialogue Open de Word ne renvoit pas le chemin du fichier spécifier. RE ZUT.
Je ne comprend pas pourquoi certaines commandes ne fonctionnent pas avec Word et Excel ….
Merci de m’aider..
Tiens gamin !! essaie ca !!
Function opeName() As String
Dim MyDialg As Dialog, backDial As Integer, Nom As String, path As String, nComp As String
Set MyDialg = Dialogs(wdDialogFileOpen)
backDial = MyDialg.Display
If backDial = -1 Then Nom MyDialg.Name: path CurDir: nComp = path & "" & Nom
Else
openName = ""
End If
MsgBox nComp
End Function
Réponse au message :
-------------------------------
Merci du coup de main …..
So long man…..
-------------------------------
Réponse au message :
-------------------------------
Une colle pour débutant :
Comment faire apparaître sous Word une fenêtre du type ouvrire et ensuite récupérer le chemin du fichier dans une variable VBA.
La commande GetOpenFileName fonctionne avec Excel mais pas avec Word !! ZUT
La boite de dialogue Open de Word ne renvoit pas le chemin du fichier spécifier. RE ZUT.
Je ne comprend pas pourquoi certaines commandes ne fonctionnent pas avec Word et Excel ….
Merci de m’aider..
Tiens gamin !! essaie ca !!
Function opeName() As String
Dim MyDialg As Dialog, backDial As Integer, Nom As String, path As String, nComp As String
Set MyDialg = Dialogs(wdDialogFileOpen)
backDial = MyDialg.Display
If backDial = -1 Then Nom MyDialg.Name: path CurDir: nComp = path & "" & Nom
Else
openName = ""
End If
MsgBox nComp
End Function
fernand22fr
Messages postés
25
Date d'inscription
jeudi 16 janvier 2003
Statut
Membre
Dernière intervention
1 avril 2004
6 juin 2003 à 11:36
6 juin 2003 à 11:36
-------------------------------
Réponse au message :
-------------------------------
>
>
>
>
> -------------------------------
> Réponse au message :
> -------------------------------
>
> Une colle pour débutant :
>
> Comment faire apparaître sous Word une fenêtre du type ouvrire et ensuite récupérer le chemin du fichier dans une variable VBA.
> La commande GetOpenFileName fonctionne avec Excel mais pas avec Word !! ZUT
> La boite de dialogue Open de Word ne renvoit pas le chemin du fichier spécifier. RE ZUT.
> Je ne comprend pas pourquoi certaines commandes ne fonctionnent pas avec Word et Excel ..
> Merci de m'aider..
>
> Tiens gamin !! essaie ca !!
>
> Function opeName() As String
>
> Dim MyDialg As Dialog, backDial As Integer, Nom As String, path As String, nComp As String
>
> Set MyDialg = Dialogs(wdDialogFileOpen)
>
> backDial = MyDialg.Display
> If backDial = -1 Then> Nom MyDialg.Name: path CurDir: nComp = path & "" & Nom
> Else
> openName = ""
> End If
>
> MsgBox nComp
> End Function
Réponse au message :
-------------------------------
>
>
>
>
> -------------------------------
> Réponse au message :
> -------------------------------
>
> Une colle pour débutant :
>
> Comment faire apparaître sous Word une fenêtre du type ouvrire et ensuite récupérer le chemin du fichier dans une variable VBA.
> La commande GetOpenFileName fonctionne avec Excel mais pas avec Word !! ZUT
> La boite de dialogue Open de Word ne renvoit pas le chemin du fichier spécifier. RE ZUT.
> Je ne comprend pas pourquoi certaines commandes ne fonctionnent pas avec Word et Excel ..
> Merci de m'aider..
>
> Tiens gamin !! essaie ca !!
>
> Function opeName() As String
>
> Dim MyDialg As Dialog, backDial As Integer, Nom As String, path As String, nComp As String
>
> Set MyDialg = Dialogs(wdDialogFileOpen)
>
> backDial = MyDialg.Display
> If backDial = -1 Then> Nom MyDialg.Name: path CurDir: nComp = path & "" & Nom
> Else
> openName = ""
> End If
>
> MsgBox nComp
> End Function
