Bilder in Zellen bei Excel einpflegen

Computer: Software & Programmierung Office Software
#1

Hallo zusammen,

ich habe eine Frage zu Grafiken in einer Excel-Tabelle:

Ich bin dafür zuständig eine Chemiekalienliste zu führen und zu pflegen.
In dieser Chemikalienliste gibt es auch eine Spalte mit den Gefahrsymbolen.
Diese liegen aber nur „auf den Zellen“, sind also nicht eingebunden.
Nun habe ich letzten einen Schwung Chemikalien entsorgt und wollte diese aus der Liste rauslöschen.
Dies hatte zur Folge, dass die ganzen Grafiken sich in einanderverschoben haben.

Hat jemand einen Ratschlag für mich, wie ich es schaffe diese Grafiken in eine Zelle einzubinden?

Für Tipps bin ich dankbar,

Gruß Tina

#2

Nun habe ich letzten einen Schwung Chemikalien entsorgt und
wollte diese aus der Liste rauslöschen.
Dies hatte zur Folge, dass die ganzen Grafiken sich in
einanderverschoben haben.

Hallo Tina,

in XL2000 haste bei Grafik-Formatieren----Eigenschaften
drei Möglichkeiten Eingriff auf die Verbindung Grafik zur
darunterliegende Zelle zu nehmen.
Die Hilfe zur obersten Möglichkeit siehst du hier:
http://www.uploadagent.de/show-191895-1368695080.html
Vielleicht lag es daran.

Ich glaube deine „gelöschten“ Bilder sind alle noch in der Mappe als
Ballast.
Kannst du testen, Alt+F11, Einfügen—Modul. Dortrein kopierst du den
nachstehenden Code, stellst den Cursor in den Code und drückst F5.
Die Anzahl wird dir angezeigt.

Im Code wird Shape benutzt, das sind alle Objekte im Blatt also
nicht nur Bilder sondern auch Schaltflächen, Zeichnungen usw.

Gruß
Reinhard

Sub Anzahl()
Dim N As Integer, Anz As Integer
With ActiveSheet
 For N = 1 To .Shapes.Count
 If .Shapes(N).Width = 0 Or .Shapes(N).Height = 0 Then Anz = Anz + 1
 Next N
End With
MsgBox "Anzahl Shapes: " & ActiveSheet.Shapes.Count & vbLf \_
& "davon mit Breite oder Höhe Null: " & Anz
End Sub