Run-time error '9': Subscript out of range?

Question

I am working on VBA and trying to solve the shortest path problem. When I run my code, it alerts me that: "Run-time error \'9\': Subscript out of range". I feel pu