winfield

Salut, on comence tj par Sub Toto ............. 'Code ............ End sub Ici le fait de commencer par "Sub" revient à dire "Public Sub Toto", si tu veux que ça soit privé, ce sera "Private" à la place de "Public", dans le cas d'une form, tout est "Private". Ni de nombres à virgule.... Interroge l'etiquette : If MonBlock.GetAttributes(0).TagString="MonEtiquette1" Then MonBlock.GetAttributes(0).TextString="MaValeur1" End If Bonne continuation

C'est pas sur le bouton qu'il faut mettre le code. Tu as 2 boutons radio et un OK Private Sub Button1_Click() End Sub Private Sub Button2_Click() End Sub Un bouton est 0 ou 1 Private Sub BoutonOK ................................ If Button1 = False Then ..................... Else ....................... End If End Sub Pour le bloc existant dans le fichier en cour : Dim insertionPnt(0 To 2) As Double Dim MonBlock As AcadBlockReference insertionPnt(0) = 0: insertionPnt(1) = 0: insertionPnt(2) = 0 Set MonBlock = ThisDrawing.ModelSpace.InsertBlock(insertionPnt, 1, 1, 1, 0) (Si tu veux cliquer à l'écran pour le point, passe par GetPoint.) Pour l'attribut: MonBlock.GetAttributes(0).TextString="MaValeur1"

C'est plus compliqué que ça, va falloir changer bien plus qu'une ligne pour faire ce qur tu veux si j'ai bien compris ce que tu veux faire.

Salut, cette routine (de Maxence) fonctionne très bien, le prob ne vient pas de la routine. g_barthe a mis le doigt sur le prob. "AutoCAD 2000 Type Library Manquant" c'est ce que tu a dû voir le premier coup, le désactiver si ce n'est déjà fait, coche "AutoCAD 200X Type Library" et ça devrait rouler.

Si c'est pour des trucs simples, une commande un peu oublié qui existait déjà sur la 14 avant je sais pas, c'est SSX, même pas besoin de taper le nom du bloc, faut juste cliquer UN bloc.

Mars ? Non je n'ai pas déménagé aussi loin et ici, la Fée est bien présente aussi :D

Hum........ comme c'est bon de pouvoir à nouveau se connecter ! :D C'est un peu comme prendre une bonne bouffée d'air frais. Environ 3 mois sans le Net, je vous garantie que c'est dur quand on est accros. Allez vais surfer un peu ;) ....me remettre un peu dans la vague.

"Du pain et des jeux" voilà ce que donnent les autorités et ce que veulent la majorité des gens.

Salut, Je trouve la chanson très...facile tant au niveau des paroles que de la musique. Ce sont toujours les mêmes qui profitent du malheur des autres pour essayer de sortir la tête de l'eau, je qualifie cette façon de faire de minable. Pour que certains ne s'offusquent pas, je le dis de suite, je ne suis pas un supporter de Zidane et encore moins de ce genre business qu'on essaye de me faire croire que c'est un sport. Les plus beaux match de foot que j'ai vu, sont ceux des enfants, ils jouent (jouaient ?) pour le jeu. Maintenant, j'ai entendu des gens dire qu'à ce niveau, on n'a pas le droit à ce genre de geste. Pourquoi ? Ne sont-ils pas des gens comme les autres ? (si la différence n'est qu'au niveau de la popularité, bonne ou mauvaise, je considère qu'ils sont parfaitement comme n'importe qui). De plus, et là c'est un avis personnel, mais chaque individu a ses limites, dans mon cas, je supporte mieux un coup physique qu'un coup verbal, et même dans les coups physiques, je supporte mieux certaines douleurs que d'autres. Zidane eu sa punition et si effectivement le joueur italien à provoqué, il n'a eu que ce qu'il mérite. Pour finir, je m'étonne toujours de la quantité d'encre que peut faire couler un évènement de ce genre et sur lequel tout le monde s'accorde à dire que le sujet est sans intérêt.

Les maillages de SU sont des quadrilatères, un mnt sous cova n'est composé que de triangles. du coup je me demandais ce que ça allait donner au niveau de la conversion entre ces 2 softs..

je vais jouer l'oiseau de mauvaise augure... avoir des points est une chose, reste à savoir si SU sait faire le maillage automatiquement, car suivant le nombre de points, ça risque d'être long :( . Faire le mnt sous cova est une bonne idée mais le "problème" est que SU fait des maillage avec quatre points si je ne m'abuse, je ne sais pas ce que ça va donner :casstet: Bon courage

ça pourrait être une idée : sélection de la région par un pts explode récupération de la liste des entités faire une selection par le pts si l'objet est une ligne récupération des points de dep et de fin voir si une ligne (de l'explode) a le départ ou la fin aux même points que que la ligne sélectionné, faire ainsi de suite pour trouver le contour, effacer le reste si c'est un cercle effacer le reste si... si.. si... mais ça fait du boulot surtout si les régions ont des formes bizzaroïde :o

