vba 유용한 소스(셀 선택)
원하는 범위 선택
row_1 = ActiveCell.Offset(0, 0).Row
col_1 = ActiveCell.Offset(0, 0).Column
Range(Cells(row_1, col_1 + 1), Cells(row_1, col_1 + 8)).Select
‘내 오른쪽 1칸부터 오른쪽 8칸까지 선택
머지(셀병합, 셀합치기)
Range(Cells(row_1, col_1 + 1), Cells(row_1, col_1 + 8)).Merge
셀 배경 없애기
Range(Cells(row_1, col_1 + 1), Cells(row_1, col_1 + 8)).Interior.Pattern = xlNone
선 없애기
Rows(rrow & “:” & rrow).Borders(xlEdgeTop).LineStyle = xlNone
선 굵기
Range(Cells(row_1, col_1 + 1), Cells(row_1, col_1 + 8)).Borders(xlEdgeBottom).Weight = xlMedium
xlThin이라고 쓰면 얇은 선.
새로운 줄 삽입
Rows(“1:1”).Select
Selection.Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove
또는
row_1 = ActiveCell.Offset(0, 0).Row
Rows(row_1 & “:” & row_1).Select
Selection.Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove