使用VBA从多个列创建2列表

Question

我正在尝试对一组调查结果进行排序，其中受访者选择一个位置作为他们的家，并且可能选择他们进行研究的位置。

住宅。研究地点

Alabama，The Bahamas，CA，KY

加州，AL，秘鲁

等，98行。

我想创建一个包含源列和目标列的表，然后我可以在ArcGIS中使用它来创建径向流线图。我需要从VBA获取上面的多行和不同数目的目标列表，并将其排列在一个2列表中，该表复制每个目标的驻留字段。

住宅。研究地点

阿拉巴马州，巴哈马群岛

阿拉巴马州，加利福尼亚州

肯塔基州阿拉巴马州

加州，AL

加利福尼亚，秘鲁

从这里我可以为每个住宅（源）和研究地点（目的地）添加xy坐标以创建我的径向流线图。

我已经查看了一些范围到单列代码的示例，但是我没有发现任何与我的源列相关的内容。任何帮助将不胜感激！

Answer 1

我假设你的表格看起来像这样：

输出将为：

以下代码将完成此任务：

myfnames.txt