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

Wie drehe ich ein Bild basierend auf einem Zellenwert in Excel?

In Excel können wir das Bild durch Ziehen der Maus drehen. Haben Sie jedoch jemals versucht, ein Bild basierend auf einem Zellenwert zu drehen? Beispielsweise wird das Bild um 90 Grad gedreht, wenn der Zellenwert in Zelle A90 1 beträgt (siehe Abbildung unten).
doc Bild um Zelle 1 drehen

Drehen Sie ein Bild basierend auf dem Zellenwert mit Makrocode

Registerkarte "Office" Aktivieren Sie das Bearbeiten und Durchsuchen von Registerkarten in Office und vereinfachen Sie Ihre Arbeit erheblich ...
Kutools for Excel löst die meisten Ihrer Probleme und erhöht Ihre Produktivität um 80%
  • Alles wiederverwenden: Fügen Sie Ihren Favoriten die am häufigsten verwendeten oder komplexesten Formeln, Diagramme und alles andere hinzu und verwenden Sie sie in Zukunft schnell wieder.
  • Mehr als 20 Textfunktionen: Nummer aus Textzeichenfolge extrahieren; Teile von Texten extrahieren oder entfernen; Zahlen und Währungen in englische Wörter umwandeln.
  • Tools zusammenführen: Mehrere Arbeitsmappen und Blätter in einem; Zusammenführen mehrerer Zellen / Zeilen / Spalten ohne Datenverlust; Doppelte Zeilen und Summe zusammenführen.
  • Werkzeuge teilen: Aufteilen von Daten in mehrere Blätter basierend auf dem Wert; Eine Arbeitsmappe für mehrere Excel-, PDF- oder CSV-Dateien; Eine Spalte zu mehreren Spalten.
  • Einfügen überspringen Versteckte / gefilterte Zeilen; Zählen und summieren nach Hintergrundfarbe;; Senden Sie personalisierte E-Mails in großen Mengen an mehrere Empfänger.
  • Superfilter: Erstellen Sie erweiterte Filterschemata und wenden Sie sie auf alle Blätter an. Sortieren nach Woche, Tag, Häufigkeit und mehr; Filter durch Fettdruck, Formeln, Kommentar ...
  • Mehr als 300 leistungsstarke Funktionen; Funktioniert mit Office 2007-2021 und 365; Unterstützt alle Sprachen; Einfache Bereitstellung in Ihrem Unternehmen oder Ihrer Organisation.

Drehen Sie ein Bild basierend auf dem Zellenwert mit Makrocode

Nur ein Makrocode kann Ihnen helfen, ein Bild basierend auf einem Zellenwert in Excel zu drehen.

1. Geben Sie einen Wert in die Zelle A1 ein, um die Sie das Bild drehen möchten, und aktivieren Sie dann das Bild, das Sie drehen möchten.

2. Drücken Sie Alt + F11 Tasten zum Aktivieren der Microsoft Visual Basic für Applikationen Fenster, und klicken Sie auf Insert > Modul ein leeres neues einfügen Modul. Siehe Screenshot:
doc Bild um Zelle 2 drehen

3. Fügen Sie den folgenden Code in das ein Modul Skript, dann drücken Sie F5 um den Code auszuführen. Siehe Screenshot:

VBA: Bild um Zellenwert drehen

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

doc Bild um Zelle 3 drehen
doc Bild um Zelle 1 drehen

Hinweis: Im Code ist A1 die Zelle, auf der Sie das Bild drehen möchten. Sie können es nach Bedarf ändern.


Relative Artikel:


Die besten Tools für die Office-Produktivität

