Microsoft Excel

Herbers Excel/VBA-Archiv

Informationen und Beispiele zum Thema CommandButton
BildScreenshot zu CommandButton CommandButton-Seite mit Beispielarbeitsmappe aufrufen
Informationen und Beispiele zum Thema TextBox
BildScreenshot zu TextBox TextBox-Seite mit Beispielarbeitsmappe aufrufen

Wie funktioniert hier die Suche?

Betrifft: Wie funktioniert hier die Suche? von: MichiM
Geschrieben am: 28.08.2004 02:25:52

Hallo Leute,

ich bin begeistert von einem Makro - allerdings weiss ich nicht, wie es funktioniert und somit auch nicht, wie ich es anpasse :-((

Private Sub CommandButton1_Click()
Dim strTmp2 As String, iTmp As Integer
'\\ if an error occurs, bomb out
On Error GoTo On_Error
Sheets("Data").Select
'\\ identify the location of the cell with the finis from the selection in the
'\\ selection box and show the details in the text boxes below it
Set c = Sheets("Data").Range("OM").Find(Fin.Value, LookIn:=xlValues)

Wie und wo wird hier nach welchem Wert gesucht?
Der zu suchende Wert steht in der TextBox Fin - die aber nirgendwo auftaucht...

Im Anschluss an diesen Code werden nur noch die gefundenen Daten eingelesen.

Kann mir das einer aufschlüsseln?

Gruss und schonmal vorab herzlichen Dank
MichiM

  


Betrifft: Find-Funktion von: Christoph M
Geschrieben am: 28.08.2004 10:27:48

Hi Michi,
da steht doch "Fin":
Sheets("Data").Range("OM").Find(Fin.Value, LookIn:=xlValues)

auf deutsch:
suche im Range("OM") nach dem Wert der Textbox Fin

Gruß
Christoph


  


Betrifft: AW: Find-Funktion von: MichiM
Geschrieben am: 28.08.2004 13:48:31

Hi Christoph,
genau das ist es ja - Range("OM"); die gibt es eben nicht....
Zumal der Begriff in Spalte A steht.

Gruss
MichiM


  


Betrifft: Range und Name von: Christoph M
Geschrieben am: 28.08.2004 14:17:19

Hallo,
ich schätze mal, "OM" ist vergebener Name.
Wenn dein Begriff in Spalte A steht, dann muss hier eben "Range("A1:A100")" oder "Columns(1)" rein, oder Range("HundKatzeMaus"), wenn du dem Range diesen Namen gegeben hast.

Gruß
Christoph


 

Beiträge aus den Excel-Beispielen zum Thema "Wie funktioniert hier die Suche?"