Hi...
geht alles... hier mal ein ganz einfaches Beispiel. Dazu legst du dir ein CommandButton auf das Arbeitsblatt und fügst diesen Code ein...
Code:
ActiveCell.AddComment
On Error GoTo FEHLER
ActiveCell.Comment.Shape.Fill.UserPicture ThisWorkbook.Path & "\" & ActiveCell.Value & ".JPG"
Exit Sub
FEHLER:
ActiveCell.ClearComments
MsgBox "Kein Bild '" & ActiveCell.Value & ".jpg' gefunden!"
Der funktioniert aber nur, wenn die Zelle und die Bilddatei (ohne Dateiendung) denselben Namen bzw. Inhalt haben, also z.B. 1
Außerdem müssen die Bilder im selben Verzeichnis liegen wie die Exceldatei...
Ansonsten brauche ich mehr Infos, bevor ich hier ins Blaue rate, wie es genau aussieht...
Edit: Kleine Fehlerroutine eingebaut... man kann die 100 natürlich auch automatisch einfügen, aber wie gesagt, kann ich nicht wissen, wo genau sie hinsollen usw. Am Besten wäre eine Beispieldatei...