V jiném listu si vytvořte vzorec na součet požadovaných buněk, pak v řádku vzorců ten vzorec zkopírujte a toto vložte do pole Odkaz ve Správci názvů.citovat
excel, návod, tipy, funkce, makra, vba, tabulky, šablony
Váš průvodce programem Microsoft Excel a programováním maker ve VBA
< návrat zpět
Téma: Správce názvů - součet buněk
To funguje a je to možné napísať s tým rozdielom, že namiesto oddelenia středníkem, spojíte odkazy znakom plus.citovat
MS Excel
Téma: Správce názvů - součet buněk 
Zaslal/a Alfan 7.5.2019 14:21
Dobrý den, nevím, jakým způsobem zadat ve "Správce názvů" v "Odkaz na:" součet konkrétních buněk. Obor je "Sešit".
Chtěl bych konkrétně zadat součet buněk K13 a K14 na listu "VZZ divize".
Když to zadám takto:
='VZZ divize'!$K$13;'VZZ divize'!$K$14
tak to vypíše hodnotu pouze z buňky K13. Zkoušel jsem to dát do funkce SUMA, ale ani to nepomohlo.
Dá se to nějak zapsat?
Děkuji.
Vzorec na súčet='VZZ divize'!$K$13+'VZZ divize'!$K$14a nie odkaz na dve bunky.citovat
to mepexg
to právě taky nefunguje
to Dingo
takto jsem to "obešel".
Ale obecně by mě zajímalo, zda se to dá nějak zapsat.citovat
to právě taky nefunguje
to Dingo
takto jsem to "obešel".
Ale obecně by mě zajímalo, zda se to dá nějak zapsat.citovat
Ale prečo by to nefungovalo ???
Příloha: 
43305_def.nazov.xlsx (11kB, staženo 27x)
citovat43305_def.nazov.xlsx (11kB, staženo 27x)Alfan napsal/a:
to právě taky nefunguje Ale obecně by mě zajímalo, zda se to dá nějak zapsat.
To funguje a je to možné napísať s tým rozdielom, že namiesto oddelenia středníkem, spojíte odkazy znakom plus.citovat
Ten zápis funguje, ale pak při puštění makra:
Sub kopirujOBRAT()
Dim i As Integer
i = 0
Range("SOUHRN_OBRAT").Resize(30, 2).ClearContents
Do While (Range("OJ_NAZVY").Offset(i, 0).Value <> "")
Range("VZZ_NAZEV").Value = Range("OJ_NAZVY").Offset(i, 0).Value
Range("SOUHRN_OBRAT").Offset(i, 0).Value = Range("OJ_NAZVY").Offset(i, 0).Value
Range("SOUHRN_OBRAT").Offset(i, 1).Value = Range("VZZ_OBRAT").Value
i = i + 1
Loop
MsgBox ("HOTOVO")
End Sub
Mi to hází chybu na tom zvýrazněném řádku. A to má třeba v součtu 2 řádky z výsledovky.citovat
Sub kopirujOBRAT()
Dim i As Integer
i = 0
Range("SOUHRN_OBRAT").Resize(30, 2).ClearContents
Do While (Range("OJ_NAZVY").Offset(i, 0).Value <> "")
Range("VZZ_NAZEV").Value = Range("OJ_NAZVY").Offset(i, 0).Value
Range("SOUHRN_OBRAT").Offset(i, 0).Value = Range("OJ_NAZVY").Offset(i, 0).Value
Range("SOUHRN_OBRAT").Offset(i, 1).Value = Range("VZZ_OBRAT").Value
i = i + 1
Loop
MsgBox ("HOTOVO")
End Sub
Mi to hází chybu na tom zvýrazněném řádku. A to má třeba v součtu 2 řádky z výsledovky.citovat
Ktorá z tých oblastí je Definovaný názov so súčtom buniek ???
SOUHRN_OBRAT - používate ClearContents, teda evidentne oblasť, nie súčet vzorcom.
OJ_NAZVY - v cykle while a Offset, teda opäť oblasť buniek.
VZZ_OBRAT - toto je ten Def. názov so vzorcom ??? Tak potom skúste
Range("SOUHRN_OBRAT").Offset(i, 1).Value = [VZZ_OBRAT]
Koľko riadkov, takto spracovávate ? Musí to byť totiž pomalé. Vložte prílohu, prerobíme na rýchle polia, ak to pôjde...citovat
SOUHRN_OBRAT - používate ClearContents, teda evidentne oblasť, nie súčet vzorcom.
OJ_NAZVY - v cykle while a Offset, teda opäť oblasť buniek.
VZZ_OBRAT - toto je ten Def. názov so vzorcom ??? Tak potom skúste
Range("SOUHRN_OBRAT").Offset(i, 1).Value = [VZZ_OBRAT]
Koľko riadkov, takto spracovávate ? Musí to byť totiž pomalé. Vložte prílohu, prerobíme na rýchle polia, ak to pôjde...citovat
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