Thema Datum  Von Nutzer Rating
Antwort
18.02.2016 14:08:33 Andy
Solved
Blau InputBox - Eingabe in der gesamten Tabelle prüfen
 18.02.2016 17:16:11 Gast65644
Solved

Ansicht des Beitrags:
Von:
Gast65644		 Datum:
18.02.2016 17:16:11		 Views:
1228		 Rating:
     
Antwort:
 Nein
Thema:
InputBox - Eingabe in der gesamten Tabelle prüfen

Hi

schau mal ob es so passt

Sub test()
    Dim Artikelnummer As Variant
    Dim Suchergebnis As Range
    Artikelnummer = Application.InputBox(prompt:="Bitte die Artikelnummer eingeben.", _
                                            Title:="Eingabe Artikelnummer", Type:=1)
    If Artikelnummer = "" Then Exit Sub
    Set Suchergebnis = Sheets("Tabelle1").Cells.Find(Artikelnummer, _
                                LookIn:=xlValues, lookat:=xlWhole)
    If Not Suchergebnis Is Nothing Then
        MsgBox Suchergebnis.Address
    Else
        MsgBox "nix gefunden"
    End If
End Sub

 

MfG Tom

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
18.02.2016 14:08:33 Andy
Solved
Blau InputBox - Eingabe in der gesamten Tabelle prüfen
 18.02.2016 17:16:11 Gast65644
Solved