OVH Cloud OVH Cloud

Ouverture de fichier

5 réponses
Avatar
dchastang
Bonjour à tous,

J'avoue je débute que dans la programmation en VB.
Je souhaiterais ouvrir un fichier ".doc" à partir d'un VB, comment faut-il
que je fasse ?

Merci pour vos réponses

Dams

5 réponses

Avatar
Zoury
Salut! :O)

Que souhaites-tu en faire?


1. Si c'est uniquement pour l'ouvrir dans Word.exe et ce de manière
asynchrone avec ton programme, regarde du côté de l'API ShellExecute..

Comment ouvrir un fichier à partir d'une application VB ?
http://faq.vb.free.fr/index.php?question=8


2. Si tu souhaites l'ouvrir dans Word.exe mais faire en sorte que ton code
attende la fermeture de Word.exe pour continuer son exécution, regarde
l'exemple suivant ainsi que tous ceux qui y sont reliés (section related
dans l'entête) :

Determining the End of a Shelled Application Using WaitForSingleObject
http://www.mvps.org/vbnet/index.html?http://www.mvps.org/vbnet/faq/main/waitforsingleobject.htm


3. Si tu souhaites l'ouvrir et garder le contrôle sur le fichier ou son
affichage aifn d'y faire des modifications par exemple, tu devras utilisé ce
qu'on appelle l'automation, l'article suivant devrait t'être utile. :

Automating Microsoft Office 97 and Microsoft Office 2000
http://msdn.microsoft.com/library/en-us/dno2kta/html/offaut.asp

tu trouveras également beaucoup d'exemple dans les archives, voici l'adresse
pour y effectuer des recherches :
http://groups.google.com/advanced_group_search?q=group:*.vb.*&num0&hl=fr&lr=&ie=UTF-8&oe=UTF-8


Maintenant si tu as des questions concernant l'une ou l'autre des méthodes
ou si je n'ai pas répondu à ta question, n'hésite pas à le dire. ;O)

--
Cordialement
Yanick Lefebvre - MVP pour Visual Basic
http://faq.vb.free.fr/?rubrique=0 - http://www.mvps.org/vbnet/
http://www.mentalis.org/agnet/apiguide.shtml - http://www.mztools.com/

Merci de poster les réponses au groupe afin d'en faire profiter à tous
Avatar
François Picalausa
Hello!

Je sais pas si tu as vu le code de Jean Michel sur le sujet des collections
mais j'aimerais que tu y jette un oeil si tu as le temps:

Option Explicit

Private Mycollection As Collection

Private Sub Command1_Click()
'ajoute un tableau à la collection
Dim MonTableau(4) As Byte

MonTableau(0) = 21
MonTableau(1) = 17
MonTableau(2) = 42
MonTableau(3) = 87

Mycollection.Add MonTableau, Text1.Text
End Sub

Private Sub Command2_Click()
'Retourne des valeurs stoquées
Dim i As Byte
Mycollection.Item(Text1.Text)(4) = 28
For i = 0 To 4
Debug.Print Mycollection.Item(Text1.Text)(i)
Next i
'Retourne
'21
'17
'42
'87
'*0*
End Sub

Private Sub Form_Initialize()
Set Mycollection = New Collection
End Sub

Private Sub Form_Terminate()
Set Mycollection = Nothing
End Sub

Cette "erreur" est-elle un bug ou un mécanisme auquel je n'ai pas compris et
auquel je ne comprendrai jamais rien? ;-)
Si tu as une quelconque explication, je serai content de l'entendre :-D

Sinon, de grome sur "dialogue entre fenêtre", j'ai l'impression que je
deviens fou...Peux-tu confrmer cela? ;-)
Ou éventuellement tenter de lui dire que le but est de passer par un objet
et pas par une série d'APIs? ;-)

--
François Picalausa (MVP VB)
FAQ VB : http://faq.vb.free.fr
MSDN : http://msdn.microsoft.com
Avatar
Bismark Prods
ca ressemble a un message person ?

"François Picalausa" a écrit dans le message de
news:
Hello!

Je sais pas si tu as vu le code de Jean Michel sur le sujet des


collections
mais j'aimerais que tu y jette un oeil si tu as le temps:

Option Explicit

Private Mycollection As Collection

Private Sub Command1_Click()
'ajoute un tableau à la collection
Dim MonTableau(4) As Byte

