I want to search all of columm C and if there is an entry in any cell
then create 1 text box besides every entry. I have the following code
but it does not work.

ANy ideas?

If Sheet1!C1.Value = True Then

ActiveSheet.Shapes.AddTextbox(msoTextOrientationHo rizontal, 242.25,
52.5, _
54#, 23.25).Select
Selection.Characters.Text = ""

End If
End Sub

Thanks again,
B


---
Message posted from http://www.ExcelForum.com/