Цикл по клеточным зависимостям

Question

это выражает то, что я хотел бы сделать, но, очевидно, не работает. Я думаю, что я пытаюсь сделать, ясно:

Получить ячейку, подсчитать ее зависимости и вывести их все.

Заранее спасибо за любой ввод

            Sub Extract()
            Dim i As Integer

                    For i = 1 To Workbooks("myBook.xls").Worksheets(1).Cells(14, 5).Dependents.Count
                        Debug.Print (Workbooks("myBook.xls").Worksheets(1).Cells(14, 5).Dependents(i))
                    Next i
            End Sub

Answer 1

Вы можете сделать

Sub Extract()
Dim i As Range
    With Workbooks("Book1.xls").Worksheets(1).Cells(14, 5)
        For Each i In .Dependents
            Debug.Print i.Value i.Address
    Next i
    End With

End Sub

HTH!

Редактировать

.Dependents - это переходное замыкание ОС.DirectDependents, и я не уверен, какой из них вы хотите ... попробуйте оба!