Thema Datum  Von Nutzer Rating
Antwort
17.10.2016 12:50:46 Sabrina
NotSolved
17.10.2016 13:03:05 Crazy Tom
NotSolved
Rot Spalte auf Wert überprüfen
 17.10.2016 13:20:35 Gast37713
Solved
17.10.2016 13:27:33 Crazy Tom
*****
Solved

Ansicht des Beitrags:
Von:
Gast37713		 Datum:
17.10.2016 13:20:35		 Views:
665		 Rating:
     
Antwort:
 Nein
Thema:
Spalte auf Wert überprüfen

Hallo Tom,

 

zunächst Dnake für deine schnelle Antwort. Allerdings habe ich vergessen zu erwähnen, dass die Werte nach denen gesucht werden in Tabelle 2 sind.

Konkret geht es darum, dass ich verschiedene Namen in eine Zelle im Tabellenblatt 1 eingebe und sofern diese dann nicht im Tabellenblatt2 zu finden sind eine Fehlermeldung erscheint.

 

Sub suchen()
    Dim c As Range
    Dim varSuch As String
    varSuche = Range("A2").Value
    With Sheets("AlleTeilnehmer")
    Set d = Columns(1).Find(varSuche, LookIn:=xlValues, lookat:=xlWhole)
    If Not c Is Nothing Then
'       hier passiert nix
    
    Else
     MsgBox "nix gefunden"
    End If
End With
End Sub

Das ist mein bisheriger Code....leider ist es genau umgekehrt findet er den wert erscheint die meldung und findet er nichts passiert nichts....

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
17.10.2016 12:50:46 Sabrina
NotSolved
17.10.2016 13:03:05 Crazy Tom
NotSolved
Rot Spalte auf Wert überprüfen
 17.10.2016 13:20:35 Gast37713
Solved
17.10.2016 13:27:33 Crazy Tom
*****
Solved