how to get the alternative text of pic from an excel file

  • Thread starter Thread starter khaled
  • Start date Start date
K

khaled

i have an excel file containg alot of photos , how can i get the alternative text of all these photos , the there any function can help . or any way

Thanks.
 
You'd need a macro. A quick and dirty example:

Sub a()
Dim Pic As Picture
Dim Counter As Integer
For Each Pic In ActiveSheet.Pictures
Counter = Counter + 1
Cells(Counter, 1).Value = Pic.Name
Cells(Counter, 2).Value = Pic.ShapeRange.AlternativeText
Next
End Sub


--
Jim
i have an excel file containg alot of photos , how can i get the alternative
text of all these photos , the there any function can help . or any way

Thanks.
 
Back
Top