Makra v Excelu

[Střelec 5]

Tak jsem to připravil,je to zjednodušené na možnou míru aby to internet pobral a šlo to stáhnout.

[Reklama]

[Střelec 5]

A tady stejná tabulka ale v jiném sešitu než předchozí ,z které se data budou pomocí maker kopírovat sem a to podle barev. Totožná barva k té samé barvě v tomto sešitu a do stejných buněk. Samozřejmě sešity jsou 2 ks a jde o to ze sešitu č.1 třeba zmáčknutím tlačítka data exportovat do tabulky druhé (této),která muže být buď zavřená a nebo otevřená.A nebo to bude transportovat data samo,nevím co je možné vytvořit v excelu.

[Střelec 5]

Podľa toho čo píšeš som pochopil, že potrebuješ data ktoré sa menia, poslať (vyexportovať) do inej tabuľky, kde už budú len samotné údaje, teda čísla ale nepreviazané vzorcami, čiže sa nezmenia ak sa zmenia údaje v zdrojovej tabuľke. Príklad, môže byť uzavretý výkaz údajov z procesu za určité obdobie.
Riešenie by so videl v systeme premenných vo VBA. Teda asi takto:

Cieľový zošit musí byť pre spustením makra zatvorený, otvorí ho makro. Toto je najjednoduchší spôsob exportu. V prípade, že do cieľového zošita budeš potrebovať nahrávať incrementalne, napr jeden deň = 1 riadok, čim budeš vytvárať dajaku históriu, poriešime to nabudúce, keď vyskúšaš toto. Ešte aby som nezabudol, po vytvorenom makre si vytvor tlačítko v zdrojovom zošite aj liste ato z ponúky: Zobraziť > Panely s nástrojmi > Formuláre a k tomu tlačítku priradiš toto makro.

Todle je to co by bylo dobré,jen to zkouším jak udělat makro a nejde mi to makro udělat,nefunguje.Asi dělám něco špatně.Ale co??

[mikel]

Ty tabulky jsou naprosto shodné. Takže, jak jsem to pochopil, barvy tam nehrají žádnou roli, protože data napsaná v první tabulce budou na naprosto shodných pozicích v druhé tabulce. V tom případě bude nejjednodušší zkopírovat celou tabulku najednou.
Nebo je někde háček? Třeba v první tabulce se data vyplňují průběžně (např. každý den jen jeden sloupec) a přenesou se do druhé tabulky, kde se nějak upraví, takže si po pár dnech data ve stejných sloupcích neodpovídají?
Nebo ti jde jen o to, že např. 4. den v měsíci vyplníš sloupec 4 a chceš aby se přenesly jen tato nová data do sloupce 4 ve druhé tabulce?

[senior37]

Skúsil som to čo som napísal skopírovať do makra včítane poznámok a dopadlo to takto. V prvom riadku som urobil chybu, namiesto Worksheets("Sheet1") malo byť Worksheets("Sheet1").Select, sorry. Ostatné riadky boli v poriadku, ale pri kopírovaní z html sa nejakým spôsobom vsunuli medzery do reťazca pre premenné ako tep = Range ("D4").Value ' premenná pre teplotu ale iba u premenných pre načítanie a nie pre zápis správne ma byť: tep medzera=medzeraRangemedzera("D4").Value. Alebo skús skopírovať do vytvoreného modulu toto:

Sub Export()

' Export Macro
Worksheets("Hárok1").Select 'tento riadok možno vynechať, ak budeš makro spúšťať napr. tlačitkom z tohoto listu. Namiesto ("Sheet1") napíš ("skut. názov listu")
rp1 = Range("C6").Value
rp2 = Range("C7").Value
skl1 = Range("C8").Value
skl2 = Range("C9").Value
rp1a = Range("D6").Value
rp2a = Range("D7").Value
skl1a = Range("D8").Value
skl2a = Range("D9").Value
Workbooks.Open Filename:="C:\Data\Výkazy\Cieľ.xls"
Worksheets("Hárok1").Select
Range("C6") = rp1
Range("C7") = rp2
Range("C8") = skl1
Range("C9") = skl2
Range("D6") = rp1a
Range("D7") = rp2a
Range("D8") = skl1a
Range("D9") = skl2a
ActiveWorkbook.Save ' Uloženie cieľového zošitu
ActiveWorkbook.Close ' Zavretie cieľového zošitu
End Sub

Názov zošitov je Zdroj.xls a Cieľ.xls

[Střelec 5]

Tabulky co jsem poslal jsou stejné ale ,každá je v jiném sešitu s jiným názvem na která navazují jiné další data a grafy ,barvy nejsou důležité jen ukazují kam se která data dopisují.Data se do tabulky doplňují každou hodinu podle stavu na dílně. Jen co jsem tady na fóru našel hodiny do buňky a ty jsou také na makro.Nebudou se makra mezi sebou tlouci a dělat neplechu??

[senior37]

:wink: Tabulky co jsem poslal jsou stejné ale ,každá je v jiném sešitu s jiným názvem na která navazují jiné další data a grafy ,barvy nejsou důležité jen ukazují kam se která data dopisují.Data se do tabulky doplňují každou hodinu podle stavu na dílně. Jen co jsem tady na fóru našel hodiny do buňky a ty jsou také na makro.Nebudou se makra mezi sebou tlouci a dělat neplechu??

Nebudú.