Hur roterar jag en bild baserat på ett cellvärde i Excel?

I Excel kan vi rotera bilden genom att dra musen, men har du någonsin försökt rotera en bild baserat på ett cellvärde. Exempelvis kommer bilden att roteras 90 grader om cellvärdet är 90 i Cell A1, som visas nedan.

Rotera en bild baserat på cellvärde med makrokod

Rotera en bild baserat på cellvärde med makrokod

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!

Endast en makrokod kan hjälpa dig att rotera en bild baserat på ett cellvärde i Excel.

1. Skriv ett värde i Cell A1 som du kommer att rotera bilden med och aktivera sedan bilden du vill rotera.

2. Tryck Alt + F11 för att aktivera Microsoft Visual Basic för applikationer och klicka Insert > Modulerna för att infoga en tom ny Modulerna. Se skärmdump:

3. Klistra in koden nedan Modulerna tryck sedan på F5 för att köra koden. Se skärmdump:

VBA: Rotera bilden efter cellvärde

Sub RotateImage()
Selection.ShapeRange.IncrementRotation ActiveSheet.Range("A1").Value
End Sub

Notera: i koden är A1 den cell du vill rotera bilden baserat på, du kan ändra den efter behov.

Relativa artiklar:

• Hur roterar jag sidfot / sidhuvudstext i liggande läge i Excel?
• Hur roterar jag tabellen 90 eller 180 grader i Excel?

Bästa kontorsproduktivitetsverktyg

🤖	Kutools AI Aide: Revolutionera dataanalys baserat på: Intelligent utförande   |  Generera kod  |  Skapa anpassade formler  |  Analysera data och generera diagram  |  Anropa Kutools funktioner.
	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

Uppgradera dina Excel-färdigheter med Kutools för Excel och upplev effektivitet som aldrig förr. Kutools för 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...

---

Fliken Office ger ett flikgränssnitt 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...