Thema Datum  Von Nutzer Rating
Antwort
24.02.2022 05:04:32 Gast45722
Solved
Blau Die Zelle mit gesuchten Wert auswählen
 24.02.2022 12:44:10 volti
NotSolved

Ansicht des Beitrags:
Von:
volti		 Datum:
24.02.2022 12:44:10		 Views:
276		 Rating:
     
Antwort:
  Ja
Thema:
Die Zelle mit gesuchten Wert auswählen

Hallo, versuch es mal so....

Code:
01
02
03
04
05
06
07
08
09
10
11
12
13
14
15
16		  
Sub Finden()
  Dim strSUCH As Variant
  Dim rngSUCH As Range

  strSUCH = Application.InputBox("Material:")
  Set rngSUCH = ActiveSheet.Range("B8:M3000").Find(What:=strSUCH, _
  Lookat:=xlWhole, LookIn:=xlValues, MatchCase:=True)
  If Not rngSUCH Is Nothing Then
     rngSUCH.Select

  Else
     MsgBox "Der gesuchte Wert " & strSUCH & " wurde nicht gefunden.", _
     "Nicht gefunden."
  End If
  Set rngSUCH = Nothing
End Sub
_________
viele Grüße
Karl-Heinz

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
24.02.2022 05:04:32 Gast45722
Solved
Blau Die Zelle mit gesuchten Wert auswählen
 24.02.2022 12:44:10 volti
NotSolved