Stránka 1 z 1

VBA Excel - komprese obrázku

Napsal: 13 čer 2017 21:06
od MK_Vs
Dobrý den,

v rámci VBA v Excel 2010 upravuji velkost obrázku dle potřeby. Po jeho zmenšení bych však uvítal i možnost komprese a odstranění ořezaných části na 200dpi.
Pokud použiji záznam, VBA pro tyto kroky není zaznamenáno.

Jaké je prosím syntaxe pro zmenšení obrázku,

Děkuji.

Re: VBA Excel - komprese obrázku

Napsal: 14 čer 2017 18:40
od guest
Zkuste něco ve smyslu:

Kód: Vybrat vše

Application.SendKeys "%(oe)~{TAB}~"
Application.CommandBars.ExecuteMso "PicturesCompress"


Dialog je jasný, klávesová sekvence SendKeys se prostě zpravidla dává před příkaz pro zobrazení dialogu a "něco s ním dělá". A to něco si budete muset vyzkoušet (kombinace CTRL+ALT+TAB apod. aby nafintilo chování uživatele při práci s volbami dialogu a ovládacími prvky.

Jinak viz Google: "excel vba compress picture"