Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Anzeige
Inhaltsverzeichnis

Bilder und Autofilter...

Forumthread: Bilder und Autofilter...

Bilder und Autofilter...
joerg
Hallo,
kann man es eigentlich irgendwie hinbekommen, dass Bilder beim filtern vernünftig mit weggefiltert werden? Im Moment ist es so, dass alle Bilder, die eigentlich auf ausgeblendeten zellen liegen (und eigentlich mit verschwinden sollen...), in der obersten Zeile stehenbleiben...
Ich habe schon gelesen, dass das funktioniert, wenn man die Eigenschaften der Bilder auf 'von Grösse und Position abhängig' stellt, aber das ist noch schlimmer, dann wird nämlich die Grösse der Bilder beim löschen des Filters nicht mehr richtig wieder hergestellt...
Kann man da was tun? Evtl. per VBA?
gruss,
Jo
Anzeige

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Bilder und Autofilter...
07.02.2010 01:00:35
Josef
Hallo Jörg,

also bei "Von Zellposition ung -größe abhängig" funktionier es bei mir sehr gut, wichtig dabei ist, das die Bilder wirklich innerhalb der Zelle liegen und nicht darüber hinaus ragen.
Userbild
Userbild

Gruß Sepp

Anzeige
AW: Bilder und Autofilter...
07.02.2010 10:57:56
joerg
Hallo Sepp,
stimmt, Du hast Recht, anscheinend haben sie das getan (über die Zelle geragt...)
Kann man denn irgendwie beim importieren der Bilder (per ActiveSheet.Pictures.Insert) diese Eigenschaft setzen?
Gruss,
Jo
AW: Bilder und Autofilter...
07.02.2010 11:03:12
Josef
Hallo Jörg,

bezogen aiuf den Code von deiner früheren Frage, geht das so.

Set objPic = .Pictures.Insert(strPath & strFile)
objPic.Top = rng.Top
objPic.Left = rng.Left + rng.Width - objPic.Width
objPic.LockAspectRatio = True
objPic.Height = rng.Height

Gruß Sepp

Anzeige
AW: Bilder und Autofilter...
07.02.2010 11:42:06
joerg
Danke, Sepp, beim LockAspectRatio sagt er mir jetzt allerdings, dass diese Eigenschaft oder Methode nicht unterstützt würde - obwohl die Anfangsbuchstaben automatisch in Grossbuchstaben gewandelt werden, er diese Eigenschaft oder Methode demnach wohl kennt?
Hab's auch schon mit 'msoTrue' probiert (irgendwo gelesen), geht aber auch nicht...
Gruss,
Jo
Anzeige
AW: Bilder und Autofilter...
07.02.2010 11:46:48
Josef
Hallo Jörg,

objPic.ShapeRange.LockAspectRatio = True
objPic.ShapeRange.Height = rng.Height


Gruß Sepp

Anzeige
AW: Bilder und Autofilter...
07.02.2010 11:51:44
joerg
Jo, das klappt, Danke! :)
Anzeige
Anzeige
Live-Forum - Die aktuellen Beiträge
Datum
Titel
14.05.2026 13:31:09
14.05.2026 09:50:42
13.05.2026 19:14:18