Le portail francophone de la géomatique

JeffC1977 · Mon 08 March 2010 16:25

Bonjour je cherche et je cherche mais je trouve rien.

Je veux tout simplement poser une question mais dans autocad.
Exemple...

Code....

Le texte est-il bien orient. (Y), (N)

Si utilisateur appuis sur Y alors sinon

Je ne trouve pas le code VBa afin de poser une question et attendre la réponse.

Merci de votre aide

JeffC1977 · Mon 08 March 2010 17:09

J'ai fini par trouver....

si ca peut aider...

Code:

Dim kwordList As String
    kwordList = "Oui Non"
    ActiveDocument.Utility.InitializeUserInput 1, kwordList

    Dim returnString As String
    returnString = ActiveDocument.Utility.GetKeyword("Orientation OK ? (Oui)(Non): ")

ChristopheV · Mon 08 March 2010 17:23

Bonjour,

Vous avez aussi le plus classique VBA:

Code:

Sub toto()
a$ = MsgBox("Question", vbYesNo, "test")
End Sub

ou si vous souhaitez faire une entrée utilisateur

Code:

Sub toto()
a$ = InputBox("Question", "Test", "")
End Sub

A+

Jeirhome · Mon 08 March 2010 17:32

Si je saisis bien la subtilité, c'est qu'avec le code de JeffC1977, la question est faite dans la console d'AutoCAD, le sacrosaint lieu de toutes les informations et commandes dans AutoCAD Je me trompe ?

ChristopheV · Mon 08 March 2010 18:48

Non tu ne te trompe pas.

Sous un aspect plus "dev" d'un coté code JeffC1977 il s'agit du modèle objet autocad avec sa IHM propre, d'un autre il s'agit des fonctions natives de windows traduites en VB (A pour le coup) avec son système de fenêtres.

A+

Communauté	Ressources	L'emploi	Le marché	L'association	Fils RSS
Forum Blogs Wiki Planet Sites amis	Agenda Biblio Fiches AMO-CNIG Paris PCGIS Téléchargements	Offres d'emploi Banque de CV Formations Démarche Métiers	Geo-Entreprises Geo-Communiqué Appels d'offres	L'association Qui sommes-nous ? Nous aider Bienfaiteurs Partenaires Historique Statuts	Tout le site Job Géomatique Services GeoBlogs ...	Faire un don Mentions légales

Le portail francophone de la géomatique

Annonce

#1 Mon 08 March 2010 16:25

VBA Poser une question dans Autocad

#2 Mon 08 March 2010 17:09

Re: VBA Poser une question dans Autocad

Code:

#3 Mon 08 March 2010 17:23

Re: VBA Poser une question dans Autocad

Code:

Code:

#4 Mon 08 March 2010 17:32

Re: VBA Poser une question dans Autocad

#5 Mon 08 March 2010 18:48

Re: VBA Poser une question dans Autocad

Pied de page des forums