|
AutoCAD VBA : VBA optionButton1 Aktive oder deaktive
dw am 06.02.2008 um 11:07 Uhr (0)
Hallo,Habe ein problem mit ein optionButtonHabe unter optionButton1 layer Grundriss einblenden und unter optionButton2 layer Grundriss ausblende. Das geht mit diese code:Private Sub knopm2zeigen_Click()ZEIGENIf knopm2zeigen = True ThenOn Error Resume NextThisDrawing.Layers.Add("7_Tekt_M2").Freeze = FalseThisDrawing.Layers.Add("7_Tekt_M2").LayerOn = TrueElseThisDrawing.Layers.Add("7_Tekt_M2").Freeze = TrueThisDrawing.Layers.Add("7_Tekt_M2").LayerOn = FalseEnd IfThisDrawing.Regen (acActiveViewport)End SubPri ...
| | In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : ein selektion mit eimem crossing
dw am 19.11.2008 um 15:46 Uhr (0)
Hallo,habe da ein problem mit das selectieren im autocad,ich kann nicht diverse objekten wahlen dürch eine crossing.das ist meine code....was mach ich da falsch??Private Sub selektzelf_Click()Call ExcelKoppelenDim O As AcadEntityDim P As VariantCall AutoCAD.ZoomAllMe.HideHier kommt meine fehler meldung.... Call ThisDrawing.Utility.GetEntity(O, P, "selekteer een block")Call ThisDrawing.Utility.GetEntity(O, P, "een tekst")Dim blok As AcadBlockReferenceSet blok = ODim attributen As VariantIf blok.HasAttribute ...
| | In das Form AutoCAD VBA wechseln |
|
Anzeige:
Anzeige: (Infos zum Werbeplatz)
 |