Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Bild in Zelle - und zwar rechts oben

Bild in Zelle - und zwar rechts oben
20.06.2005 14:43:06
R.Schmitt
Hallo zusammen,
habe zwar in der Recherche gesucht, konnte zum Problem aber
leider nichts finden und muß euch daher doch "belästigen"
Es geht um das einfügen einer Grafik in eine Zelle.
Als solches ja kein Problem.
Kein Problem auch das linke obere Eck der Grafik
in die linke obere oder untere oder rechte obere/untere
Ecke der gewählten Zelle zu packen.
Wie allerdings platziere ich denn das rechte obere Eck der Grafik
mit einem Rand von zwei Pixel im rechten oberen Eck der Zelle ?
Also im Prinzip eine rechtsbündig in der Zelle eingerückte Grafik.
Für eure Hilfe Vielen Dank
R.Schmitt
Anzeige

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Bild in Zelle - und zwar rechts oben
20.06.2005 15:10:12
R.Schmitt

Sub Einfügen()
Dim Breite As Variant
Range("E18").Select
ActiveSheet.Pictures.Insert( _
"C:\Dokumente und Einstellungen\Eigene Dateien\Eigene Bilder\gata.jpg" _
).Select
With Selection
Breite = Selection.Width
.Name = "Bild"
.Top = ActiveCell.Top + 2
.Left = ActiveCell.Left - (Breite + 2)
End With
End Sub

Zugegeben nicht elegant - tut aber was es soll
R.Schmitt
Anzeige
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige
Anzeige

Infobox / Tutorial

Bild in Zelle rechts oben platzieren


Schritt-für-Schritt-Anleitung

  1. Zelle auswählen: Wähle die Zelle aus, in der das Bild platziert werden soll (z.B. E18).
  2. Bild einfügen: Gehe zu Einfügen > Bilder und wähle das gewünschte Bild aus deinem Dateisystem aus.
  3. Bild positionieren: Nachdem das Bild eingefügt wurde, kannst du es mit VBA wie folgt positionieren:
    Sub Einfügen()
       Dim Breite As Variant
       Range("E18").Select
       ActiveSheet.Pictures.Insert( _
       "C:\Dokumente und Einstellungen\Eigene Dateien\Eigene Bilder\gata.jpg" _
       ).Select
       With Selection
           Breite = Selection.Width
           .Name = "Bild"
           .Top = ActiveCell.Top + 2
           .Left = ActiveCell.Left - (Breite + 2)
       End With
    End Sub
  4. Visualisieren: Überprüfe, ob das Bild oben rechts in der Zelle sitzt und korrekt ausgerichtet ist.

Häufige Fehler und Lösungen

  • Bild nicht sichtbar: Stelle sicher, dass das Bild nicht hinter anderen Objekten verborgen ist. Überprüfe die Ebenen in Excel.
  • Falsche Positionierung: Achte darauf, dass du das Bild nach dem Einfügen korrekt ausrichtest. Nutze die oben genannten VBA-Befehle, um das Bild präzise zu positionieren.
  • Bildformat nicht unterstützt: Stelle sicher, dass das Bild in einem unterstützten Format (JPG, PNG) vorliegt.

Alternative Methoden

  • Manuelle Positionierung: Du kannst das Bild auch manuell verschieben, nachdem du es eingefügt hast. Klicke einfach auf das Bild und ziehe es an die gewünschte Position.
  • Verwendung von Formeln: In einigen Fällen kann es hilfreich sein, die Zelle als Hintergrundbild zu verwenden. Dazu kannst du die Zelle formatieren und das Bild als Füllung verwenden.

Praktische Beispiele

  • Beispiel 1: Du möchtest ein Firmenlogo in der Zelle A1 platzieren. Nutze die oben genannten Schritte, um das Bild genau oben rechts zu positionieren.
  • Beispiel 2: Wenn du ein Diagramm in eine Zelle einfügen möchtest, kannst du das gleiche Verfahren anwenden, um sicherzustellen, dass es richtig ausgerichtet ist.

Tipps für Profis

  • Bildgröße anpassen: Überlege, die Größe des Bildes vor dem Einfügen zu ändern, um sicherzustellen, dass es in die Zelle passt.
  • VBA-Skripte optimieren: Du kannst das Skript anpassen, um mehrere Bilder in verschiedenen Zellen automatisch auszurichten.
  • Verwendung von Makros: Wenn du oft Bilder in Zellen einfügst, erstelle ein Makro, das diesen Prozess automatisiert.

FAQ: Häufige Fragen

1. Wie kann ich ein Bild in der Zelle drehen?
Du kannst das Bild auswählen und dann unter Format die Option Drehen verwenden, um das Bild nach Belieben auszurichten.

2. Funktioniert das in allen Excel-Versionen?
Die beschriebenen Methoden sind in Excel 2016 und späteren Versionen anwendbar. In älteren Versionen können einige Optionen variieren.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige