한 줄의 코드를 사용하여 범위 배열 지우기

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" 

한 줄의 코드를 사용하여이 범위를 지우고 싶습니다.

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

하지만 난 얻을 오류 :

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

또는

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

이 어떻게 한 줄에있는 모든 범위를 지울 수 있습니다 : 난 심지어이 시도

"Wrong no of arguments or invalid property assignment!" 

암호?

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