1行のコードを使用して範囲の配列を消去します

Question

範囲のグローバル文字列定数を作成しました。

Global Const Graph_Cl As String = "G2:G13" 
Global Const Graph_Vl As String = "I2:I13" 
Global Const Graph_VlS As String = "L2:L13" 

私はこれらの範囲を1行のコードで消去したいと考えています。

With wkDataToUse 
    .Range(Graph_Cl, Graph_Vl, Graph_VlS).ClearContents 
End With 

が、私はエラーを取得：

"Wrong no of arguments or invalid property assignment!" 

私もこれを試してみました：

With wkDataToUse 
    .Range(Array(Graph_Cl, Graph_Vl, Graph_VlS)).ClearContents 
End With 

OR

With wkDataToUse 
    .Range([{Graph_Cl, Graph_Vl, Graph_VlS}]).ClearContents 
End With 

を私は1行ですべての範囲をクリアする方法コード？

Answer 1

複数の範囲アドレスを渡すには、カンマ区切りの文字列形式（"a:b,c:d,e:f"）が必要です。

.Range(Graph_Cl & "," & Graph_Vl & "," & Graph_VlS).ClearContents 

また、

Union(.Range(Graph_Cl), .Range(Graph_Vl), .Range(Graph_VlS)).ClearContents