Précédent   Forum des professionnels en informatique > Logiciels > Microsoft Office > Word > VBA Word
Partagez cette discussion sur d'autres réseaux sociaux : Viadeo Twitter Google Facebook Digg Delicious MySpace Yahoo
Réponse Proposer ce sujet en actualité
 
Outils de la discussion
Publicité
'
Vieux 22/03/2006, 14h21   #1
Membre du Club
 
Inscription : février 2006
Messages : 159
Détails du profil
Informations personnelles :
Localisation : France

Informations forums :
Inscription : février 2006
Messages : 159
Points : 46
Points : 46
Par défaut [VBA-W]

Bonjour à tous !

Je souhaiterais apprendre comment faire pour que le contenu
d'une inputbox s'inscrive dans une page word.

Je vous remercie par avance de votre réponse
Jean Marc

Code :
1
2
3
4
5
6
7
8
9
10
11
12
13
14
Sub test()
MsgBox ("bonjour")
Dim jour
Dim nom
Dim prenom
 
jour = Date
MsgBox (jour)
nom = InputBox("veuillez préciser votre nom")
MsgBox ("votre nom est " & nom)
prenom = InputBox("Veuillez préciser votre prénom")
MsgBox ("Votre prenom est" & prenom)
 
End Sub
Balises 'code' ajoutées par AlainTech
Merci d'y penser à l'avenir

Et change ton titre, il ne signifie rien. Lis les règles, elles donnent un tas de renseignements utiles.
Commentaire gentiment ajouté par ouskel'n'or.
jcaspar est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 22/03/2006, 14h44   #2
Inactif
 
Avatar de jmfmarques
 
Inscription : décembre 2005
Messages : 3 784
Détails du profil
Informations forums :
Inscription : décembre 2005
Messages : 3 784
Points : 4 125
Points : 4 125
Tu n'aurais pas l'impression très nette de ce que le titre de ton sujet : "VBA WORD" est pour le moins très général et non révêlateur du problème que tu veux résoudre dans VBA WORD ?
Si tu veux une aide, il me semble que tu devrais commencer par modifier ce titre...
jmfmarques est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 25/03/2006, 22h46   #3
Inactif
 
Avatar de ouskel'n'or
 
Inscription : février 2005
Messages : 12 466
Détails du profil
Informations forums :
Inscription : février 2005
Messages : 12 466
Points : 11 930
Points : 11 930
Pour insérer une réponse à un inputbox, essaie ça :
Code :
1
2
3
4
5
6
Réponse = InputBox("As-tu lu les règles du forum ?" & vbCrLf & "Non, tu n'as pas lu les règles du forum !" & vbCrLf & "Si tu l'as fait, réponds à la question : " & vbCrLf & "- Où est le bouton pour baliser le code ? " & vbCrLf & vbCrLf & "Tu as une seconde", "EN HAUT AU CENTRE !", "En dessus de la fenêtre au centre")
If Not Réponse = "En dessus de la fenêtre au centre" Then
       MsgBox "T'as tout faux, t'es recalé !"
       Exit Sub
End If
Selection.TypeText Text:=Réponse 'Place le text au point d'insertion (là où se trouve le curseur)
A+

Edit
Et modifie ton sujet ! Bouton [ Editer ]
ouskel'n'or est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 25/03/2006, 23h24   #4
Membre du Club
 
Inscription : juin 2005
Messages : 220
Détails du profil
Informations forums :
Inscription : juin 2005
Messages : 220
Points : 47
Points : 47
Je te conseils une recherche sur la FAQ VBA du site, elle est très bien faite. Sinon va faire un tour sur un de mes anciens topic, tu trouveras du code source très intéressant por ta requête :

http://www.developpez.net/forums/viewtopic.php?t=471683&highlight=vba

Bon courage !
soad029 est déconnecté   Envoyer un message privé Réponse avec citation 00
Réponse Proposer ce sujet en actualité
Outils de la discussion



Fuseau horaire GMT +2. Il est actuellement 06h50.


 
 
 
 
Partenaires

Hébergement Web