vba - 使用 Range ("cell content"引用单元格会出现错误 1004

Question

您好，我是新来的，我是 VBA 编码新手，fried 告诉我，如果我的代码有问题，StackOverflow 是寻求帮助的最佳站点。

我懂了

runtime error 1004 method range of object _global failed

此行发生错误

Set rng = ws.Range("Kumulatív Gross Loss (mio)").Select

我认为我可以通过它们包含的任何值来引用范围。那么请问我在哪里犯了错误？不，它没有命名范围，我只是想根据它的值“Kumulatív Gross Loss (mio)”来选择它

Option Explicit

Sub sum_funkcie()

Dim MonthYear As String
Dim KGL As Double
Dim wb As Workbook
Dim ws As Worksheet
Dim rng As Range

Set wb = ActiveWorkbook
Set ws = wb.Sheets("Graf Neg. Loss")
Set rng = ws.Range("Kumulatív Gross Loss (mio)").Select


MonthYear = ws.Range("A1").End(xlDown)
KGL = ws.Range("Kumulatív Gross Loss (mio)").End(xlDown)
End Sub

Answer 1

您不能通过值引用范围，您可以为范围定义名称并使用该命名范围作为引用。

您需要做的是搜索值，然后选择单元格:

替换:

Set rng = ws.Range("Kumulatív Gross Loss (mio)").Select

与:

Dim csel As Range
  With Worksheets("Graf Neg. Loss").Cells ' 
     Set csel = .Find("Kumulatív Gross Loss (mio)", LookIn:=xlValues)
        If Not csel Is Nothing Then
            csel.Select
        End If
  End With