|
a1, b2, c3를 동시에 range로 select 하는 방법
set k = range("a1")
set l = range("b1")
set m = range("c1")
union(k,l,m).select
위와 같은 방법 말고.
range("a1","b2","c3").select 이런식의 방법은 없나요..
물론 위의 것은 오류가 납니다.
간단히 range개체를 이용해서 쉽게 하는 방법은 없나요. union을 쓰면 너무 길어져서 말입니다. 제가 a1, b2,c3를 동적배열로 구했는데.
한꺼번에 이 세 셀을 선택할려구 하는데 방법이 생각나지 않아서요..
For intnum = LBound(addcell) To UBound(addcell)
k = k & "," & addcell(intnum)
Next intnum
대충 이런식으로 구한 주소를 모두 선택하기 위해서 입니다.
==============[복대리님 글에 대한 답변입니다]==============
안녕하세요?
Sub 값있는셀선택하기()
Range("C8:C30").SpecialCells(xlCellTypeConstants, 23).Select
End Sub
아래 질문과 연계한다면....
위 한줄의 구문으로 해결될거 같아서 답변달아봅니다......
한편 아래구문도 참고해보세요...
Sub 셀선택()
Dim My_addr As String, i As Integer
For i = 1 To 10
My_addr = My_addr & Cells(i, i).Address(0, 0) & ","
Next i
MsgBox "순환문을 통해 얻은 문자열은 " & vbCr & My_addr & vbCr & "입니다."
My_addr = Left(My_addr, Len(My_addr) - 1)
'따라서 문자열 마지막부분의 , 는 삭제해줘야겠구요...
Range(My_addr).Select
End Sub |
|