ich habe einen VBA Code der mir in einer Tabelle in der 1 Zeile den Wert KW1 sucht und dort dann eine Formel einfügt.
Dim c As Range
Range("CZ2") = Date
'#################### Aktuelle Kalenderwoche finden #############
Set c = Rows(1).Find("*KW1", LookIn:=xlValues, lookat:=xlWhole)
If Not c Is Nothing Then
Cells(1, c.Column).Activate
ActiveCell.FormulaR1C1 = "=WEEKNUM(R[1]C104,21)"
Else
MsgBox "Spalte -WK1- wurde nicht gefunden"
Exit Sub
End If
Nun habe ich aber das Problem, dass bei manchen Excel Auswertungen dieser Wert nicht immer KW1 heißt.
Frage: Kann ich auch nach 2 Werten suchen? In etwa so ...
Set c = Rows(1).Find("*KW1","*CWREQ1" LookIn:=xlValues, lookat:=xlWhole)
Danke schonmal vorab für jeden Hinweis oder Hilfe.Gruss,
Nik