I am trying to use a find to find me a header. The issue is that the header may have small variation (maybe an extra space or one of the words in plural). Therefore I would like it to find approximate matches. Anyone knows how? Thanks! This is my VBA:
With Sheets("Sheet0").Range("A1:BB1")
Set rng = Sheets("Sheet0").Range("A1:BB1").Find(What:="How would you rate the technical quality of today's presentation?", _
lookat:=xlWhole, MatchCase:=False)
If (Not rng Is Nothing) Then
rng.EntireColumn.Cut Destination:=Sheets("Sheet0").Columns("P:P")
Else
End If
End With
question from:
https://stackoverflow.com/questions/66050200/vba-find-approximative-header-name 与恶龙缠斗过久,自身亦成为恶龙;凝视深渊过久,深渊将回以凝视…