Příspěvky uživatele

Perfektní mockrát díky!

Zdravím,
potřeboval bych pomoc s automatickým číslováním.
Cíl je takový, že po vyplnění formuláře a potvrzení tlačítkem se tato data zapíšou do posledního prázdného řádku a automaticky se do řádku vyplní i pořadové číslo složené z prefixu "P"+ roku (yy) + pořadového čísla 001. (P17001).
S každým novým řádkem se přičte 1 nakonec (P17002).
Poslední věc, když začne nový rok pořadové číslo začne od 001 (P18001).
Jelikož vůbec netuším jak číslování udělat, připravil jsem jen kostru formuláře a tabulky jako příklad.

Díky za každou radu případně řešení.

Zdravím všechny,

chtěl bych Vás požádat o malou pomoc, nějak si nevím rady s kombinací funkce FindNext a cyklu.
Musím udělat tabulku, kde ve sloupci C jdou čísla objednávek (OC), ve sloupci B jsou čísla zakázek (ZC) a ve sloupci A jsou čísla výrobků.
Někdy se stane, že více druhů výrobků má stejné OC, ale každý výrobek musí mít unikátní ZC, které potřebuji přiřazovat.

Takže pokud najdu ve sloupci požadované OC, a vedlejší ZC není doplněno, chtěl bych doplnit příslušné ZC.
Pokud se stane, že hledané OC má již ZC zapsané, chtěl bych pokračovat ve hledání, zda se ve sloupci s OC nenachází stejné OC, které však nemá doplněné ZC.

Snad to není moc komplikované. Ale budu vděčný za každou radu

Super mockrát díky!

Zdravím,

mohl by mi prosím někdo poradit jak vložit do textu v MsgBoxu více hodnot z tabulky.

Daří se mi jen zápis hodnoty na konci věty pomocí:
MsgBox("Výsledek je: " & Range("A1").value)

Když potom zkusím znovu uvozovky za odkazem buňky už to nefunguje.

Je nějaká možnost aby mohl udělat větu takto:
Výsledek je: 5 ,ale cílem je 10 z celkového počtu 15

Kde Tučné jsou hodnoty z tabulky.

Díky všem za odpovědi.

Čaute,

díky za příspěvky jen se chci zeptat. Tu funkci jsem vložil do Modulu, ale nějak si nevím rady jak jí použít tak, aby se mi to přepisovalo v textboxu ve formuláři.

Díky snad je to poslední :D

Zdravím všechny,
chtěl bych poprosit o pomoc. Připravuju takovou ukázku na příjmu a výdeje materiálu na pracovišti, ale zasekl jsem se na takové prkotině jako je číselník.

Můj záměr je, aby při otevření formuláře byl aktivní textbox a při načtení čárového kódu čtečkou se zapsala hodnota kódu do textboxu a následovala nějaká akce(např. otevření dané položky).
V případě že by se kód z nějakého důvodu nechtěl načíst tak bych chtěl nechat možnost ručního zadání pomocí číselníku. Po potvrzení by následovala stejná akce jako při načtení kódu.

Teď co bych od Vás potřeboval. Nepodařilo se mi docílit toho, aby mi číselník psal hodnoty za sebe. Pouze přepisuje již zapsané hodnoty (viz přiložený soubor).
A dále vůbec netuším jak udělat to, aby po načtení kódu se udělal nějaká akce aniž by byla nutnost potvrzení. Například otevření dalšího formuláře.

Předem díky za pomoc. Pokud je to vůbec možné :D

Edit: JEště jedna maličkost. Ta čtečka mi píše hodnoty z anglický klávesnice. například místo "14001" mi napíše "+čéé+".
Je nějaký způsob jak to obejít ve VBA než abych musel nechat anglickou klávesnici?

Perfektní funguje jak jsem potřeboval. Mockrát díky, fakt mi to pomohlo.

Zdravím,

potřeboval bych poradit. Vytvářím do práce takovou zjednodušenou knihu faktur viz příloha.
Nejsem žádný specialista na makra takže bych potřeboval poradit od Vás.
Již jsem vytvořil tlačítko, které mi zapíše do prázdného řádku datum a přeskočí na vedlejší buňku. Tento stav bych chtěl vylepšit o automatické doplňování číselné řady ve tvaru RRRRMMXXXX(rok, měsíc a čtyřmístné číslo startující 0001) a s každým novým měsícem, aby se opět začalo 0001.
Sám na to nepřijdu takže bych Vám byl vděčný.
Díky. Martin

Příspěvky uživatele

Uživatelské menu

Menu

Formulář Faktura

Formulář Faktura IV

Helios iNuvio

On-line nástroje