Thema Datum  Von Nutzer Rating
Antwort
14.01.2016 11:45:06 Gast70593
NotSolved
Blau Text suchen über Makro
 14.01.2016 13:02:21 Gast10637
NotSolved
14.01.2016 15:24:14 Gast4787
NotSolved

Ansicht des Beitrags:
Von:
Gast10637		 Datum:
14.01.2016 13:02:21		 Views:
1440		 Rating:
     
Antwort:
  Ja
Thema:
Text suchen über Makro

Hallo,

Columns gibt die Spalten zurück, die Spalte F hat allerdings den Index 6, die Spalte A den Index 1.
Für den dritten Parameter in der Match-Funktion gibt es nur die Werte 1,0,-1 wobei 0 für eine exakte Übereinstimmung des Suchwertes steht, steht ganz gut in der Hilfe (F1) zur Match-Funktion beschrieben.

Dann besser so schreiben:

Option Explicit

Private Sub CommandButton4_Click()
Dim strText As String
Dim vntReturn As Variant
 
strText = Me.TextBox3.Value
vntReturn = Application.Match(strText, ThisWorkbook.Worksheets(1).Columns(6), 0)
 
 If Not IsError(vntReturn) Then _
   ThisWorkbook.Worksheets(1).Cells(vntReturn, 14).Value = "Freigegeben"
End Sub

Gruß,

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
14.01.2016 11:45:06 Gast70593
NotSolved
Blau Text suchen über Makro
 14.01.2016 13:02:21 Gast10637
NotSolved
14.01.2016 15:24:14 Gast4787
NotSolved