Jak automatycznie zmieniać wszystkie obrazy do przenoszenia i rozmiaru za pomocą komórek w programie Excel?
Zwykle obraz został wstawiony do arkusza roboczego z domyślnymi właściwościami Przenieś i bez rozmiaru z komórkami. Musisz ręcznie zmienić jego właściwości, aby przenieść i rozmiar za pomocą funkcji komórek w arkuszu, zgodnie z potrzebami. W rzeczywistości możesz szybko zmienić obraz, aby przenieść i rozmiar z komórkami automatycznie, stosując obejście. A ten artykuł pokaże Ci, jak to osiągnąć.
Automatycznie zmieniaj wszystkie obrazy, aby przenieść i rozmiar za pomocą komórek z kodem VBA
Automatycznie zmieniaj wszystkie obrazy, aby przenieść i rozmiar za pomocą komórek z kodem VBA
Poniższy kod VBA może pomóc w szybkiej zmianie właściwości wszystkich obrazów w celu przenoszenia i rozmiaru z komórkami w arkuszu. Wykonaj następujące czynności.
1. Otwórz arkusz roboczy zawierający obrazy, które chcesz zmienić, przenosząc i zmieniając rozmiar za pomocą komórek, a następnie otwórz plik Microsoft Visual Basic for Applications naciśnij przycisk inny + F11 klawiatura.
2. w Microsoft Visual Basic for Applications kliknij wstawka > Moduł. Następnie skopiuj i wklej kod VBA do okna Code.
Kod VBA: zmień wszystkie obrazy, aby przenieść i rozmiar za pomocą komórek
Sub MoveAndSizeWithCells()
Dim xPic As Picture
On Error Resume Next
Application.ScreenUpdating = False
For Each xPic In ActiveSheet.Pictures
xPic.Placement = xlMoveAndSize
Next
Application.ScreenUpdating = True
End Sub
3. wciśnij F5 lub kliknij przycisk Uruchom, aby uruchomić kod.
Następnie wszystkie obrazy w aktywnym arkuszu są automatycznie zmieniane na Przenieś i rozmiar z komórkami.
Podobne artykuły:
- Jak wyśrodkować zdjęcie w komórce programu Excel?
- Jak sprawdzić, czy komórka zawiera obraz w programie Excel?
- Jak dynamicznie wstawiać obraz lub obraz do komórki na podstawie wartości komórki w programie Excel?
- Jak powiększyć obraz po kliknięciu go w programie Excel?
Najlepsze narzędzia biurowe
Zwiększ swoje umiejętności Excela dzięki Kutools for Excel i doświadcz wydajności jak nigdy dotąd. Kutools dla programu Excel oferuje ponad 300 zaawansowanych funkcji zwiększających produktywność i oszczędzających czas. Kliknij tutaj, aby uzyskać funkcję, której najbardziej potrzebujesz...
Karta Office wprowadza interfejs z zakładkami do pakietu Office i znacznie ułatwia pracę
- Włącz edycję i czytanie na kartach w programach Word, Excel, PowerPoint, Publisher, Access, Visio i Project.
- Otwieraj i twórz wiele dokumentów w nowych kartach tego samego okna, a nie w nowych oknach.
- Zwiększa produktywność o 50% i redukuje setki kliknięć myszką każdego dnia!