Hur ändrar jag automatiskt alla bilder för att flytta och storlek med celler i Excel?

Normalt infogades en bild i kalkylbladet med standardegenskaperna för Move och storlek inte med celler. Du måste ändra egenskaperna manuellt för att flytta och storlek med celler i ditt kalkylblad efter behov. Egentligen kan du snabbt ändra bilden för att flytta och storlek med celler automatiskt med en lösning. Och den här artikeln visar dig metoden för att uppnå det.

Ändra automatiskt alla bilder för att flytta och storlek med celler med VBA-kod

Ändra automatiskt alla bilder för att flytta och storlek med celler med VBA-kod

Fantastisk! Använda effektiva flikar i Excel som Chrome, Edge, Firefox och Safari!
Spara 50% av din tid och minska tusentals musklick åt dig varje dag!

Nedanstående VBA-kod kan hjälpa dig att snabbt ändra alla bilders egenskaper för att flytta och storlek med celler i ett kalkylblad. Gör så här.

1. Öppna kalkylbladet innehåller bilderna du vill ändra genom att flytta och ändra storlek på celler och öppna sedan Microsoft Visual Basic för applikationer genom att trycka på andra + F11 nycklar.

2. I Microsoft Visual Basic för applikationer klicka på fönstret Insert > Modulerna. Kopiera och klistra sedan in VBA-kod i kodfönstret.

VBA-kod: ändra alla bilder för att flytta och storlek med celler

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. tryck på F5 eller klicka på Kör för att köra koden.

Sedan ändras alla bilder i det aktiva arket till Flytta och storlek med celler automatiskt.

Relaterade artiklar:

• Hur centrerar jag en bild i en Excel-cell?
• Hur kontrollerar jag om en cell innehåller bild i Excel?
• Hur infogar jag bild eller bild dynamiskt i cellen baserat på cellvärde i Excel?
• Hur förstorar man bilden när man klickar på den i Excel?

Bästa kontorsproduktivitetsverktyg

	Populära funktioner: Hitta, markera eller identifiera dubbletter   |  Ta bort tomma rader   |  Kombinera kolumner eller celler utan att förlora data   |   Rund utan formel ...
	Superuppslag: Flera kriterier VLookup  |   VLookup med flera värden  |   VSök över flera ark   |   Fuzzy Lookup ....
	Avancerad rullgardinslista: Skapa snabbt en rullgardinslista   |  Beroende rullgardinslista   |  Flervals-rullgardinslista ....
	Kolumnhanterare: Lägg till ett specifikt antal kolumner  |  Flytta kolumner  |  Växla synlighetsstatus för dolda kolumner  |  Jämför intervall och kolumner ...
	Utvalda funktioner: Rutnätsfokus   |  Designvy   |   Stor formelbar   |  Arbetsbok & Bladhanterare   |  Resursbibliotek (Automatisk text)   |  Datumväljare   |  Kombinera arbetsblad   |  Kryptera/Dekryptera celler   |  Skicka e-postmeddelanden efter lista   |  Superfilter   |   Specialfilter (filtrera fet/kursiv/genomstruken...) ...
	Topp 15 verktygssatser:  12 text verktyg (lägga till text, Ta bort tecken, ...)   |   50 + Diagram Typer (Gantt Chart, ...)   |   40+ Praktiskt Formler (Beräkna ålder baserat på födelsedag, ...)   |   19 Införande verktyg (Infoga QR-kod, Infoga bild från sökväg, ...)   |   12 Konvertering verktyg (Siffror till ord, Valutaväxling, ...)   |   7 Slå ihop och dela verktyg (Avancerade kombinera rader, Dela celler, ...)   |   ... och mer

Överlägsna dina Excel-kunskaper med Kutools for Excel, och upplev effektivitet som aldrig förr. Kutools for Excel Erbjuder över 300 avancerade funktioner för att öka produktiviteten och spara tid.  Klicka här för att få den funktion du behöver mest...

Läs mer... Gratis nedladdning...

---

Office Tab Ger gränssnitt med flikar till Office och gör ditt arbete mycket enklare

• Aktivera flikredigering och läsning i Word, Excel, PowerPoint, Publisher, Access, Visio och Project.
• Öppna och skapa flera dokument i nya flikar i samma fönster, snarare än i nya fönster.
• Ökar din produktivitet med 50 % och minskar hundratals musklick för dig varje dag!

Läs mer... Gratis nedladdning...