MS Excel

Téma: vba vlookup

Zaslal/a wh1 28.5.2014 15:19

Ahoj,

rád bych požádal o radu ohledně zapsání vzorce:

Cells(k, y).Formula = "=VLOOKUP(B:B,f & !A:A & ,1,0)"

kdy "f" je měnící se hodnota názvu listu

Díky moc nevim si už rady :/

celý zápis zde:
x = 1
y = 3
f = Cells(x, 1).Value
Do While Cells(x, 1) <> ""
k = 1

Do While Cells(k, 2) <> ""
Cells(k, y).Formula = "=VLOOKUP(B:B," & f & "!A:A"" ,1,0)"
k = k + 1
Loop
y = y + 1
x = x + 1
Loop
End Sub

Zaslat odpověď >

Strana: « předchozí 1 2

wh1(28.5.2014 17:11)#019739

Diky moc vsem za rady zitra to v praci zkusim..citovat

AL(28.5.2014 17:31)#019740

To mi chces rict ze pokud mas list 1 a list 2 a das vyhledat list1A:A,list2A:B,2,0 tak to vyhodi chybu :D Máš pravdu, beriem späť, naozaj to funguje

citovat

marjankaj(28.5.2014 20:59)#019741

wh1 napsal/a:

Diky tohle funguje ...a pritom takova blbost :). Jen mi tu vyskocil dalsi problem :/. Kdyz zapisu vzorec standardne oznaceni listu je v apostrofech - 'list1'! ale kdyz to tam caknu z promeny tak to mam bez apostrofu a excel s tim ma problem vyskoci mi nabidka na vybrani sesitu se zminovanym listem ...nevite nekdo?

Tak tam daj tie apostrofy
f = Chr(39) & "Hárok2" & Chr(39)

A prečo nedáš prílohu? Toto nie je tipovacia súťaž: Kdo se strefí do tvého zadání.

citovat

wh1(29.5.2014 8:59)#019747

Super díky všem za pomoc už to funguje
finální kód:

Cells(k, y).Formula = "=VLOOKUP(B:B,'" & f & "'!A:A" & " ,1,0)"citovat

Strana: « předchozí 1 2

Uživatelské menu

Nejste přihlášen(a)

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.