Excel VBAトリプレットから反復して負の符号を追加

Question

kmlファイルにこの緯度と経度の文字列があり、以下の文字列のすべての経度値を負の値に変更したいと考えています。

私は最も簡単な方法は、それらを三つ組にして各行を繰り返し、最初の番号に負の符号を付けることでした。助けのために非常に多くの

-1.48521523184216,54.9621324923351,0 

-1.48405081848398,54.9621530122697,0 

おかげ

1.48638,54.9621256516623,0 

1.48521523184216,54.9621324923351,0 

..... 

から

latlong = "1.48638,54.9621256516623,0 1.48521523184216,54.9621324923351,0 1.48405081848398,54.9621530122697,0 1.48288711461705,54.9621872052157,0 1.48172447471685,54.9622350607575" 

latlong = Replace(latlong, " ", vbCrLf) 

。

Answer 1

この

latlong = "-" & latlong 
latlong = Replace(latlong, " ", vbCrLf & "-")