• Úvod
• Excel návod
• Excel šablony
• Nástěnka
• Mobility
• Tipy na výlet
• Galerie
• Fórum

MS Excel

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

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: 16703_mikrokompas_vyvoj.zip (138kB, staženo 26x)

Zaslat odpověď >

---

cmuch(7.12.2013 16:42)#016708

Pri Otevreni sesitu se nactou nazvy obrázku.

Příloha: 16708_vypisnazvuobrzeslozky.zip (123kB, staženo 26x)

citovat

nemotora(7.12.2013 21:12)#016710

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: 16710_vystrizek.jpg (21kB, staženo 27x)

citovat

Palooo(9.12.2013 9:13)#016722

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

Děkuji za radu, hned jak budu moct tak ji otestujicitovat

Uživatelské menu

Nejste přihlášen(a)

• přihlásit
• registrace

\n

Menu

On-line nástroje

Formulář Faktura

Aktivní diskuse