MS Excel

Téma: Výpis hodnot řádku Do přednastavené tabulky - VB

Zaslal/a WiXoo 4.5.2018 13:38

Ahoj, chtěl bych se zeptat, zda by mi někdo neporadil.

Mám řádky. Každý z nich má 6 sloupců. Potřeboval bych makro na tlačítko. Poté co bych zmáčkl tlačítko, tak by v excelu vyskočilo okno a zeptalo se mi na číslo řádku. Po zadání čísla řádku by se mi vypsal do nového listu (třeba list dva) vypsaly hodnoty (sloupce) jedna,dva a šest.

Díky

Zaslat odpověď >

Pavlus(4.5.2018 18:20)citovat#040294

Principiálně lze řešit například takto:
Private Sub CommandButton1_Click()
Dim zdrojovy_radek As Long
Dim cilovy_radek As Long

zdrojovy_radek = InputBox("Zadejte číslo řádku:")
cilovy_radek = Sheets(List2.Name).Cells(Rows.Count, 1).End(xlUp).Row + 1

Sheets(List2.Name).Cells(cilovy_radek, 1) = Sheets(List1.Name).Cells(zdrojovy_radek, 1)
Sheets(List2.Name).Cells(cilovy_radek, 2) = Sheets(List1.Name).Cells(zdrojovy_radek, 2)
Sheets(List2.Name).Cells(cilovy_radek, 3) = Sheets(List1.Name).Cells(zdrojovy_radek, 6)

End SubP.

Uživatelské menu

Nejste přihlášen(a)

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.