Bonjour à tous,
le code si dessous ouvre bien mon fichier mais
si celui ci est deja ouvert je souhaite seulement
le réactiver en barre des taches et ne pas avoir "en lecture seul"
Donc, quel est le code pour activer mon fichier "Aide.doc"
j'ai fait référence à Word9 en projet
je pense à:
on error resume next
window(Aide.doc).Activate 'cette ligne à revoir
if err=0 then exit sub
Dim wd As Word.Application
Set wd = New Word.Application
mydoc = App.Path & "\Aide.doc"
wd.Documents.Open (mydoc)
wd.Visible = True
Set wd = Nothing
Merci d'avance pour ceux qui ont la réponse
Youky ou Bruno cé pareil
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
dark poulpo
essayes en enumerant les fenetres de words et si tu trouves le nom de ton document en titre de fenetre (enfant ou pas) de word tu lui renvoi le focus ou un truc du genre
-- ----- http://dark.freezee.org/ - Dark Update v2.0 (http://dark.freezee.org/appli/start.html ) - Dark Emule v0.44b r4 - Dark 3D-X 0.7beta - Dark Shell 1.0 (le multi shell pour windows)
essayes en enumerant les fenetres de words et si tu trouves le nom de ton
document en titre de fenetre (enfant ou pas) de word tu lui renvoi le focus
ou un truc du genre
--
-----
http://dark.freezee.org/
- Dark Update v2.0 (http://dark.freezee.org/appli/start.html )
- Dark Emule v0.44b r4
- Dark 3D-X 0.7beta
- Dark Shell 1.0 (le multi shell pour windows)
essayes en enumerant les fenetres de words et si tu trouves le nom de ton document en titre de fenetre (enfant ou pas) de word tu lui renvoi le focus ou un truc du genre
-- ----- http://dark.freezee.org/ - Dark Update v2.0 (http://dark.freezee.org/appli/start.html ) - Dark Emule v0.44b r4 - Dark 3D-X 0.7beta - Dark Shell 1.0 (le multi shell pour windows)