直角座標系で作ったメッシュの端点の緯度経度を求める

ちょっと無理矢理ですが、以下の方法で調べることができます。 

1. excelで、XYを記載したcsvファイルをつくる
2. csvファイルを読み込んでメッシュの端点を作る
3. UTM座標系（JGD2000）に変換
   ArcToolbox＞Data Management Tools＞プロジェクトとトランスフォーム＞フィーチャ＞投影変換
4. XとYの座標値をフィールド演算をおこない、テーブルに入力する。
   （下記参照。ヘルプに載っています）
   手軽にXY座標が欲しい場合は
   ArcToolbox＞Data Management Tools＞フィーチャ＞XY座標の追加
5. 出来上がったpointのシェイプファイルをちょっとずらし、メッシュポリゴン内に右下と右上のpointデータが含まれるようにする。
6. テーブル結合（空間結合）で、メッシュにXY座標を追加する。

■ポイントのX座標
Dim dblX As Double
Dim pPoint As IPoint
Set pPoint = [Shape]
dblX = pPoint.X

→ dblX

■ポイントのY座標
Dim dblY As Double
Dim pPoint As IPoint
Set pPoint = [Shape]
dblY = pPoint.Y

→ dblY