Question

这是我的代码，用于查找列名称＆＃34; Total Tech KBA％Completion＆＃34;。

有人可以帮我识别％符号。

Set t = .Find("Total Tech KBA " & % & " Completion", lookat:=xlWhole)

Answer 1

以下代码适用于我：

Dim t As Range
Dim StrtoFind As String

StrtoFind = "Total Tech KBA % Completion"

With Worksheets("Sheet1").Cells
    Set t = .Find(what:=StrtoFind, lookat:=xlWhole)

    If Not t Is Nothing Then ' make sure Find was successful
        MsgBox StrtoFind & " found at column number " & t.Column
    End If
End With

Answer 2

找到答案，谢谢Shai的快速支持。

来自unicode网站＆＃34; https://unicode-table.com/en/#0025＆＃34;

Set t = .Find("Total Tech KBA " & ChrW(37) & " Completion ", lookat:=xlWhole)

   If Not t Is Nothing Then

       Columns(t.Column).EntireColumn.Copy _
       Destination:=ThisWorkbook.Sheets(1).Range("B1")
   Else: MsgBox "Total Tech KBA " & ChrW(37) & " Completion is not found"
   End If
End With

什么是＆＃34;％＆＃34;的Chrw值？

2 个答案: