Mrkni na to, a vygoogli si příklady maker z netu. Jsou jich tam miliony.
Příloha: 
11111_test.zip (17kB, staženo 194x)
citovat11111_test.zip (17kB, staženo 194x)
excel, návod, tipy, funkce, makra, vba, tabulky, šablony
Tipy a triky pro Excel a makra VBA
< návrat zpět
Téma: Přenesení dat vybraného řádku do jiného listu
MS Excel
Téma: Přenesení dat vybraného řádku do jiného listu 
Zaslal/a 23.1.2013 21:38
Hezký den všem,
měl bych dva dotazy týkající se excelu. Pevně věřím, že pro Vás je to hračka, ovšem pro mě velká překážka...
První a jednodušší dotaz zní: jak nastavit podmíněné formátování (nebo jakokoliv jinak) aby se mi po vyplnění určité buňky správným slovem (ano) podbarvil celý řádek ve kterém se daná buňka nachází nějakou barvou?
A druhý dotaz: jak nastavit přenášení dat z vybraného řádku do jiného listu? Vyberu si například celý řádek D ve kterém mám vyplněná různá data a potřebuji aby se mi po stisknutí vytvořeného tlačítka přenesla tato data do jiného listu a konkrétních buněk. Nechci přenášet vše, jen vybrané buňky z vybraného řádku do předem definovaných buněk v jiném listu.
Předem všem děkuji za pomoc...
(24.1.2013 11:03)#011123
Ahoj, to je přesně ono co potřebuji... moc děkuji za nasměrování. První tabulku kdy se přenáší data z vybraného řádku do jiného listu do předem určených a neměnných buněk mám již hotovou, ale narazil jsem na druhý problém...
Potřeboval bych ještě přenášet data z vybraného řádku do jiného listu opět do buněk, které se ale postupně mění jak přibývají reklamace - to znamená, že sloupec bude stále stejný, ale vždy potřebuji data přenést na poslední volný řádek...
Myslel jsem si, že to vyřeším takto:
v listu reklamace kam data potřebuji přenés označím řádek, překliknu se do listu adresar kde opet vyberu radek ze kterého chci přenášet data a stisknu tlačítko viz makro:
Sub tlačítko1_Kliknutí()
lin = ActiveCell.Row
Sheets("Reklamace").Cells(lin, 17) = Sheets("Adresar").Cells(lin, 1)
End Sub
Bohužel takto to nefunguje... Vždy se mi přenese definovaná buňka z listu "adresar" do definované buňky v listu "reklamace" na stejném řádku jako je v listu "adresar". Vybrání řádku kam chci přenášet nefunguje... Je nějaké řešení? Díkycitovat
Potřeboval bych ještě přenášet data z vybraného řádku do jiného listu opět do buněk, které se ale postupně mění jak přibývají reklamace - to znamená, že sloupec bude stále stejný, ale vždy potřebuji data přenést na poslední volný řádek...
Myslel jsem si, že to vyřeším takto:
v listu reklamace kam data potřebuji přenés označím řádek, překliknu se do listu adresar kde opet vyberu radek ze kterého chci přenášet data a stisknu tlačítko viz makro:
Sub tlačítko1_Kliknutí()
lin = ActiveCell.Row
Sheets("Reklamace").Cells(lin, 17) = Sheets("Adresar").Cells(lin, 1)
End Sub
Bohužel takto to nefunguje... Vždy se mi přenese definovaná buňka z listu "adresar" do definované buňky v listu "reklamace" na stejném řádku jako je v listu "adresar". Vybrání řádku kam chci přenášet nefunguje... Je nějaké řešení? Díkycitovat
Uživatelské menu
Nejste přihlášen(a)
\n
\nMenu
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.
RSS nejnovější články