J'ai beaucoup cherché à manipuler les reactors en vba sans trouver. effectivement, c'est vrai.par contre VBA possède un truc du genre qui sont " les évènements"...je suis loin de maitriser ces derniers mais j'y travaille. Je pense qu'on peux dire que les évènements du vb/vba sont l'équivalance des reactors du VLisp. En espérant de ne pas avoir dit trop de bêtises : bonne soirée

C'est peut-être un groupe sans nom ? De plus, [surligneur] SI [/surligneur] c'est un groupe, formé que de blocs, dans la palette propriété, ça n'indiquera que "Référence de blocs". alors le plus simple, juste un LS pour voir.....c'est peut-être idiot mais ça ne coûte rien.

bizarre, l'image me fais penser à un groupe...........

Bonsoir, Je connais Catia que de nom, mais vu qu'on parle de VBA, y a des trucs qui ne devraient pas changé. Si je comprends bien, tu veux voir ta boite de dialogue mais pouvoir bosser en même temps. Si c'est ça, dans les propriétés de la feuille mets ShowModal =false Dim Sing As Single Sing = InputBox("Entré un nombre :" & Chr(13) _ & "(Le séparateur décimal doit être le point " & Chr(13) & "...à régler dans Panneaux de config si nécessaire.)") MsgBox Format(Sing, "##.#") Désolé, mais c'est tout ce que je peux faire pour t'aider. Bonne chance

Comme l'a dit ludo, l'apostrophe ou le mot clé REM à la même signification que le ";" en lisp. La routine est commentée comme toute routine devrait l'être ("prends en de la graine", là, je parle pour moi) mais ici, Maxence, l'a fait aussi dans un but pédagogique et je l'en remercie.

Vouais bon, je disais ça pour enterrer définitivement la hache de guerre Mais, vu que tu y tiens (mais là je change de registre) : espèce de...de ... de polatouche ! :P . Ceci le polatouche est quand même une sacrée bestiole !

Bonsoir Esbe, on s'appelle tout de suite par des noms d'oiseaux ou on attend un peu ? ;) Oui Soit tu as plusieurs version d'autocad sur le pc et il se mélange les pinceaux soit .....bé je sais pas pourquoi, un module ne s'est pas chargé. Pour ça, tu fais Alt+F11, dans la fenêtre de VBA, clic sur le menu déroulant Outils/Références, et dans la librairie recherche et surtout coche ;) "AutoCAD 200X Type Library" tu peux même remonter la ligne au plus près de celle d'Excel (MicroSoft Excel XX.X Object Library) parait que c'est plus rapide. Après ça, normalement ça devrait rouler Tiens moi au courant (maxi 220V SVP)

En vba l'équivalent des réactors sont les contrôles des évènements. on peut faire du vba sous AutoCAD ainsi que sous excel donc je pense que c'est possible mais que ça doit être compliqué.

Comme ça, je dirais que c'est pas possible, à par passer par une routine.

Bonjour, voilà ce qu'il faut, du moins c'est une solution parmi d'autre http:// http://perso.orange.fr/maxence.delannoy/vba/att_excel.htm Bonne chance

Je n'ai pas ce genre de problème Commande: _dimangular Choix de l'arc, cercle, ligne ou : Entrée Indiquez le sommet de l'angle: Indiquez la première extrémité de l'angle: Indiquez la seconde extrémité de l'angle: Indiquez la position de la dimension de l'arc de cote ou [textMult/TExte/Angle]: Texte de cote = 343 Suivant où tu clics, ça met l'angle désiré Chuis peut-être à côté de la plaque...

Pour ce problème, suivant si ça vaut le coup ou pas, je mets 2 fenêtres, une qui voit l'ensemble, et l'autre pour bosser, mais c'est vrai qu'autodesk pourait faire une amélioration sur ça.

HONTE A MOI, je n'avais pas compris ce que capde06 m'avait dit http://www.cadxp.com/sujetXForum-7770.htm A croire que je suis idiot que 2 fois par ans et qu'à chaque fois, ça dure 6 mois.... :mad: M'enfin, du coup ça m'amène à une autre question. On effectue un mirroir sur un bloc, que l'opération ait été faites sur l'axe du X ou du Y ou autre, c'est toujours l'échelle des X qui est négative, pourquoi ? Merci de m'aider pour que ce soit 2x6mois-1 jour ;) ...