• Úvod
• Excel návod
• Excel šablony
• Nástěnka
• Mobility
• Tipy na výlet
• Galerie
• Fórum

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

Jméno
Kontrola
Text
	Ukázka

---

Pavlus(4.5.2018 18:20)#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.citovat

Uživatelské menu

Nejste přihlášen(a)

• přihlásit
• registrace

\n

Menu

On-line nástroje

Formulář Faktura

Aktivní diskuse