https://forums.autodesk.com/t5/vba-forum/what-is-the-quot-invalid-qualifier-quot/m-p/2290928#M19246 Oops, sorry I got it<BR /> [code]<BR /> Sub eto()<BR /> <BR /> Dim ObjText As AcadText<BR /> Dim Str As String<BR /> Dim Pt As Variant<BR /> <BR /> ThisDrawing.Utility.GetEntity ObjText, Pt, "Pick an object text"<BR /> Str = ThisDrawing.Utility.GetString(True, "Enter new text: ")<BR /> ObjText.TextString = Str<BR /> ObjText.Update<BR /> <BR /> End Sub<BR /> [/code]<BR /> <BR /> "Adesu" <MTEYBID> wrote in message <BR /> news:5971353@discussion.autodesk.com...<BR /> Here my code to edit a text in area drawing, but that code displayed<BR /> "Compile Error : Invalid Qualifier"<BR /> <BR /> [code]<BR /> Sub eto()<BR /> <BR /> Dim ObjText As AcadText<BR /> Dim EntText As String<BR /> Dim Pt As Variant<BR /> <BR /> ThisDrawing.Utility.GetEntity ObjText, Pt, "Pick an object text"<BR /> EntText = ThisDrawing.Utility.GetString(True, "Enter new text: ")<BR /> ObjText.TextString = EntText.TextString<BR /> ObjText.Update<BR /> <BR /> End Sub<BR /> [/code]</MTEYBID> Wed, 02 Jul 2008 06:15:43 GMT Anonymous 2008-07-02T06:15:43Z https://forums.autodesk.com/t5/vba-forum/what-is-the-quot-invalid-qualifier-quot/m-p/2290927#M19245 Here my code to edit a text in area drawing, but that code displayed <BR /> "Compile Error : Invalid Qualifier"<BR /> <BR /> [code]<BR /> Sub eto()<BR /> <BR /> Dim ObjText As AcadText<BR /> Dim EntText As String<BR /> Dim Pt As Variant<BR /> <BR /> ThisDrawing.Utility.GetEntity ObjText, Pt, "Pick an object text"<BR /> EntText = ThisDrawing.Utility.GetString(True, "Enter new text: ")<BR /> ObjText.TextString = EntText.TextString<BR /> ObjText.Update<BR /> <BR /> End Sub<BR /> [/code] Wed, 02 Jul 2008 06:03:04 GMT https://forums.autodesk.com/t5/vba-forum/what-is-the-quot-invalid-qualifier-quot/m-p/2290927#M19245 Anonymous 2008-07-02T06:03:04Z https://forums.autodesk.com/t5/vba-forum/what-is-the-quot-invalid-qualifier-quot/m-p/2290928#M19246 Oops, sorry I got it<BR /> [code]<BR /> Sub eto()<BR /> <BR /> Dim ObjText As AcadText<BR /> Dim Str As String<BR /> Dim Pt As Variant<BR /> <BR /> ThisDrawing.Utility.GetEntity ObjText, Pt, "Pick an object text"<BR /> Str = ThisDrawing.Utility.GetString(True, "Enter new text: ")<BR /> ObjText.TextString = Str<BR /> ObjText.Update<BR /> <BR /> End Sub<BR /> [/code]<BR /> <BR /> "Adesu" <MTEYBID> wrote in message <BR /> news:5971353@discussion.autodesk.com...<BR /> Here my code to edit a text in area drawing, but that code displayed<BR /> "Compile Error : Invalid Qualifier"<BR /> <BR /> [code]<BR /> Sub eto()<BR /> <BR /> Dim ObjText As AcadText<BR /> Dim EntText As String<BR /> Dim Pt As Variant<BR /> <BR /> ThisDrawing.Utility.GetEntity ObjText, Pt, "Pick an object text"<BR /> EntText = ThisDrawing.Utility.GetString(True, "Enter new text: ")<BR /> ObjText.TextString = EntText.TextString<BR /> ObjText.Update<BR /> <BR /> End Sub<BR /> [/code]</MTEYBID> Wed, 02 Jul 2008 06:15:43 GMT https://forums.autodesk.com/t5/vba-forum/what-is-the-quot-invalid-qualifier-quot/m-p/2290928#M19246 Anonymous 2008-07-02T06:15:43Z