Note: The other languages of the website are Google-translated. Back to English

Jak kliknąć, aby powiększyć lub rozwinąć obraz w dokumencie programu Word?

W tym artykule jest mowa o tym, jak powiększyć lub rozwinąć obrazy w dokumencie programu Word jednym kliknięciem myszy.

Kliknij, aby powiększyć lub rozwinąć obraz z kodem VBA

Zmień rozmiar obrazów za pomocą Kutools for Word


Kliknij, aby powiększyć lub rozwinąć obraz z kodem VBA

Poniższy kod VBA może pomóc powiększyć obrazy w dokumencie programu Word jednym kliknięciem. Wykonaj następujące czynności.

1. W dokumencie zawierającym obrazy, które powiększysz jednym kliknięciem, naciśnij inny + F11 klawisze, aby otworzyć Microsoft Visual Basic for Applications okno.

2. w Microsoft Visual Basic for Applications okno, kliknij wstawka > Moduł klasy. Następnie skopiuj poniższy kod VBA do okna klasy.

Kod VBA 1: Kliknij, aby powiększyć obrazy

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

Uwagi: W kodzie liczba 200 to określona wysokość i szerokość powiększonych obrazów. W razie potrzeby możesz zmienić wysokość i szerokość.

3. kliknij wstawka > Moduł, skopiuj poniższy kod do okna modułu.

Kod VBA 2: Kliknij, aby powiększyć obrazy

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

4. wciśnij F5 klucz, aby uruchomić kod i zamknąć plik Microsoft Visual Basic for Applications okno.

Teraz, po kliknięciu obrazu w tym pliku, obraz zostanie powiększony do określonego rozmiaru, jak chcesz.


Zmień rozmiar obrazów za pomocą Kutools for Word

Połączenia Zmień rozmiar obrazów użyteczność Kutools for Word może pomóc w zmianie rozmiaru wszystkich obrazów o określony procent lub wybrany obraz. Proszę, spróbuj.

Kutools for Word : Ponad 100 przydatnych dodatków do Worda, za darmo spróbować bez ograniczeń w 60 dni.

Kliknij Kutools Plus > Resizewybierz wartość procentową z listy rozwijanej. Zobacz zrzut ekranu:

Następnie wszystkie obrazy w bieżącym dokumencie są zmieniane na podstawie tej określonej wartości procentowej.

Aby zmienić rozmiar wszystkich obrazów w oparciu o rozmiar wybranego obrazu, musisz najpierw wybrać obraz, a następnie kliknąć Kutools Plus > Resize > Zmień rozmiar obrazów za pomocą zaznaczenia. Zobacz zrzut ekranu:

Następnie wszystkie obrazy w bieżącym dokumencie są zmieniane na podstawie wybranego.

Jeśli chcesz skorzystać z bezpłatnej wersji próbnej tego narzędzia, przejdź do bezpłatnie pobrać oprogramowanie najpierw, a następnie przejdź do wykonania operacji zgodnie z powyższymi krokami.


Karta Office - Przeglądanie w kartach, edycja i zarządzanie wieloma dokumentami w programie Word:

Karta Office przenosi interfejs z zakładkami, jak widać w przeglądarkach internetowych, takich jak Google Chrome, nowe wersje Internet Explorer i Firefox do Microsoft Word. To będzie być narzędziem oszczędzającym czas i niezastąpionym w Twojej pracy. Zobacz poniżej demo:

Kliknij, aby uzyskać bezpłatną wersję próbną karty Office!


Zalecane narzędzia zwiększające produktywność programu Word

 

Kutools For Word - Ponad 100 zaawansowanych funkcji programu Word, oszczędzaj 50% czasu

  • Skomplikowane i powtarzalne operacje można wykonać jednorazowo w ciągu kilku sekund.
  • Wstaw wiele obrazów w folderach do dokumentu programu Word jednocześnie.
  • Scalaj i łącz wiele plików programu Word w folderach w jeden z żądaną kolejnością.
  • Podziel bieżący dokument na oddzielne dokumenty według nagłówka, podziału sekcji lub innych kryteriów.
  • Konwertuj pliki między Doc i Docx, Docx i PDF, zbiór narzędzi do typowych konwersji i zaznaczania, i tak dalej ...
Sortuj komentarze według
Komentarze (4)
Brak ocen. Oceń jako pierwszy!
Ten komentarz został zminimalizowany przez moderatora na stronie
Cześć Dzięki za wskazówkę. Postępuję zgodnie z instrukcjami, jak powiększyć za pomocą makra, jednak otrzymuję komunikat o błędzie „Nie zdefiniowano typu, który został zdefiniowany przez użytkownika”. Masz pomysł?
Ten komentarz został zminimalizowany przez moderatora na stronie
Hi

Makro nie działa tak, jak powinno. W MS Office 365 zmiany rozmiaru pojawiają się tylko na kilka milisekund.
Ten komentarz został zminimalizowany przez moderatora na stronie
Działa w starszym pliku świata, zapisanym jako .doc, ale otwieranym w MS 365.
Ten komentarz został zminimalizowany przez moderatora na stronie
OK... po kliknięciu, aby rozwinąć, w jaki sposób przywrócić domyślny rozmiar lub kliknąć do domyślnego rozmiaru?
Nie ma tu jeszcze żadnych komentarzy

Bądż na bieżąco

Prawa autorskie © 2009 - www.extendoffice.com. | Wszelkie prawa zastrzeżone. Zasilany przez ExtendOffice, | Mapa strony
Microsoft i logo Office są znakami towarowymi lub zastrzeżonymi znakami towarowymi Microsoft Corporation w Stanach Zjednoczonych i / lub innych krajach.
Chronione przez Sectigo SSL