Thema Datum  Von Nutzer Rating
Antwort
15.10.2019 10:20:34 Michael
NotSolved
15.10.2019 10:31:13 Werner
Solved
Rot If column contains "Value" then "my code" end if
15.10.2019 14:11:36 Mase
Solved
16.10.2019 17:06:30 Gast17578
NotSolved

Ansicht des Beitrags:
Von:
Mase
Datum:
15.10.2019 14:11:36
Views:
564
Rating: Antwort:
 Nein
Thema:
If column contains "Value" then "my code" end if

Hi Michael,

below you will find annother possibility by using Application.Match()-Function.

Application.Match returns number decclared as double if "AT" is found.

It will return an error number declared as variant if "AT" is not found.

In addition to this function use the IsNumeric()-Function to clearify if an error is thrown or not:

 

Sub MichaelMatch()

    If IsNumeric(Application.Match("AT", Range("B:B"), 0)) And IsNumeric(Application.Match("AT", Range("A:A"), 0)) Then
        'Run macro
    End If
End Sub

 

 


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.10.2019 10:20:34 Michael
NotSolved
15.10.2019 10:31:13 Werner
Solved
Rot If column contains "Value" then "my code" end if
15.10.2019 14:11:36 Mase
Solved
16.10.2019 17:06:30 Gast17578
NotSolved