VBA用於將文本從單個未移動的單元格復制到粘貼到另一個單元格，每個粘貼/循環向下移動一個單元格

Question

我正在嘗試制作一個工作表，最終將使用原始基地址和位置列表進行路由優化。 我目前有一個使用google maps api的宏，它會列出從原始地址到列表中所有地址的距離和持續時間。 我想嘗試使用谷歌地圖api找到最短的持續時間，並將相關的地址用作新的原點，這樣我就可以再次比較距離和持續時間。 我有工作表設置，以便最短的持續時間地址替換以前的原始地址，但我需要能夠將每個新的原始地址復制並粘貼到它們自己的單元格中，以基本上列出它們的使用順序。

基本上，考慮單元格G16是存儲第一起始地址的位置，並且在距離/持續時間宏G16的第一次運行之后，宏G16將更新到距離原始地址最遠的任何地址，因此成為新的原點。 然后我需要將該原始地址復制到單元格G18並重復距離/持續時間宏，G16中的每個后續地址一次向下復制1個單元/行。 即，第一個地址被復制到G18，第二個到G19，第三個到G20，直到列出所有地址。 地址數也是可變的，每周都會變化，因此范圍不一致。

如果這有任何意義，請告訴我，因為解釋起來很復雜。 謝謝！

Answer 1

這應該工作：

Cells(Rows.count, "G").End(xlUp).Offset(1, 0).Value = Range("G16").Value