Thema Datum  Von Nutzer Rating
Antwort
15.11.2017 14:21:20 Hey
NotSolved
15.11.2017 19:42:38 Gast33561
NotSolved
16.11.2017 13:05:39 Hey
NotSolved
Blau Disable Button
 16.11.2017 18:49:09 Gast56434
*****
Solved
16.11.2017 19:04:51 fransi
*****
Solved
17.11.2017 00:17:15 Gast72801
*****
Solved
17.11.2017 07:48:00 Hey
Solved

Ansicht des Beitrags:
Von:
Gast56434		 Datum:
16.11.2017 18:49:09		 Views:
611		 Rating:
     
Antwort:
 Nein
Thema:
Disable Button

Hallo,

so:

Option Explicit
  
Private Sub Worksheet_Change(ByVal Target As Range)
Dim objRange As Range, objCell As Range
Set objRange = Union(Cells(1, 1), Cells(2, 2), Cells(3, 3))
If Not Intersect(Target, objRange) Is Nothing Then
  For Each objCell In objRange
      If objCell.Value <> vbNullString Then
        CommandButton1.Enabled = False
        Exit For
      End If
  Next
  If objCell Is Nothing Then
    CommandButton1.Enabled = True
  Else
    Set objCell = Nothing
  End If
End If
Set objRange = Nothing
End Sub
 
Private Sub CommandButton1_Click()
MsgBox "test"
End Sub

Gruß,

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
15.11.2017 14:21:20 Hey
NotSolved
15.11.2017 19:42:38 Gast33561
NotSolved
16.11.2017 13:05:39 Hey
NotSolved
Blau Disable Button
 16.11.2017 18:49:09 Gast56434
*****
Solved
16.11.2017 19:04:51 fransi
*****
Solved
17.11.2017 00:17:15 Gast72801
*****
Solved
17.11.2017 07:48:00 Hey
Solved