EXCEL - Zobrazeni obrazku pri najeti mysi (jeho Refresh/reload)
Napsal: 21 říj 2020 14:01
Dobrý den, potřebuji udělat makro nebo jen komentář, kdy se při najetí nad příslušnou buňku zobrazí obrázek. Zkusil jsem dvě metody: Jednak ručně udělat komentář a změnit barvu pozadí na obrázek a nebo tohle makro.
Sub ImgAsComment1()
For Each cell In Selection 'libovolny vyber bunek a oblasti
ThisPicture = LoadPicture("z:\Projekty\Nabídky\2020\021_Viscuma_Plastics_Roboticke_lepeni_20200828\Kalkulace\ZMENOVY LIST\DATA\BG02.bmp") 'cesta k obrazku na disku
With cell.AddComment
.Shape.Fill.UserPicture ThisPicture
End With
Application.ScreenRefresh
Next cell
End Sub
Obojí funguje skvěle. U makra nevím, jak si nastavit velikost toho co mi vyběhne, u komentáře ano. Problém je, že já potřebuji tento obrázek občas změnit. (jedná se o změnový formulář pro práci v CADU). A excel si stále pamatuje jen ten obrázek, který načtu poprvé. Potřebuji aby se to aktualizovalo buďto přímo když nad to najedu kursorem nebo by mi stačilo bohatě při otevření formuláře. Upozornuji, že s makrem v excelu nemam zadnou zkusenost. Diky moc za pripadnou radu.
Sub ImgAsComment1()
For Each cell In Selection 'libovolny vyber bunek a oblasti
ThisPicture = LoadPicture("z:\Projekty\Nabídky\2020\021_Viscuma_Plastics_Roboticke_lepeni_20200828\Kalkulace\ZMENOVY LIST\DATA\BG02.bmp") 'cesta k obrazku na disku
With cell.AddComment
.Shape.Fill.UserPicture ThisPicture
End With
Application.ScreenRefresh
Next cell
End Sub
Obojí funguje skvěle. U makra nevím, jak si nastavit velikost toho co mi vyběhne, u komentáře ano. Problém je, že já potřebuji tento obrázek občas změnit. (jedná se o změnový formulář pro práci v CADU). A excel si stále pamatuje jen ten obrázek, který načtu poprvé. Potřebuji aby se to aktualizovalo buďto přímo když nad to najedu kursorem nebo by mi stačilo bohatě při otevření formuláře. Upozornuji, že s makrem v excelu nemam zadnou zkusenost. Diky moc za pripadnou radu.