muck Posted September 16, 2014 Share Posted September 16, 2014 Is there a VB.net routine to change attributes in an individual drawing block that is selected. I have looked at routines the change the block reference attributes but that changes all drawing blocks in a drawing. Thank you, Quote Link to comment Share on other sites More sharing options...
BIGAL Posted September 17, 2014 Share Posted September 17, 2014 This is a VBA example of picking a block with 1 attribute Attribs(0) may be useful Function Getpitname(Newpitname As String) As String Dim PitNameSelect As AcadObject Dim pitattribs As Variant ThisDrawing.Utility.GetEntity PitNameSelect, basepnt, "pick pit name : " If PitNameSelect.ObjectName = "AcDbText" Then Getpitname = PitNameSelect.TextString End If If PitNameSelect.ObjectName = "AcDbBlockReference" Then pitblname = PitNameSelect.Name ' RETURNS BLOCK NAME pitattribs = PitNameSelect.GetAttributes Getpitname = pitattribs(0).TextString End If End Function Quote Link to comment Share on other sites More sharing options...
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.
Note: Your post will require moderator approval before it will be visible.