MonTableau(0) = 21
MonTableau(1) = 17
MonTableau(2) = 42
MonTableau(3) = 87

Mycollection.Add MonTableau, Text1.Text
End Sub

Private Sub Command2_Click()
'Retourne des valeurs stoquées
Dim i As Byte
Mycollection.Item(Text1.Text)(4) = 28
For i = 0 To 4
Debug.Print Mycollection.Item(Text1.Text)(i)
Next i
'Retourne
'21
'17
'42
'87
'*0*
End Sub

Private Sub Form_Initialize()
Set Mycollection = New Collection
End Sub

Private Sub Form_Terminate()
Set Mycollection = Nothing
End Sub

Cette "erreur" est-elle un bug ou un mécanisme auquel je n'ai pas compris


et
auquel je ne comprendrai jamais rien? ;-)
Si tu as une quelconque explication, je serai content de l'entendre :-D

Sinon, de grome sur "dialogue entre fenêtre", j'ai l'impression que je
deviens fou...Peux-tu confrmer cela? ;-)
Ou éventuellement tenter de lui dire que le but est de passer par un objet
et pas par une série d'APIs? ;-)

--
François Picalausa (MVP VB)
FAQ VB : http://faq.vb.free.fr
MSDN : http://msdn.microsoft.com




Avatar
François Picalausa
"Bismark Prods" a écrit dans le message de
news:
ca ressemble a un message person ?



ou a un ooouuupppsss pourquoi j'ai cliqué à côté? ;-)
Sorry pour ce message qui n'aurait pas du appraitre ici :-(

--
François Picalausa (MVP VB)
FAQ VB : http://faq.vb.free.fr
MSDN : http://msdn.microsoft.com
Avatar
dchastang
Merci pour ta réponse assez complète.

En fait mon problème est assez simple (je pense)
Sous un formulaire sous Access, j'ai un bouton qui ouvre Word.
Je veux modifier le code VB de ce bouton pour qu'il puisse m'ouvrir un
fichier dont le nom est donné dans un champ sur ce même formulaire.
Le but étant bien sûr de l'ouvrir sous word et de le modifier.
J'ai essayé le shellexecute (Question 8) avant de poster ici, seulement il
me ressort une erreur sur le Me (je n'y comprends rien), mais est-ce la
bonne méthode.

J'ai bien été sur tes liens mais ils sont en anglais, et je le comprends
assez difficilement.

Damien


"Zoury" <yanick_lefebvre at hotmail dot com> a écrit dans le message de
news:
Salut! :O)

Que souhaites-tu en faire?


1. Si c'est uniquement pour l'ouvrir dans Word.exe et ce de manière
asynchrone avec ton programme, regarde du côté de l'API ShellExecute..

Comment ouvrir un fichier à partir d'une application VB ?
http://faq.vb.free.fr/index.php?question=8


2. Si tu souhaites l'ouvrir dans Word.exe mais faire en sorte que ton code
attende la fermeture de Word.exe pour continuer son exécution, regarde
l'exemple suivant ainsi que tous ceux qui y sont reliés (section related
dans l'entête) :

Determining the End of a Shelled Application Using WaitForSingleObject



http://www.mvps.org/vbnet/index.html?http://www.mvps.org/vbnet/faq/main/waitforsingleobject.htm


3. Si tu souhaites l'ouvrir et garder le contrôle sur le fichier ou son
affichage aifn d'y faire des modifications par exemple, tu devras utilisé


ce
qu'on appelle l'automation, l'article suivant devrait t'être utile. :

Automating Microsoft Office 97 and Microsoft Office 2000
http://msdn.microsoft.com/library/en-us/dno2kta/html/offaut.asp

tu trouveras également beaucoup d'exemple dans les archives, voici


l'adresse
pour y effectuer des recherches :



http://groups.google.com/advanced_group_search?q=group:*.vb.*&num0&hl=fr&lr=&ie=UTF-8&oe=UTF-8


Maintenant si tu as des questions concernant l'une ou l'autre des méthodes
ou si je n'ai pas répondu à ta question, n'hésite pas à le dire. ;O)

--
Cordialement
Yanick Lefebvre - MVP pour Visual Basic
http://faq.vb.free.fr/?rubrique=0 - http://www.mvps.org/vbnet/
http://www.mentalis.org/agnet/apiguide.shtml - http://www.mztools.com/

Merci de poster les réponses au groupe afin d'en faire profiter à tous