Thema Datum  Von Nutzer Rating
Antwort
Rot Range Variable vergleichen mit String
 19.06.2017 22:04:54 Christian
NotSolved
19.06.2017 23:20:47 Gast40998
NotSolved

Ansicht des Beitrags:
Von:
Christian		 Datum:
19.06.2017 22:04:54		 Views:
900		 Rating:
     
Antwort:
  Ja
Thema:
Range Variable vergleichen mit String		 
Hallo liebe Forenmitglieder,
ich habe foldendes Problem bei meinem Code:


Der Code soll in der der CodeTabelle die A-Spalte abfragen ob dieser Code bereits angelegt ist. 
Allerdings lässt sich hier "finden" und "eingabe" nicht vergleichen wenn die "finden" Variable keinen Wert enthält :/
habt ihr hier eine Idee?

außerdem brauche ich von der gefundenen Zeile die Zeilenadresse mit dem "Cell-Wert"

Danke schonmal im vorraus, ich komm hier einfach nicht mehr weiter :)



Sub Einlagern()

Dim eingabe As String
Dim finden As Range


 
' hier die Texteingabe der Infobox unter Eingabe speichern
eingabe = InputBox("Code hineinschreiben")
'MsgBox eingabe
If eingabe = "" Then
MsgBox "Code kann nicht gefunden werden!", vbOKOnly + vbCritical, "Warnung!"
Exit Sub

End If
Worksheets("CodeTabelle").Activate
 'die Texteingabe nur suchen lassen in der A Spalte (um Fehler zu vermeiden)
 'und abspeichern unter finden

Set finden = Range("A4:A9999").Find(what:=eingabe)

If finden <> UCase(eingabe) Then

MsgBox "Code kann nicht gefunden werden!", vbOKOnly + vbCritical, "Warnung!"
Exit Sub

End If

 

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
Rot Range Variable vergleichen mit String
 19.06.2017 22:04:54 Christian
NotSolved
19.06.2017 23:20:47 Gast40998
NotSolved