[VBA ] 關於VBA篩選結果
各位前輩
我想詢問以下這個篩選語法
-------------------------------------------------
Sub 篩選改()
Dim j As String
Dim i As String
i = InputBox("是要地幾排")
j = InputBox("是要篩選啥")
With Range("B2:G24")
.AutoFilter i, j
If i = 1 Then
j = "*" & Left(j, 2) & "*" ← 問題在這,為何這裡要有個"*"呢
ElseIf i = 2 Then
j = "*" & Left(j, 6) & "*" 另外如果想要inputbox跳出來可以直接
ElseIf i = 3 Then 打中文的話是要用搜尋的語法嗎
j = "*" & Left(j, 1) & "*" ex: 搜尋性別可直接打"性別"
ElseIf i = 4 Then
j = "a" Or "ab" Or " b" Or "o"
ElseIf i = 6 Then
j = "*" & Left(j, 3) & "*"
End If
End With
MsgBox "篩選結果為" & j
End Sub
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 101.15.12.241
→
09/11 13:35, , 1F
09/11 13:35, 1F
Visual_Basic 近期熱門文章
PTT數位生活區 即時熱門文章
-20
35