Potřeboval bych pomoci s makrem. Makro mi funguje tak, že když je určitě hodnota v buňce např. 1 tak mi to vyhodí koment s obrázkem. Já bych potřeboval když v té stejné buňce bude hodnota 2 tak mi to hodí jiný obrázek. Tato buňka je ovlivněna jinou.
Zde je kód:
Sub Obrazky()
For Each cell In Selection
obrazek = Application.GetOpenFilename(FileFilter:="JPEG (*.jpg), *.jpg", Title:="Vyber obrázek")
ThisPicture = obrazek
With cell.AddComment
.Shape.Fill.UserPicture ThisPicture
.Shape.Height = 250 ' vyska
.Shape.Width = 350 ' sirka
End With
Next cell
End Sub
Děkuji za pomoc! :)