Kutools for Excel löst die meisten Ihrer Probleme und erhöht Ihre Produktivität um 80%

  • Wiederverwendung: Schnell einfügen komplexe Formeln, Diagramme und alles, was du vorher benutzt hast; Zellen verschlüsseln mit Passwort; Mailingliste erstellen und E-Mails senden ...
  • Super Formelriegel (leicht mehrere Textzeilen und Formeln bearbeiten); Layout lesen (leichtes Lesen und Bearbeiten einer großen Anzahl von Zellen); In gefilterten Bereich einfügen...
  • Zellen / Zeilen / Spalten zusammenführen ohne Daten zu verlieren; Inhalt geteilter Zellen; Kombinieren Sie doppelte Zeilen / Spalten... doppelte Zellen verhindern; Bereiche vergleichen...
  • Wählen Sie Duplizieren oder Eindeutig Reihen; Wählen Sie Leere Zeilen (alle Zellen sind leer); Super Find und Fuzzy Find in vielen Arbeitsmappen; Zufällige Auswahl ...
  • Exakte Kopie Mehrere Zellen ohne Änderung der Formelreferenz; Referenzen automatisch erstellen zu mehreren Blättern; Aufzählungszeichen einfügen, Kontrollkästchen und mehr ...
  • Text extrahieren, Text hinzufügen, Nach Position entfernen, Leerzeichen entfernen;; Paging-Zwischensummen erstellen und drucken; Inhalt und Kommentare zwischen Zellen konvertieren...
  • Superfilter (Speichern und Anwenden von Filterschemata auf andere Blätter); Erweiterte Sortierung nach Monat / Woche / Tag, Häufigkeit und mehr; Spezialfilter fett, kursiv ...
  • Kombinieren Sie Arbeitsmappen und Arbeitsblätter;; Tabellen basierend auf Schlüsselspalten zusammenführen; Daten in mehrere Blätter aufteilen; Batch-Konvertierung von xls, xlsx und PDF...
  • Mehr als 300 leistungsstarke Funktionen. Unterstützt Office / Excel 2007-2021 und 365. Unterstützt alle Sprachen. Einfache Bereitstellung in Ihrem Unternehmen oder Ihrer Organisation. 30-tägige kostenlose Testversion mit allen Funktionen. 60 Tage Geld-zurück-Garantie.
kte tab 201905

Office Tab Bringt die Oberfläche mit Registerkarten in Office und erleichtert Ihnen die Arbeit erheblich

  • Aktivieren Sie das Bearbeiten und Lesen von Registerkarten in Word, Excel und PowerPoint, Publisher, Access, Visio und Project.
  • Öffnen und erstellen Sie mehrere Dokumente in neuen Registerkarten desselben Fensters und nicht in neuen Fenstern.
  • Steigert Ihre Produktivität um 50 % und reduziert jeden Tag Hunderte von Mausklicks für Sie!
officetab unten
Kommentare (5)
Noch keine Bewertungen. Bewerten Sie als Erster!
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Dies ist, was ich mit einem Bild machen möchte, aber ich möchte, dass es sich jedes Mal von der vertikalen Position um so viele Grad dreht, wie die Zelle angibt. Angenommen, die Zelle sagt 30, wird sie um 30 Grad gedreht, aber wenn sich der Zellenwert dann auf 15 ändert, wird sie um 15 von der 30-Position (45 von der Vertikalen) gedreht. Ich möchte, dass es sich diesmal um 15 von der Vertikalen dreht. Gibt es eine Möglichkeit, dies zu tun?


Vielen Dank!
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Hallo zusammen, die gleiche Anforderung habe ich auch. Haben Sie zufällig herausgefunden, wie Sie das Bild jedes Mal von "Null" drehen lassen?
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Tut mir leid, ich habe keine Ahnung von diesem Problem. Du kannst dein Problem in unser Forum stellen, vielleicht kann dir jemand bei der Lösung helfen. https://www.extendoffice.com/forum.html
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Nehmen Sie den Code von oben:

Selection.ShapeRange.IncrementRotation ActiveSheet.Range("A1").Value

Und ändere es so:

Selection.ShapeRange.Rotation = ActiveSheet.Range("A1").Value
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Nehmen Sie den Code von oben:

Selection.ShapeRange.IncrementRotation ActiveSheet.Range("A1").Value

Und ändere es so:

Selection.ShapeRange.Rotation = ActiveSheet.Range("A1").Value
Es sind noch keine Kommentare vorhanden
Hinterlassen Sie Ihre Kommentare
Als Gast posten
×
Bewerte diese Nachricht:
0   Figuren
Vorgeschlagene Standorte

Folgen Sie uns

Copyright © 2009 - www.extendoffice.com. | Alle Rechte vorbehalten. Unterstützt von ExtendOffice. | Sitemap
Microsoft und das Office-Logo sind Marken oder eingetragene Marken der Microsoft Corporation in den USA und / oder anderen Ländern.
Geschützt durch Sectigo SSL