Příspěvky uživatele
< návrat zpět
přikládám přílohu (než jsem text dopsal, byl jsem bohužel automaticky odhlášen)
Potřebuji ze zavřeného sešitu získat text z určité buňky.
=SUMA('C:\prace\angebote\[f.xlsx]List1'!$A$1)
Tento vzorec mi funguje, pokud je v buňce A1 číslo. Já však potřebují načíst a přenést text, což bohužel nejde. Jako výsledek se vždy zobrazí 0.
Externí odkazy jsou tedy použitelné pouze u číselých hodnot? Pokud ano, lze to obejít nějakým jiným způsobem?
za postřehy děkuji
Vyřešeno, odkazoval jsem se na název listu, což byla chyba. Ještě jednou díky za Vaši pomoc.
tak nevím nevím, zřejmě to souvisí s tím, že jsem měl sešit chráněný heslem. Pokud to uložím pod novým názvem bez hesla a přesunu všechny moje záložky do Vašeho sešitu, tak to funguje. Ovšem pouze na těch Vašich listech.
V okamžiku, když zkopíruju zdrojová data z Listu4 (případně textové pole z listu Hárok1) do nějakého svého listu, tak to už nefunguje :-(
Budu muset tedy ty Vámi vytvořené listy zřejmě zachovat a upravit k obrazu svému. Jaká je správná posloupnost? Prvně napsat makro, poté vytvořit textové pole a následně je přiřadit danému makru? Nechápu, kde dělám chybu. 
https://stackoverflow.com/questions/44939935/microsoft-excel-vba-run-time-error-2147024809-80070057
elninoslov napsal/a:
Ten kód predsa musíte dať do listu "List4", lebo ten sa prepočítava, a pri tomto prepočítaní sa aktualizuje Textové pole v liste Hárok1, teda zmente tento riadok na :
With Hárok1.Shapes("txtPoleSpolu").TextFrame2.TextRange
Tieto riadky tam niesú potrebné ak nemeníte nikde farbu:
Dim text As String
.Font.Fill.ForeColor.RGB = RGB(0, 0, 0)
a 2x
.Fill.ForeColor.RGB = RGB(0, 0, 0)
elninoslov napsal/a:
Ten kód predsa musíte dať do listu "List4", lebo ten sa prepočítava, a pri tomto prepočítaní sa aktualizuje Textové pole v liste Hárok1, teda zmente tento riadok na :
With Hárok1.Shapes("txtPoleSpolu").TextFrame2.TextRange
Tieto riadky tam niesú potrebné ak nemeníte nikde farbu:
Dim text As String
.Font.Fill.ForeColor.RGB = RGB(0, 0, 0)
a 2x
.Fill.ForeColor.RGB = RGB(0, 0, 0)
Díky moc. Popletl jsem to... Nyní to funguje skvěle.
Snad už poslední dotaz k tomuto tématu.
Když nyní přesunu tyto dvě fungující záložky (viz příloha) do jiného sešitu, tak to bohužel nerozběhnu. Do modulu v jiném sešitu přitom vkládám kód z modulu fungujícího sešitu (prostě z přílohy)
píše mi to chybu viz obr.
Do textového pole se přitom nepřenese žádný text - je prázdné. Můžete mi ještě prosím poradit:
- jak to rozchodit
- popsat kde byla chyba a jak to funguje? Nějak to nemůžu pořád pochopit.
děkuji moc
elninoslov napsal/a:
Možno tak jedine udalostné makro ("Calculate"), vzorec tam nemôže byť.Příloha: 42779_vyfarbi-casti-textoveho-pola-pri-calculate.zip (18kB, staženo 6x)
Díky za inspiraci. Trochu jsem si hrál a v podstatě vytvořil s Vaší pomocí to, co chci. Je tu ještě pár detailů, které bych rád doladil.
V přiloženém zipu jsou dva soubory:
calculate_betaT.xlsm
calculate_betaF.xlsm
V prvním souboru funguje vše skvěle. Např. po změně jména v buňce A20 se okamžitě aktualizuje jméno i v textovém poli.
Ve druhém souboru jsem pouze přesunul vstupní data do Listu4. Když nyní změním jméno na Listu4 v buňce B17, tak se bohužel jméno v textovém poli na listu Hárok1 neaktualizuje hned, ale až po zobrazení a spuštění kódu klávesou F5.
Můžete mi prosím poradit, jak mám kód upravit, aby se změna vstupních dat (na jiném listu) projevila v textovém poli okamžitě? (případně po aktivaci listu s textovým polem).
Díky moc
Uživatelské menu
\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