Sujet Précédent Sujet Suivant

Ouvrir un fichier Word [VBA]

Fermé
Ctesias Messages postés 724 Date d'inscription lundi 16 mai 2011 Statut Membre Dernière intervention 1 décembre 2011 - 10 juin 2011 à 10:41
gourouza Messages postés 3 Date d'inscription mercredi 16 juillet 2014 Statut Membre Dernière intervention 17 juillet 2014 - 17 juil. 2014 à 11:33
Bonjour,

Alors voila, j'ai fait des recherches sur le net pour l'ouverture d'un fichier Word en VBA, pis la copie de lignes vers ce fichier word.

Ceci donne cela: 
Private Sub CommandButton1_Click()
Dim plan As String
Dim WordApp As New Word.Application


plan = "C:\Documents and Settings\faf3\Bureau\Programmes Excel\PLAN PREVENTION.doc"

WordApp.Documents.Open plan
Range("B1:F3").Select
Selection.Copy
WordApp.Visible = True
ActiveSheet.Paste

End Sub

Mais, un erreur apparait au lancement: "Erreur de ocmpilation: Type définie par l'utilisateur non défini". et me surligne "Dim WordApp As New Word.Application".

Alors est-ce parce que Excel 2000 ne supporte pas cela, ou est-ce parce que j'ai fait un erreur dans mon code?

Merci d'avance pour vos réponses,

Ctesias

A voir également:

4 réponses

Réponse 1 / 4
pijaku Messages postés 12263 Date d'inscription jeudi 15 mai 2008 Statut Modérateur Dernière intervention 4 janvier 2024 2 743
10 juin 2011 à 12:58
Bonjout,
Sous VBE, Outils/Référence cocher "Microsoft Word xx.0 Object library"
xx est un numéro qui dépends de votre version d'excel...
Sur mon 2003 : "Microsoft Word 11.0 Object library"
0
Réponse 2 / 4
Ctesias Messages postés 724 Date d'inscription lundi 16 mai 2011 Statut Membre Dernière intervention 1 décembre 2011 36
14 juin 2011 à 08:00
Bonjour,

Ok, merci, je vais essayer.

P.S: Pardon de la lenteur de ma réponse, mais je n'etai pas dispo du WE.
0
Réponse 3 / 4
Ctesias Messages postés 724 Date d'inscription lundi 16 mai 2011 Statut Membre Dernière intervention 1 décembre 2011 36
14 juin 2011 à 08:09
Bon, j'ai essayé, il me met juste une erreur sur :

"WordApp.Documents.Open plan"

Comme quoi, il trouve pas le fichier, or, le chemin est bon, j'ai vérifié la casse...
0
pijaku Messages postés 12263 Date d'inscription jeudi 15 mai 2008 Statut Modérateur Dernière intervention 4 janvier 2024 2 743
14 juin 2011 à 08:30
Bonjour,
Je viens de tester à nouveau, ton code fonctionne parfaitement chez moi...
0
Ctesias Messages postés 724 Date d'inscription lundi 16 mai 2011 Statut Membre Dernière intervention 1 décembre 2011 36
14 juin 2011 à 08:39
Et bien, je ne comprend pas trop la...
0
pijaku Messages postés 12263 Date d'inscription jeudi 15 mai 2008 Statut Modérateur Dernière intervention 4 janvier 2024 2 743
14 juin 2011 à 08:41
As tu essayé d'ouvrir un autre fichier word?
Enregistre un .doc vite fait, avec un nom tout simple, un chemin d'accès encore plus simple (par ex : C:/toto.doc) et tente l'expérience à nouveau...
0
michel_m Messages postés 16603 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023 3 303
Modifié par michel_m le 14/06/2011 à 10:44
Bonjour les 2

avec excel 2000
activer Microsoft Word 9.0 object library
et Microsoft Visual Basic For Applications Extensibility
0
Ctesias Messages postés 724 Date d'inscription lundi 16 mai 2011 Statut Membre Dernière intervention 1 décembre 2011 36
14 juin 2011 à 11:24
Hello Michel_m.

J'ai bien activé ce que tu me dit, seulement, toujorus la meme erreur: impoissible de trouver le fichier. Or, l'emplacement est le bon, j'en suis sur...
0
Réponse 4 / 4
gourouza Messages postés 3 Date d'inscription mercredi 16 juillet 2014 Statut Membre Dernière intervention 17 juillet 2014 1
17 juil. 2014 à 11:33
LANCE la fenetre module de ACCESS, clic sur OUtil ensuite Références et coher Microsoft word 14.0
ensuite efface Range("B1:F3").Select
Selection.Copy
dans ton code
0

Discussions similaires

ouverture d'un fichier excel à partir d'un code VBA
TraderAS -
pijaku -

3 réponses
"Aucune application permettant d'ouvrir cette URL"
sidojaice -
JIP -

24 réponses