< návrat zpět

MS Excel


Téma: aktivní řádek rss

Zaslal/a 10.2.2013 21:16

Prosím o pomoc, potřebuji zapisovat z listu1 na list2 přes userform na aktivní řádek a pokračovat dál ze zapisováním dál (20 sloupec ) a dál a dál.Na listu 2 si vyberu řádek na který chci přesunout záznam (dvojklik)a potom přesunu záznam na akt.řádek za záznam který již je zapsán a takhle pokračovat pořád. Děkuji předem za pomoc.

Příloha: zip11570_prenost-na-list-a-pokracovat-na-radek.zip (16kB, staženo 21x)
stop Uzamčeno - nelze přidávat nové příspěvky.

#011575
Opičák
Nerozumím ...citovat
#011578
avatar
Na list 2 přenést záznam z listu 1 na aktivní řádek za záznam který tam již je a kdykoli přidat dalšícitovat
#011583
Jeza.m
Taky moc nerozumím :-)
Na listu2 vyberu řádek, 2x kliknu a když už na daném řádku jsou hodnoty T-X, tak by se měly vyplnit hodnoty Y-AC? Ale vyplnit čím? Hodnotami z listu1 ze stejného řádku sloupce A-E, nebo F-J?

Chce to trochu srozumitelněji.

M@citovat
#011585
avatar
Prostě vkládat za sede hodnoty z userformu na aktivní řádek v listě 2citovat
#011604
avatar
Nějak mi to pořád nejde. 6 pořád se mi přepisují sloupce 20-21-22-23-24,, a já potřebuji psát na sloupec 25,26,27,28,29,, a další záznam z formu na 30,31,32,33,34 a td..... pomůže mi někdo 7citovat
#011605
Opičák
Nevím jestli tomu rozumím.citovat
#011606
avatar
Ujasněme si nejdříve zadání .-).
Takže, jak to chápu já...

Postup:
1. Uživatel na Listu 2 klikne dvakrát na řádek kam chce zapisovat a následně je přesměrován na List 1.
2. Na Listu 1 uživatel dvakrát klikne na řádek, který chce překopírovat na List 2, tím se spustí formulář s těmito předvyplněnými daty.
3. Uživatel klikne na tlačítko a tím data uloží na List 2 (na řádek, který je aktivní na Listu 2) za poslední záznam na daném řádku.

Je to tak správně?

Pokud ano, tak máš u tlačítka špatné určení řádku, kam se má zapisovat. Aktuálně to bere pro zápis do Listu 2 aktivní řádek z Listu 1.
Dále se divíš, že ti to stále zapisuje do sloupců 20, 21 atd., ale máš to tam tak v tom kódu napsaný .-), takže asi tak.
Tvůj problém je asi v nalezení posledního záznamu na řádku. Lze využít třeba toto:Sloupec = Cells(Radek, Columns.Count).End(xlToLeft).ColumnDo kódu jsem nijak nesahal, jen jsem to upravil tak, aby to fungovalo dle mého postupu...
P.

Viz příloha:citovat
#011607
avatar
Mnohokrát díky, už to šlape jako hodinky, PS:ale mám dva dny života a 1 000000 buněk v mozku v "pryč" 5citovat

Uživatelské menu

Nejste přihlášen(a)
avatar\n

Menu

Formulář Faktura

Formulář Faktura IV

Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.

Helios iNuvio

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.

On-line nástroje