麻辣家族討論版版 - Powered by Discuz! Board

標題: [發問] upper問題請教 [打印本頁]

作者: rouber590324 時間: 2021-11-2 14:17 標題: upper問題請教

dear  all 大大
1.涵數大寫使用 UPPER
2.圖一 If Sheet3.Cells(M, 4) Like "*" & "uball" & "*" Then  我用 If  UPPER(Sheet3.Cells(M, 4)) Like "*" & "uball" & "*" Then 不能用
2.1請問UPPER(Sheet3.Cells(M, 4))要改甚????
   煩不另賜教  THANS*10000

圖一
Sub 模型mod自動比對4()
Sheet6.Visible = True
Sheet6.Select
Range("L974").Select
Sheet6.[O976:O985].ClearContents
X = Sheet3.[D65536].End(xlUp).Row
Y = 975
For M = 1 To X
   If Sheet3.Cells(M, 4) Like "*" & "uball" & "*" Then
   Sheet6.Cells(Y + 1, 15) = Sheet3.Cells(M, 4)
Y = Y + 1
  End If
Next
End Sub

作者: samwang 時間: 2021-11-2 14:45

dear all 大大
1.涵數大寫使用 UPPER
2.圖一 If Sheet3.Cells(M, 4) Like "*" & "uball" & "*" Then ...
rouber590324 發表於 2021-11-2 14:17

涵數大寫使用UPPER，VBA要改為 UCase

作者: rouber590324 時間: 2021-11-2 15:21

DEAR samwang 大大
UCase 可用感恩 THANKS*10000

歡迎光臨麻辣家族討論版版 (http://forum.twbts.com/)