Hi Donald,
I did a bit of research myself as this intrigued me and found out it it is possible to get the text from a Drawing Textbox.

Add an ActiveX button on your worksheet,

Add the next bit of code:-

Private Sub CommandButton1_Click()
    Dim tbx As TextBox
        i = 1
        j = 1
        For Each tbx In ActiveSheet.TextBoxes
            Cells(j, i).Value = tbx.Name
            Cells(j, i + 1).Value = tbx.Text
            j = j + 1
    Next
End Sub

You may wish to:
1. Change the place you wish to put the returned values i.e. i & j values,
2. not get the name of the textbox [tbx.Name] this was more for debugging purposes.

Regards
Alex

---

Reply from Richard Rost:

Excellent. Good work.