【wei*2】

嗯？為什麼要重新造輪子呢？因為透過這個方法，才能夠讓完全不懂寫程式的自己可以練習，從做中學習，遇到不懂的，也比較有既有的範例跟資料可以參考。

個人以為，寫程式的邏輯是不會受限於某種特定的語言的。（因此，即便不是自己熟悉的語法也無妨），而且這個程式的作法其實很簡單…

http://wangshifuola.blogspot.com/2010/08/twd97wgs84-wgs84twd97.html

我就直接參考這個網站，把它整個拿來翻成vba的語法…，如此而已…。那麼…，結束了（誤）

簡單介紹一下…，因為我希望可以一次匯入大批座標，並且完成大量座標轉換，因此設計了一個匯入座標，專門用來匯入存放在純文字檔案（TXT）的座標。

來實際測試一下…

這是待會要直接匯入的座標格式

按下「匯入座標」就會開啟檔案總管畫面提供選擇檔案匯入。

然後就是匯入啦！來測試一下轉為TWD97的效果吧！

再用中研院的程式check一下，嗯，只差在進位，主要是我把轉換的結果四捨六入了。

如果夠眼尖就會發現，座標轉換後的排序有改變，為什麼呢？

其實是因為這個程式的座標轉換核心，是改用VB.NET編譯成dll，再呼叫進來使用。

雖然Excel2016最終提供給使用者的是單核心單線程的，但透過這個方式

當把資料都丟給dll後，開始轉換座標的時候就可以跑多核心多執行緒了！

因此，當座標轉換完，丟回來給Excel VBA的時候，順序就會改變囉。