OVH Cloud OVH Cloud

objet forms

2 réponses
Avatar
jean jacques 94
office 2003 en vba:

1)à partir de word , peut-on accéder à un objet forms dans excel 2003

2)à partir d'excel 2003 , j'aimerais utiliser un formulaire word pour entrer
des données dans excel
Dans un procédure ,j'ouvre le formulaire word ,j'aimerais mettre en suspens
le code vba excel qui suit , passer la main à word , et quand je quitte word
redonner la main au code vba excel
y a t'il des procédures d'evenements pour ce genre d'action
merci pour votre aide

JJK

2 réponses

Avatar
michdenis
Bonjour Jean jacques,

1- Oui c'est possible, mais il faut ouvrir ton fichier excel contenant ton formulaire.

Voici un petit exemple de code pour ouvrir un fichier excel à partir de Word
J'ai supposé que tu avais dans ton fichier excel une macro
nommée "OuvertureFormulaire" dont le but était d'ouvrir le formulaire désiré.
'------------------
Sub OuvrirExcel()
Dim Xl as object , Wk As workbook
Set xl = createdobject("Excel.Application")
set Wk = xl.workbooks.Open ("Chemin&NomDeTonClasseur")
xl.Run "OuvertureFormulaire"
End Sub
'------------------


2- Pour ouvrir Word à partir d'excel
'-------------------------
Sub OuvrirWord()
dim Wd as object, Doc as object
Set Wd = createdobject("Word.Application")
set Doc = wd.Documents("Chemin & NomFicherWord")
End Sub
'-------------------------

3- y a t'il des procédures d'evenements pour ce genre d'action
À partir de l'événement de ton choix dans excel, il s'agit simplement
d'appeler la macro.


Salutations!



"jean jacques 94" a écrit dans le message de news:
office 2003 en vba:

1)à partir de word , peut-on accéder à un objet forms dans excel 2003

2)à partir d'excel 2003 , j'aimerais utiliser un formulaire word pour entrer
des données dans excel
Dans un procédure ,j'ouvre le formulaire word ,j'aimerais mettre en suspens
le code vba excel qui suit , passer la main à word , et quand je quitte word
redonner la main au code vba excel
y a t'il des procédures d'evenements pour ce genre d'action
merci pour votre aide

JJK
Avatar
michdenis
Modification de cette ligne :
set Doc = wd.Documents("Chemin & NomFicherWord")

par celle-ci :

set Doc = wd.Documents.Open("Chemin & NomFicherWord")


Salutations!


"michdenis" a écrit dans le message de news:
Bonjour Jean jacques,

1- Oui c'est possible, mais il faut ouvrir ton fichier excel contenant ton formulaire.

Voici un petit exemple de code pour ouvrir un fichier excel à partir de Word
J'ai supposé que tu avais dans ton fichier excel une macro
nommée "OuvertureFormulaire" dont le but était d'ouvrir le formulaire désiré.
'------------------
Sub OuvrirExcel()
Dim Xl as object , Wk As workbook
Set xl = createdobject("Excel.Application")
set Wk = xl.workbooks.Open ("Chemin&NomDeTonClasseur")
xl.Run "OuvertureFormulaire"
End Sub
'------------------


2- Pour ouvrir Word à partir d'excel
'-------------------------
Sub OuvrirWord()
dim Wd as object, Doc as object
Set Wd = createdobject("Word.Application")
set Doc = wd.Documents("Chemin & NomFicherWord")
End Sub
'-------------------------

3- y a t'il des procédures d'evenements pour ce genre d'action
À partir de l'événement de ton choix dans excel, il s'agit simplement
d'appeler la macro.


Salutations!



"jean jacques 94" a écrit dans le message de news:
office 2003 en vba:

1)à partir de word , peut-on accéder à un objet forms dans excel 2003

2)à partir d'excel 2003 , j'aimerais utiliser un formulaire word pour entrer
des données dans excel
Dans un procédure ,j'ouvre le formulaire word ,j'aimerais mettre en suspens
le code vba excel qui suit , passer la main à word , et quand je quitte word
redonner la main au code vba excel
y a t'il des procédures d'evenements pour ce genre d'action
merci pour votre aide

JJK