我希望能夠將我的資料復制到作業簿。
我從這里構建了代碼：
在我看到的“本地”視窗中，該變數什么都不是。我的情況源于此查詢：
將字串的一部分定義為常量
在此期間我做錯了什么嗎？
uj5u.com熱心網友回復：
始終最好測驗 Find 的結果。
Sub Copy_Data(ByRef datSource As Worksheet, datTarget As Worksheet)
'QUESTION 1
Const TM_PM As String = "*PM is required*"
Dim que1 As Range
Set que1 = Sheets("Sheet1").Range("A1:A100").Find(What:=TM_PM, _
Lookat:=xlPart, LookIn:=xlValues)
If que1 Is Nothing Then
MsgBox "The question about PM or TM wasn't found", vbExclamation
Else
que1.Copy
datTarget.Range("E1").PasteSpecial xlPasteValuesAndNumberFormats
End If
End Sub
轉載請註明出處，本文鏈接：https://www.uj5u.com/qita/391133.html