« Zpět na předchozí stránku
Answer Question
▲
0
▼
♥ 0

kde se vzala hodnota navíc??
Dim x As Long
…
x = 1
For Each hodnoc In Range(“L24:P57”)
If Not hodnoc.Value = “” Then
Sheets(“List2”).Cells(4 + x, 4) = hodnoc.Value
x = x + 1
End If
Next hodnoc

výsledek je, že v listu2 do buňky D5 vloží hodnotu z D1, a pak pokračuje v buňce D6 a dál tak, jak makro mělo dle záměru fungovat – proč? nikde jinde v kodu promenne x ani hodnoc nejsou pouzity

Marked as spam
Avatar uživatele Odeslal Anonymous
Otázka položena 2.8.2017 12:50
121 views
▲
0
▼
✔
Private answer

poopravuji: hodnota v L24 je „nove2“ (bez uvozovek), a ta by měla být v D5 místo té hodnoty z D1, která nevím, jak se tam vzala…

Marked as spam
Avatar uživatele Odeslal Anonymous
Odpověděl 2.8.2017 12:59
▲
0
▼
✔
Private answer

Chyba bude mezi klávesnicí, židlí a aktivním listem.

Marked as spam
Avatar uživatele Odeslal Anonymous
Odpověděl 3.8.2017 6:17
« Zpět na předchozí stránku

Odešlete svou odpověď

Attach YouTube/Vimeo clip putting the URL in brackets: [https://youtu.be/Zkdf3kaso]