< návrat zpět

MS Excel

Téma: načítání dat do form v cyklu rss

Zaslal/a nemotora 7.12.2013 1:34

Dobrý den,
v příloze mám formulář, který obsahuje 60 obrázků, tyto obrázky načítá ze souboru.
Jde vytvořit cyklus, abych nemusel vypisovat stále těch 60řádků?
díky za každou radu

Příloha: zip16703_mikrokompas_vyvoj.zip (138kB, staženo 27x)
Zaslat odpověď >
cmuch(7.12.2013 16:42)#016708
avatar
Pri Otevreni sesitu se nactou nazvy obrázku.
Příloha: zip16708_vypisnazvuobrzeslozky.zip (123kB, staženo 27x)
citovat
nemotora(7.12.2013 21:12)#016710
avatar
Díky za pomoc, ale potřeboval bych cyklus, který by nahradil viz.: příloha
takových to záznamů tam mám 60.
jde mě o zjednodušení zápisu a pro budoucnost naučení se použití cyklu
díky
Příloha: jpg16710_vystrizek.jpg (21kB, staženo 28x)
16710_vystrizek.jpg
citovat
Palooo(9.12.2013 9:13)#016722
avatar
ja by som daval hodnoty do array pola a objekty by som vyvolaval cez Controls

asi takto:
NAZEV() As String
For x = 1 To 60
ReDim Preserve NAZEV(1, x)
NAZEV(0, x) = Cells(x + 1, 1)
NAZEV(1, x) = ThisWorkbook.Path & "\" & NAZEV(1, x) & ".jpg"
Me.Controls.Item("im" & x).Picture = LoadPicture(NAZEV(1, x))
Nextcitovat
nemotora(9.12.2013 9:28)#016723
avatar
Děkuji za radu, hned jak budu moct tak ji otestujicitovat

Uživatelské menu

Nejste přihlášen(a)
avatar\n

Menu

Formulář Faktura

Formulář Faktura IV

Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.

Helios iNuvio

Používáte podnikový systém Helios iNuvio? Potřebujete pomoci se správou nebo vyvinout SQL proceduru? Více informací naleznete na stránce Helios iNuvio.

On-line nástroje