Clever-Excel-Forum

Clever-Excel-Forum > Office-Anwendungen > Excel > Bild ausblenden wenn...
Normale Version: Bild ausblenden wenn...
Du siehst gerade eine vereinfachte Darstellung unserer Inhalte. Normale Ansicht mit richtiger Formatierung.
Seiten: 1 2

Reismann

03.02.2016, 13:27
Hi,

ich stehe mal wieder vor einem Problem.

Wie kann man ein Bild ein- bzw. ausblenden wenn 3 definierte Zellen leer sind?

In meinem Fall soll das Bild "Picture1" ausgeblendet werden wenn die Zellen A1, A2 und A3 leer sind. Wenn eine oder alle Zellen mit Inhalt gefüllt sind soll das Bild erscheinen.

Geht das ohne VBA? Eine Möglichkeit ohne VBA würde ich bevorzugen. Falls das nicht geht kann ich zur Not auch einen VBA Code verwenden.

Vielen Dank schon mal vorab!

Viele Grüße,
Reismann

atilla

03.02.2016, 14:38
Hallo,

es kann ausgeblendet werden per Knopfdruck oder abhängig von einem Ereignis.
Das Ereignis könnte eine Änderung in den Zellen A1:A3 sein.

Unten zwei Beispiele


Code:
Sub test()
  'Das Makro mus manuell gestartet werden, z. über eine Schaltfläsche
  ActiveSheet.Shapes("Picture 1").Visible = Application.CountA(Range("A1:A3")) <> 0
End Sub

Private Sub Worksheet_Change(ByVal Target As Range)
  'Bei Änderung im Bereich A1:a3 startet das Makro automatisch
  If Not Intersect(Target, Range("A1:A3")) Is Nothing Then
    ActiveSheet.Shapes("Picture 1").Visible = Application.CountA(Range("A1:A3")) <> 0
  End If
End Sub

Reismann

03.02.2016, 14:50
Perfekt. Funktioniert super!

Dankeschön!

Jockel

03.02.2016, 14:59
Hallo, ja das gaht auch ohne VBA, aber dazu bräuchte ich (d)eine (beispiel)datei... ... aber du hast ja (d)eine (VBA)Lösung...

atilla

03.02.2016, 15:05
Hallo Jörg,

hier von mir eine Beispielmappe:

[attachment=4066]

Jockel

03.02.2016, 15:37
(03.02.2016, 15:05)atilla schrieb: [ -> ]Hallo Jörg,

hier von mir eine Beispielmappe:

Hallo Atilla, welches Bild soll denn eingeblendet werden, doch nicht etwa der screenshot..? Geht auch ist denke ich aber am Thema vorbei... ich kann mich täuschen, aber ich dachte dachte  an ein kleineres Bild...

Reismann

03.02.2016, 16:24
Die größe des Bildes spielt doch keine Rolle. Wie würdest du es denn ohne VBA lösen?

Jockel

03.02.2016, 16:37
(03.02.2016, 16:24)Reismann schrieb: [ -> ]Die größe des Bildes spielt doch keine Rolle. Wie würdest du es denn ohne VBA lösen?

Hallo, für dich spielt das keine Rolle, für meine Variante aber schon, auch wo das Bild hin soll...

chris-ka

03.02.2016, 17:02
Hi,

anbei eine kleine Demo :)

[attachment=4068]
lg
chris

Jockel

03.02.2016, 17:58
(03.02.2016, 17:02)chris-ka schrieb: [ -> ]Hi,

anbei eine kleine Demo :)


lg
chris

Hallo, jepp genauso hätte ich es auch gemacht... siehe auch hier..:  http://www.clever-excel-forum.de/Thread-...6#pid31446
Seiten: 1 2
Clever-Excel-Forum > Office-Anwendungen > Excel > Bild ausblenden wenn...