Calling an image "alt text" for use in a macro?

Alright, I tried changing the " Sheets(1) " to " ActiveSheet ", but I'm getting the same error of " Shapes(Application.Caller) " returning error 2023.

This is all hapening within the VB debugger?

Whenever I try to use the " Sheets(1).Shapes(Application.Caller).AlternativeText " as a value or in conjunction with a string, Application.Caller errors out.

Specifically what I would be looking for is something along the lines of the following pseudo-code:

Declare testString to be a String variable
Set the value of testString to " ActiveSheet.Shapes(Application.Caller).AlternativeText "
Print out in cell C6:
 "The serial number of this item is [whatever the value of testString is] have a nice day."

I hope that is even possible.

Thank you for your patience,

-Aaron