方法对象全局失败的范围
尽pipe我已经初始化了工作表，并确保名称是正确的，但我一直在为我的代码获取对象__global错误的方法范围。 任何帮助？ 该代码应该是find一个数据的单元格范围内放入第二个电子表格
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")不起作用。 范围方法无法find这样的范围。
Excel命名的范围不能有空格，所以你的范围有下划线或者其他东西。 尝试一下没有空格的简单testing，你应该取得进步。