Thread: [Solved] Complete beginner needs some help.
View Single Post
 
Old 03-14-2011, 01:49 AM
macropod's Avatar
macropod macropod is offline Windows 7 32bit Office 2000
Administrator
  
Join Date: Dec 2010
Location: Canberra, Australia
Posts: 21,963
macropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond repute
Default
Hi biofodder,

Your code works fine. You can test it with:
Code:
Sub Test()
Dim x As InlineShape
For Each x In ActiveDocument.InlineShapes
  MsgBox x.AlternativeText
Next
End Sub
Are you sure you are working with InlineShape objects (ie shapes formatted as in-line with text) and not Shape objects (ie shapes not formatted as in-line with text)?
__________________
Cheers,
Paul Edstein
[Fmr MS MVP - Word]
Reply With Quote