Příspěvky uživatele


< návrat zpět

Dobrý den,
potřeboval bych poradit s makrem kde hodnota jednoho pole VZZ_nazev(0) = vyrobky
je dokazem na dalši pole vyrobky()

Sub Test2()
Dim VZZ_nazev()
Dim vyrobky()
Dim sluzby()

VZZ_nazev = Array("vyrobky", "sluzby", "tzbozi", "nzbozi")
vyrobky = Array(601000, 601001, 601002, 601010, 611300)
sluzby = Array(501515, 501640)

ucet = 601000
For k = 0 To UBound(VZZ_nazev)
a = VZZ_nazev(k)
For x = 0 To UBound(a)'!!!!tady už to nefunguje
If ucet = a(x) Then
b = "OK"
End If
Next x
Next k
End Sub
Díky moc za radu.


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