wartość dostępu (treść) o nazwie komórki w Excel VBA

Question

This

Dim WB As Workbook 
Set WB = Workbooks.Open("foo\bar.xlsx", , True) 
Debug.Print (WB.Names("named_cell").Value) 
WB.Close (False) 

powraca

='Sheet'!$C$377 

zamiast wartości w komórce C377.

Jak mogę zamiast tego otrzymać wartość komórki?

Answer 1

Jeśli WB.Names("named_cell") zwraca obiekt , to ten obiekt ma właściwość RefersToRange. To zwraca obiekt Range, do którego odwołuje się obiekt Name. Zobacz https://msdn.microsoft.com/en-us/library/office/ff834918.aspx.

Więc

Debug.Print WB.Names("named_cell").RefersToRange.Value 

Zobacz także Malfunction of Excel-VBA own function when open other excel-file.

Answer 2

kilka sposobów:

Debug.Print Range("Named_Range").Value 
Debug.Print [Named_Range].Value '// This uses the evaluate method 

Nie trzeba się zakwalifikować nazwany zakres z obiektu arkusza, czy to w aktywnym skoroszycie (co powinno być jak to ostatni skoroszyt otworzyłeś).

Answer 3

Gdy nazwany zakres ustalono, Excel zna jego Parent, więc:

Sub dural() 
    Dim r As Range 
    Set r = Range("named_cell") 
    MsgBox r.Parent.Name & vbCrLf & r.Address(0, 0) & vbCrLf & r.Value 
End Sub 

jest jeden sposób, aby uzyskać informacje na temat tego zakresu:

ta wykorzystuje właściwości obiekt Zakres Obiekt zamiast obiektu Obiekt.