anindya Posted August 27, 2014 Share Posted August 27, 2014 Through vba is it possible to only the height change of text .i have attached a sample drawing for observtion. NEED HELP 224455.dwg Quote Link to comment Share on other sites More sharing options...
BIGAL Posted August 28, 2014 Share Posted August 28, 2014 Your dwg is not about TEXT HEIGHT it looks like you want a chainage and level routine ie take length of line at a scale and add datum to get level and set horizontal distance as well. Must it be VBA I have something close in lisp. Pretty simple to do. Method is to create selection set of lines using the fence option rest is just length of line and X distance from a start pt. Quote Link to comment Share on other sites More sharing options...
anindya Posted August 28, 2014 Author Share Posted August 28, 2014 i need to select only the text portion or the full drawing by lisp or vba and can i get the result as per my requirements? because the scale in which i have to produce the drawing i am unable to show the text to readable. Quote Link to comment Share on other sites More sharing options...
BIGAL Posted August 29, 2014 Share Posted August 29, 2014 The text height is a property of text or mtext you need to do some home work on object properties via VBA, Layer color lineweight linetype rotation style to name a few. This is pretty basic stuff. Start searching "VBA Textstring" ThisDrawing.Utility.GetEntity PitNameSlect, basepnt, "pick text : " If PitNameSelect.ObjectName = "AcDbText" Then dia1 = val(PitNameSelect.TextString) 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.