Private Sub Workbook_Open()
PrazdnyRadek = List1.Range("D1").End(xlDown).Row + 1 ' Ve sloupci D
List1.Activate
List1.Range("A" & PrazdnyRadek).Activate
End Sub
Jestli v souboru je více listů, je třeba list s tabulkou aktivovat.citovat
Zaslal/a 1Novacek1 23.5.2018 11:50
Zdravím vás,
potřeboval bych poradit s touto věcí (přikládám soubor). Mám čárové kódy. V čárovém kódu je zafixované ID zaměstnance. V praxi to vypadá takto:
Příjdu, vezmu skener, naskenuji čárový kód zaměstnance a do tabulky se mi podle funkcí Svyhledat doplní jméno a příjmení. Potřeboval bych ještě ale také do tabulky automaticky doplnit aktualní datum a čas, kdy jsem sken provedl. Zkoušel jsem to přes =KDYŽ(A1=nějaká hodnota;=NYNÍ();"0") ... nějak takto. akorád nevím, jak mám v jazyku excelu napsat to "nějaká hodnota" a obecně, jestli to takto vůbec mohu udělat.
Děkuji za rady.
Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.
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.