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

MS Excel

Téma: doplnění dat z jiného sheetu makrem

Zaslal/a LeslieBrown 4.4.2015 17:59

Ahoj,

mám rozdělané makro, které me do sheetu1 doplní data ze sheetu2. Soubor přikládám v příloze pro lepší představu. Zeleně vyznačená část je ta, kterou makro doplní natvrdo, žlutě (snad je to žlutá barva, nebo oranžová) je to, co se mě načte z sheet2.

Zasekl jsem se ale u kroku, kdy potřebuju, aby se mě doplnili ještě 4 řádky, s tím, že část by doplnilo makro natvrdo (v dokumentu vyznačeno) a do buňek K13:K16 by dotáhlo SUMIF ze sheetu2.

Soubor v příloze, myslím že po otevření souboru to bude jasnější.

Ďekuji předem za pomoc :) moc mě to pomůže

Příloha: 24398_sample.zip (9kB, staženo 27x)

Zaslat odpověď >

---

elninoslov(4.4.2015 22:10)#024401

SUMIFS mi dáva chybu, tak spočítaš 2 SUMIF :

Sub pokus()
' VARIANT 1
With Sheets("Sheet1")
.Range("K13") = Application.SumIf(Sheets("Sheet2").Range("C2:C12"), "=2615100103", Sheets("Sheet2").Range("F2:F12")) + _
Application.SumIf(Sheets("Sheet2").Range("C2:C12"), "=2615100104", Sheets("Sheet2").Range("F2:F12"))
' ostatné obdobné ...
End With
' VARIANT 2
With Sheets("Sheet1")
.Range("K13").Formula = "=SUMIF(Sheet2!C2:C12,""=2615100103"",Sheet2!F2:F12)+SUMIF(Sheet2!C2:C12,""=2615100104"",Sheet2!F2:F12)"
.Range("K13").Value = .Range("K13").Value
' ostatné obdobné ...
End With
End Subcitovat

Uživatelské menu

Nejste přihlášen(a)

• přihlásit
• registrace

\n

Menu

On-line nástroje

Formulář Faktura

Aktivní diskuse