VBA to validate a named range

[Steven101]

Hi, I have a named range, "DataSource". I need to check if that named range = "Graphs!$B$1:$C$2"

I have another macro' that change the range, hence the question.

Cheers. S

 

[Marcelo Branco]

Maybe something like this...

Dim bCheck As Boolean

bCheck = ThisWorkbook.Names("DataSource").RefersTo = "=Graphs!$B$1:$C$2"

If bCheck Then
    'Range is correct
    'more code
Else
    'Something is wrong...
    'more code
End If

M.

 

[Steven101]

Thanks Marcelo, managed to get it to work with a small change...

ThisWorkbook.Names.Item

Cheers

 

[mikerickson]

With Range("DataSource")
    If .Parent.Name = "Graphs" And .Address = "$B$1:$C$2" Then
        MsgBox "good"
    Else
        MsgBox "not"
    End If
End With