Thema Datum  Von Nutzer Rating
Antwort
29.01.2019 14:53:41 Hansruedi
NotSolved
30.01.2019 08:58:14 Gast41910
NotSolved
30.01.2019 10:59:50 Hansruedi
NotSolved
30.01.2019 17:57:10 Gast27404
*
NotSolved
30.01.2019 20:36:13 Gast01234
NotSolved
Blau Wie kann ich Verbindungslinien einblenden lassen, wenn in zwei Zellen ein Wert steht
31.01.2019 09:43:22 freundlicherGast
NotSolved
31.01.2019 09:44:52 freundlicherGast
NotSolved
31.01.2019 14:14:34 Hansruedi
NotSolved

Ansicht des Beitrags:
Von:
freundlicherGast		 Datum:
31.01.2019 09:43:22		 Views:
442		 Rating:
     
Antwort:
  Ja
Thema:
Wie kann ich Verbindungslinien einblenden lassen, wenn in zwei Zellen ein Wert steht

Hallo

Leider gibt es immer wieder Leute, die in Foren ihren Frust ablassen und andere zurecht weisen. Ich finde Foren sind gerade dazu da, anderen bei kleinen Problemen zu helfen und auch Starthilfen zu geben. Deshalb helfe ich dir gerne!

Versuchs damit:

Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Address = "$A$1" or Target.Address = "$B$10" Then
        If Range("A1") = 2 and Range("B10")=5 Then
            'Blende shape1 ein und shape2 aus
            ActiveSheet.Shapes("Name shape1").visble=true
            ActiveSheet.Shapes("Name shape2").visble=false
        Elseif Range("B10")=9 Then
            'Blende shape1 aus und shape2 ein
            ActiveSheet.Shapes("Name shape1").visble=false
            ActiveSheet.Shapes("Name shape2").visble=true
        elseif range("A1")="" then
            ActiveSheet.Shapes("Name shape1").visble=false
            ActiveSheet.Shapes("Name shape2").visble=false
        End If
    End If   
End Sub

 

Viel Spass und liebe Grüsse Anita

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
29.01.2019 14:53:41 Hansruedi
NotSolved
30.01.2019 08:58:14 Gast41910
NotSolved
30.01.2019 10:59:50 Hansruedi
NotSolved
30.01.2019 17:57:10 Gast27404
*
NotSolved
30.01.2019 20:36:13 Gast01234
NotSolved
Blau Wie kann ich Verbindungslinien einblenden lassen, wenn in zwei Zellen ein Wert steht
31.01.2019 09:43:22 freundlicherGast
NotSolved
31.01.2019 09:44:52 freundlicherGast
NotSolved
31.01.2019 14:14:34 Hansruedi
NotSolved