[英]Method Range of object Global failed
即使我已經初始化工作表並確保名稱正確,我仍在為代碼獲取對象__global錯誤的方法范圍。 有什么幫助嗎? 該代碼應查找包含數據的單元格范圍,並將其放入第二個電子表格中
Sub potential()
'Add hours for potential work to generate function
Sheets("Resourcing Sit-Rep").Select
p = Range("Potential person").End(xlDown).Row - Range("Potential person").Row
For k = 1 To p
For j = 1 To 187
If Range("hours").Offset(k, j).Value > 0 Then
Sheets("Resource Forecast").Select
Val5 = Range("Potential person").Offset(k, 1).Value
Val6 = Range("Potential person").Offset(k).Value
Val7 = Range("hours").Offset(k, j).Value
Val8 = Range("date").Offset(0, j).Value
Sheets("Resourcing Sit-Rep").Select
A = Range("Leader").Offset(0, 2).End(xlDown).Row - Range("Leader").Offset(0, 2).Row + 1
Range("Leader").Offset(A, 2).Formula = Sheets("Resource Forecast").Range("Project_Number").Value & " (" & Sheets("Resource Forecast").Range("Project_Name").Value & ") - " & Val5 & " POTENTIAL WORK"
Range("Leader").Offset(A, 3).Formula = Val6
Range("Leader").Offset(A, 4).Formula = Val7 / 7.5
Range("Leader").Offset(A, 5).Formula = Val8
Else
End If
Next j
Next k
'Range("Leader").Offset(1, 0).Resize(1, 2).AutoFill Destination:=Range("A4", Cells(Range("Leader").Offset(0, 2).End(xlDown).Row, 2)), Type:=xlFillDefault
End Sub
我要說的第一件事是,您應該始終使用特定的工作表對象來限定范圍。
但是您的問題是:
Range("Potential person")
無效。 范圍方法找不到這樣的范圍。
Excel命名范圍中不能包含空格,因此您的范圍必須帶有下划線或其他內容。 嘗試使用沒有空格的簡單測試,您應該會有所進步。
聲明:本站的技術帖子網頁,遵循CC BY-SA 4.0協議,如果您需要轉載,請注明本站網址或者原文地址。任何問題請咨詢:yoyou2525@163.com.