Přejít k hlavnímu obsahu
 

Jak kliknutím zvětšíte nebo rozbalíte obrázek v dokumentu Word?

Autor: Siluvia Naposledy změněno: 2024-08-06

Vkládání obrázků do dokumentu aplikace Word může výrazně zvýšit jeho vizuální přitažlivost a efektivitu. Pokud však pracujete s detailními obrázky nebo potřebujete ušetřit místo, může být užitečné umožnit čtenářům kliknout na obrázky a zvětšit je, aby si je mohli prohlédnout. Word nemá vestavěnou funkci pro zvětšení obrázků kliknutím, ale existují zástupná řešení, jak tohoto efektu dosáhnout.

V tomto tutoriálu vás provedeme kroky k vytvoření klikacích obrázků, které se po kliknutí zvětší nebo rozbalí, čímž se zvýší interaktivita a funkčnost vašich dokumentů Word.

Kliknutím obrázek zvětšíte nebo rozbalíte pomocí kódu VBA

Změňte velikost všech obrázků najednou pomocí Kutools pro Word


Kliknutím obrázek zvětšíte nebo rozbalíte pomocí kódu VBA

Následující kód VBA vám pomůže zvětšit obrázky v dokumentu Word kliknutím. Postupujte prosím následovně.

1. V dokumentu obsahujícím obrázky, které zvětšíte kliknutím, stiskněte Další + F11 klávesy pro otevření Microsoft Visual Basic pro aplikace okno.

2. V Microsoft Visual Basic pro aplikace okno, klepněte na tlačítko Vložit > Modul třídy. Poté zkopírujte níže uvedený kód VBA do okna třídy.

Kód VBA 1: Kliknutím zvětšíte obrázky

Public WithEvents GApp As Word.Application
'Updated by ExtendOffice 20181129
Private Sub GApp_WindowSelectionChange(ByVal Sel As Selection)
    Dim xShape As InlineShape
    On Error Resume Next
    Set xShape = Sel.InlineShapes(1)
    xShape.Height = 200
    xShape.Width = 200
End Sub

Pozor: V kódu je číslo 200 zadanou výškou a šířkou zvětšených obrázků. Výšku a šířku můžete změnit podle potřeby.

Okno Microsoft Visual Basic for Applications s kódem VBA 1 vloženým do okna modulu třídy

3. cvaknutí Vložit > Modul, zkopírujte níže uvedený kód do okna modulu.

Kód VBA 2: Kliknutím zvětšíte obrázky

Dim cls As New Class1
'Updated by ExtendOffice 20181129
Sub register_Event_Handler()
    Set cls.GApp = Word.Application
End Sub

Okno Microsoft Visual Basic for Applications s kódem VBA 2 vloženým do okna modulu

4. zmáčkni F5 klíč ke spuštění kódu a zavření Microsoft Visual Basic pro aplikace okno.

Nyní, když kliknete na obrázek v tomto souboru, obrázek se zvětší na požadovanou velikost.

Obrázek se po kliknutí zvětší


Změňte velikost všech obrázků najednou pomocí Kutools pro Word

Auto Změna velikosti obrázků užitečnost Kutools pro Word vám pomůže změnit velikost všech obrázků o zadané procento nebo vybraný obrázek. Zkuste to prosím.

Kutools pro Word je dokonalý doplněk aplikace Word, který zefektivní vaši práci a zlepší vaše dovednosti při zpracování dokumentů. Získejte to hned!

klikněte Kutools Plus > Změna velikosti, vyberte procento z rozevíracího seznamu. Viz snímek obrazovky:

Možnosti změny velikosti Kutools for Word pro změnu velikosti všech obrázků na procenta

Poté se změní velikost všech obrázků v aktuálním dokumentu na základě tohoto konkrétního procenta.

Chcete-li změnit velikost všech obrázků na základě velikosti vybraného obrázku, musíte nejprve vybrat obrázek a poté kliknout Kutools Plus > Změna velikosti > Změňte velikost obrázků pomocí výběru. Viz snímek obrazovky:

Kutools pro Word je možnost Změnit velikost obrázků s výběrem

Poté se změní velikost všech obrázků v aktuálním dokumentu na základě vybraného.


Karta Office: Přináší rozhraní s kartami do aplikací Word, Excel, PowerPoint...
Procházejte dokumenty pomocí karty Office
Vylepšete svůj pracovní postup hned teď.      Další informace o kartě Office       Stažení zdarma

Nejlepší nástroje pro produktivitu v kanceláři

Kutools pro Word - Zvyšte své zkušenosti se slovem Over 100 Pozoruhodné vlastnosti!

🤖 Funkce AI Kutools: Generovat obsah / Přepsat text / Dokument Q&A / Získejte rychlé odpovědi / Překládat dokumenty / Polský dokument (zachovat formát)...

📘 Mistrovství dokumentů: Rozdělit stránky / Sloučit dokumenty / Exportovat výběr v různých formátech (PDF/TXT/DOC/HTML...) / Dávkový převod do PDF...

Úprava obsahu: Dávkové hledání a nahrazování ve více souborech / Změnit velikost všech obrázků / Transponujte řádky a sloupce tabulky / Převést tabulku na text...

🧹 Čištění bez námahy: Smést pryč Extra prostory / Sekce přestávky / Textová pole / Odkazy / Další nástroje pro odstraňování naleznete na Odstranit skupina...

Kreativní vložky: Vložit Tisíc separátorů / Zaškrtávací políčka / Tlačítka rádia / QR kód / čárový kód / Více obrázků / Objevte více v Vložit skupina...

???? Přesné výběry: Přesně Konkrétní stránky / Tabulky / Tvary / Nadpis odstavce / Vylepšete navigaci pomocí vice vybrat funkce...

Vylepšení hvězd: Přejděte na libovolné místo / Automatické vkládání opakujícího se textu / Přepínání mezi okny dokumentu / 11 Konverze Tools...

Karty Kutools a Kutools Plus na pásu karet aplikace Word
???? Chcete si tyto funkce vyzkoušet? Stáhněte si Kutools pro Word nyní! ????
 

Nejlepší nástroje pro produktivitu v kanceláři

Kutools pro Word - 100+ nástrojů pro Word