MS Excel

:) já to asi napsal trochu nesrozumitelně.

Pomocí userformu zadávám údaje do části SLOTTER (A2:C6).

Pokud v userformu do textboxu "KAM" zadám např. STROJ1 tak aby se mi hodnoty vložili do časti SLOTTER i do části STROJ1. Pokud bude textbox obsahovat STROJ2 tak at se mi vloži do SLOTTER i do STROJ2 atd...

No nejlepší by bylo kdyby místo textboxu byli jen zaškrtávácí políčka strojů - STROJ, STROJ2, STROJ3 a podle toho co bude zaškrnuto tak do té části se mi vloží.

Je to ted víc srozumitelné? Snad jo :)citovat

hmm dobré je to :o)

Pokud bych mohl otravovat nepopsal by si mi ty kody a tak. Nějaké chápu ale nějaké ne.

A jestli bych mohl hodně otravovat. Mám s touhle tabulkou ješte jeden cíl. Pokud bys mi chtěl jeste s tím pomoct?

Vím, že mi pomáháš hodně a vážím si toho.citovat

tak co znamená

1) start = Application.WorksheetFunction.CountA(Range("a1:a6")) - toho ukáže první prázdný řádek dané oblasti? Nebo poslední prázdný řádek?

2) Cells(start + 1, 1) = CLng(FORM.Cislo_f.Text) - co znamená to CLng? :)

3) kody typu:
stroj1_pozice = Application.WorksheetFunction.Match("STROJ1", Range("a:a"), 0) + 1

a

stroj1_radek = stroj1_pozice - 1 + Application.WorksheetFunction.CountA(Cells(stroj1_pozice, 1), Cells(stroj1_pozice + Pocet_zaznamu - 1, 1))

Pochopil jsem že sis pojmenoval stroje ale nic víc už ne :)

Tot asi vše a až mi napíše vysvětlivky tak pak ti povím co dál :o)citovat

1) tenhle postup funguje. Ale: potřeboval bych i v tabulce data ručně mazat - ve slotteru mám 3 řádky plné, pokud smažu udaje z prvního řádku už to dělá problémy při vkládání nové položky.

Musí to najít první prázdný řádek a do něj vložit data.

Něco jako na způsob :

If Cislo <> "" Or Kam <> "" Or Datum <> "" Then
start = start +1
End If

Viz první tabulka zk.citovat

Jj tak se nějak ten userform zkusím nějak sestrojit aby se to zapisovalo tak jak má, už to mám v hlavě :)

Ale pokud bys mi dokázal ješte pomoci s tím to tedy:

V příloze posílám tu stejnou tabulku jen je doplněno více sloupců. Do kterých se bude zapisovat ručně kdy, kdo na té zakázce dělal a kolik ks udělal. ... Náhled "před přesuntím" ukazuje tabulku po vložení zakázek pomoci userformu a ručně doplnění udajů ve sloupcích na pravo.

Všimni si sloupce "HOTOVO". Takže chtěl bych jsem aby když se do toho sloupce u dané zakázky napíše - hotovo .. tak at vyhledá ve strojích tu stejnou zakazku a pokud bude taky ukončena (ve sloupci Hotovo bude napsáno hotovo) tak at se zakazka přesune do kolonky k uzavření a to i s těmi udaji co jsou ve sloupcích na pravo.

Udělal jsem ti tam přehled jak by to mělo vypadat tak jsem to popsal snad pochopitelně.

Nebo už chci moc? citovat