請問各位大大 在excel中如何以撰寫VBA使得自動以某特定儲存格內容命名並另存新檔
- 帖子
- 1
- 主題
- 1
- 精華
- 0
- 積分
- 2
- 點名
- 0
- 作業系統
- XP
- 軟體版本
- office 2007
- 閱讀權限
- 10
- 性別
- 女
- 來自
- 台北
- 註冊時間
- 2010-9-9
- 最後登錄
- 2010-9-16
|
請問各位大大 在excel中如何以撰寫VBA使得自動以某特定儲存格內容命名並另存新檔
各位大大
小妹嘗試多次依然失敗想請問如何將附檔中依序將七個縣市(Sheet1)中的經緯度(X, Y欄)各別對七個網格(Sheet2)中的中心點經緯度(X,Y欄)利用畢氏定理求距離，接著轉換成公里並另存成一個新檔
也就是最後會有七個檔，但因為實際上有一千多個縣市，希望能夠利用巨集或VBA程式一次執行一千多筆資料不用一個個執行程式存檔，小妹現在用的程式為
1.
Public Function slength(x1 As Integer, y1 As Integer, x2 As Integer, y2 As Integer)
slength = ((x1 - x2) ^ 2 + (y1 - y2) ^ 2) ^ 0.5 '畢氏定理
End Function
2.
Public Function km(degree)
km = degree * 110 '經緯度距離轉公里
End Function
希望能夠獲得解答 謝謝 |
-
-
縣市資料.rar
(7.19 KB)
excel表單
|
|
|
|
|
|
|
發表於 2010-9-9 17:35
| 
