Invalid procedure call in use of Shape property??
That's it. Thanks. I clipped the Property vlues incorrectly.
"Doug Glancy" wrote in message
...
In Excel 2003, through Intellisense I get:
cmt.Shape.AutoShapeType = msoShapeFlowchartAlternateProcess
which is slightly different than what you had.
hth,
Doug Glancy
wrote in message
...
I get an "Invalid procedure call" error message on the 4th
line in this proc:
Private Sub butViewCmt_Click()
Dim cmt As Comment
For i = 1 To ActiveSheet.Comments.Count
Set cmt = ActiveSheet.Comments.Item(i)
cmt.Shape.AutoShapeType =
msoShapeFlowchartAlternateProc
If cmt.Visible = True Then
cmt.Visible = False
Else
cmt.Visible = True
End If
Next i
End Sub
The 4th line is: cmt.Shape.AutoShapeType
Why?
Thanks.
John Wirt
|