VBA-Schleife, um Header zu überprüfen und Variable auf Spaltenbuchstabe

Question

Ich habe ein kleines Modul, das ich erstellt habe, dass ich an Zelle A1 beginnen möchte und von A1 - Z1 für eine Zeichenfolge überprüfen. Sobald die Zeichenfolge gefunden wurde, wird die Variable vari auf den Buchstaben der Spalte gesetzt. Code ist darunter, dass die A bis Z-Anweisung nicht eingestellt wurde.

Ich bin mir nicht sicher, was ich vermisse oder falsch mache (ich bin sehr neu in VBA) Danke.

Answer 1

Versuchen

For y = 1 To 26 
If Cells(1, y) = "Action" Or Cells(1, y) = "Title" Then 
    vari = y 
End If 
Next y