Bildbreite berechnen für nächste freie Zelle
27.09.2005 00:55:52
Norman
ich lade per VBA ein Bild und positioniere es links oben:
Set newpic = ws.Pictures.Insert(fname)
newpic.Top = ws.Cells(1, 1).Top + 1
newpic.Left = ws.Cells(1, 1).Left + 1
Jetzt will ich, ohne die Spalten zu verändern, ermitteln, welches die nächste freie Spalte rechts vom Bild ist. Wenn das Bild also 2 Spalten verdeckt will ich Spalte 3 "finden".
Hat jemand eine Idee, wie ich das bewerkstelligen kann? Die newpic.width hat nämlich in Excel nichts mit der Columns(1).Width zu tun...
Bin ratlos...
Gruß und Danke
Norman