Vba in excel

ype a question for help | (General) Sub EX8 2 2NearestNeighbor 0 Dim iSeg As Integer, i As Integer, As Integer, 1Start s Integer TSP bjects Dim nCities As Integer, novAt As Integer, nextc Dim intTD As Integer, intMaxDist As Integer, intMinDist As Integer As Integer Dim rngA As Range Dim DistAs Integer Dim binVisited) As Boolean Set rngA -Range("A3") With enga Find nCities zedim DiStO and blnVisicedo read Distance mateix from Excel, assign to DLt 'Pinding the Jongest distance and assign to variable intMaxDE HEste Output Headings AnEAAe EA tance neT