エクセルVBA列（）。2列

Question

私はそれがD & G.

Option Explicit 
    Sub ReplaceDoTwComma() 
      Worksheets("Sheet1").Columns("D").replace _ 
       What:=",", replacement:=".", LookAt:=xlPart  
    End Sub 

の両方のために起こるたい列D. 期間にカンマ変更以下のコードを置き換える私は

Worksheets("Sheet1").Columns("D").replace _ 
Worksheets("Sheet1").Columns("G").replace _ 

を試してみました

またはColumns("D", "G")またはColumns ("D" & "G")運がありません。

私は良いの参照はどれガイダンスが高く評価されるだろうExcel VBA code for replacing all "." by "," in a column

です。 ありがとうございました！

Answer 1

_は、行の継続を表すので、両方のラインを複製する必要が覚えて、2つの別々の呼び出しを行います。

Option Explicit 
Sub ReplaceDoTwComma() 
     Worksheets("Sheet1").Columns("D").replace _ 
      What:=",", replacement:=".", LookAt:=xlPart  
     Worksheets("Sheet1").Columns("G").replace _ 
      What:=",", replacement:=".", LookAt:=xlPart 
End Sub 

それとも

Option Explicit 
Sub ReplaceDoTwComma() 
     Worksheets("Sheet1").Range("D:D,G:G").replace _ 
      What:=",", replacement:=".", LookAt:=xlPart  

End Sub