Ouvrir un document via un bouton et un parametre

Il ne faut pas oublier d'indiquer dans une cellule l'extension du fichier

Chez moi ca ne fonctionne pas

est ce que toi tu as eu un resultat possitif

cdlt, Thierry

Ou se trouve l'erreur ?

ton fichier word a ouvrir est bien un .docx ?

Pour ton Info

Lorsque je charge et ouvre le fichier excel que tu m'as renvoyé.

Les transferts ne se font plus car il me dit bibliotheque introuvable

Le creation de mes documents word ne se font plus car pareil il me dit bibliotheque introuvable.

je ne comprends pas pourquoi.

Je n'ai aucun soucis de mon côté. J'ai re-télécharger votre dernier fichier au cas où j'aurais fait une fausse manip dans un code mais de mon côté, tout foncitonne correctement. Egalement le bouton pour créer un fichier.

Voici à nouveau le fichier

EDIT : A vérifier : Dans la fenêtre VBA ==> Onglet Outils ==> Références ==> Vérifier qu'il n'y a pas dé références cochées qui sont indiquées MANQUANTES. Si oui, les décocher et ré-essayer.

Effectivement cela fonctionne

le seul probleme que je rencontre c'est lorsque j'effectue la recherche sur un referent il me détruit ma page existant en me ramenant des objet de l'onglet IP

Comprends pas.

Sub ouvrirdoc()

Set WordApp = CreateObject("word.Application")

fich = Worksheets("Recherche Famille").Cells(4, 7)

ext = Worksheets("Recherche Famille").Cells(4, 8) (Est ce que je dois mettre en dur dans cette cellule "Docx")

WordApp.Visible = True

WordApp.Documents.Open "C:\Users\Thierry\Documents\IP en Cours evaluations\" & fich & ext

Application.WindowState = xlMinimized

End Sub

Je souffle,

J'ai beaucoup de progres a faire, mais encore felicitations tout se passe à merveille.

Ca a ete un vrai plaisirs de communiquer et travailler avec toi.

Bonne soiree et encore merci pour ta patience et ton travail.

Thierry