Vlastimil1 napsal/a:
Používám již více jak rok, ale dnes sheet, který ještě minulý měsíc fungoval i všechny ostatní starší již hlásí Chybu: Run-time Error -2147467259 (80004005) Method UserPicture FillFormat failed - konkrétně na řádku
List1.Shapes.Item("QRkod").Fill.UserPicture List1.Range("$A$1")
Žádný update Windows ani Office přitom neproběhl (vše je zakázáno).
Děkuji za pomoc Pokimu,
problém byl v pojmenování položky obrázku. Stačilo dát obrázku název QRkod, a upravit vazbu List1.Shapes.Item("QRkod").Fill.UserPicture List1.Range("$A$1")
Již to dělá přesně co potřebuji.
Pokud by se někomu hodila QR platba třeba na fakturu, přikládám vzor v příloze.
Upravil jsem jeden "mustr" co jsem našel tady na fóru, který dělá přesně to co potřebuji, ale nedaří se mi funkce převést do nového dokumentu.
Pokud smažu obrázek v "mustru", nebo zkopíruji VBA Project do nového .xlsm souboru, tak jsem nepřišel na to jak vložit obrázek který by se dokázal po změně URL aktualizovat?
Zkopírovaný obrázek z "mustru" na změny nijak neraguje, zřejmě se převede na obyčejný obrázek?
Vazba je tam nějak dělána přes Item(1) v List1.Shapes.Item(1).Fill.UserPicture List1.Range("$A$1"), ale ať na internetu hledám jak hledám netuším jak docílit té vazby pro vytvoření obrázku?
Bude to určitě nějaká hloupost.
Děkuji za "nakopnutí".
Hezký den,
měl bych prosbu. Rád bych na doklady pro zákazníky které tvořím v Excelu dával QR kód pro QR-platbu.
Z údajů uvedených na dokladu se mi vytváří URL pro RESTful API http://qr-platba.cz/pro-vyvojare/restful-api/#generator-czech-image (npř. http://api.paylibo.com/paylibo/generator/czech/image?accountNumber=222885&bankCode=5500&amount=250.00¤cy=CZK&vs=333&message=FOND%20HUMANITY%20CCK) na kterém se vygeneruje obrázek QR kódu, který potřebuji vložit na fakturu v Excelu, a potřebuji, aby se tento kód automaticky obnovoval při změně údajů na faktuře.
Předem děkuji za rady jak na to
Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.
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.