MS Excel

Zdravím, chci se zeptat zda už někdo řešil zobrazení obrázku v userformu, který je umístěn v listu.
Nevím jak na to. Obrázek je vložen v pojmenované oblasti buněk, ale jak jej dostat do UF? Ten obrázek se bude měnit, jde o graf. Poradí někdo?

Zaslat odpověď >

stanher(11.3.2012 19:29)#007602

Ukázka kodu, kde nejdřív graf převedu na obrázek a ten následně umístím do ovládacího prvku "image" v userformu.

Private Sub ZobrazitGraf()
Dim Dateiname As String, Graf As Chart
Sheets("graf").Visible = -1
Sheets("graf").Activate
Set Graf = Sheets("graf").ChartObjects(1).Chart
Dateiname = "graf.gif"
Graf.Export Filename:=Dateiname, FilterName:="GIF"
Image1.Picture = LoadPicture(Dateiname)
End Subcitovat

marficek119(11.3.2012 21:39)#007606

Díky za radu, ale špatně jsem to popsal, mám sice graf, ale pomocí funkce fotoaparát jej mám rozmnožený po více listech. Tak bych tedy potřeboval do UF dostat pouze obrázek který je umístěn v pojmenované oblasti. Stejným způsobem bych pak vyřešil i vložení loga do UF. Šlo by to nějak?citovat

Jeza(12.3.2012 16:01)#007612

Obávám se, že jinak než přes dočasné uložení souboru s obrázkem na disk to nepůjde.

M@citovat

marficek119(13.3.2012 16:22)#007621

Hm, tak to není dobré. A co situace, kdy bych z userform ukládal do listu např. logo v jpg. na list1. Proběhne proces uložení a šlo by zobrazit v UF náhled uloženeho loga? Obrázek by se nemusel stále zobrazovat v UF, ale jen při vkládání do listu. Je nějaká možnost?citovat

Jeza(15.3.2012 11:46)#007630

Tomu asi moc nerozumím :-).
Do userform lze načíst obrázek ze souboru na disku, tento ovšem opět ze souboru lze načíst i do listu.
Určitě to lze i nějakým způsobem přes schránku, ale to už hodně složitě.

M@citovat

Téma: Zobrazení obrázku v Userform

Uživatelské menu

Menu

Formulář Faktura

Formulář Faktura IV

Helios iNuvio

On-line nástroje