Classement
Contenu populaire
Affichage du contenu avec la meilleure réputation le 28/06/2012 dans Messages
-
J'allais le dire, ça transformait l'integer en variant... Tu as une ligne inutile en haut du coup. ;) Dim FiltersType, FiltersData As Variant1 point
-
Je ne sais pas si les array sont dynamiques ou pas en VBA... Si la réponse est non, il faut peut être redimensionner les 2 array FilterType() et FilterData() ? Peut-être qu'il suffit de déclarer le 2e élément (indice 1) des tableaux, comme tu l'as fait au début du code pour les 1ers (indice 0) ? Dim FilterType(1) As Integer Dim FilterData(1) As Variant1 point
-
J'ai testé, ça ne fonctionne pas j'ai un message d'erreur "l'indice n'appartient pas à la selection" sur la ligne FilterType(1) = 8 ' code DXF du calque de l'objet j'ai regarder là c'est le bon DXF1 point
-
Salut, tu vas dans le module terrain : terrain/zone de décapage/saisir1 point
-
Bonjour, Je ne m'y connais pas vraiment en VBA, mais je dirais qu'il faudrait remplacer : FilterType(0) = 8 FilterData(0) = NewZone par quelque chose comme ça : FilterType(0) = 0 ' code DXF du type de l'objet FilterData(0) = "LWPOLYLINE" ' type de l'objet FilterType(1) = 8 ' code DXF du calque de l'objet FilterData(1) = "0" ' nom du calque pour ne garder que les polylignes appartenant au calque 0.1 point
-
je viens de trouver une fonction sur Lumion qui redresse l'image ou du moins nous replace droit pour éviter les traits inclinés CTRL + H qui existe depuis la version 2.1 B3 marche très bien sur ma version 2.5 ;)1 point