< návrat zpět

MS Excel


Téma: Listbox - multiselect rss

Zaslal/a 12.8.2016 15:47

Ahoj,

z listboxu si tahám do proměnné název zdrojového souboru, který se dále používá. Když je možné vybrat pouze jednu hodnotu vše funguje tak jak má, avšak nevím, jak to udělat pokud je tam multiselect. Je to možné nějak elegantně řešit? Popřípadě někam vypsat zdroj a pak se orientovat např. na ";" mezi slovy a dále to nějak použít?

Děkuji za pomoc

zdroj = ListBox1.Value a používám to pro otevření vhodného sešitu Application.Workbooks.Open ("C:\Users\mn\Desktop\makro\" & fir & "\" & zdroj)

Zaslat odpověď >

#032325
avatar
Zdravim,

napr.:
dim nazevsouboru as string
dim i as integer

for i = 0 to me.listbox1.listcount - 1
if me.listbox1.selected(i) then
nazevsouboru = me.listbox1.list(i)
'zde otevrete soubor a provedete dalsi makro...
Application.Workbooks.Open("C:\Users\mn\Desktop\makro\" & fir & "\" & nazevsouboru)
end if
next i

Je treba cyklus a postupne overit, zda byla polozka vybrana a potom s polozkou pracovat.

sydcitovat

Uživatelské menu

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

Menu

On-line nástroje

Formulář Faktura

Formulář Faktura IV

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

Aktivní diskuse

odpocet a storno tl.

PavDD • 28.3. 8:53

odpocet a storno tl.

Začátečník • 26.3. 14:39

odpocet a storno tl.

PavDD • 26.3. 10:22

odpocet a storno tl.

elninoslov • 26.3. 7:50

odpocet a storno tl.

PavDD • 26.3. 7:26

odpocet a storno tl.

elninoslov • 25.3. 22:34

odpocet a storno tl.

Začátečník • 25.3. 15:09