글
엑셀 vba. 라인출력 모듈
공무tip
2012. 5. 21. 18:18
'라인그리기
For Si = 0 To i + 1
Range("A" & 5 + Si * 2 & ":Af" & 6 + Si * 2).Borders(xlEdgeLeft).Weight = xlThin
Range("A" & 5 + Si * 2 & ":Af" & 6 + Si * 2).Borders(xlEdgeTop).Weight = xlThin
Range("A" & 5 + Si * 2 & ":Af" & 6 + Si * 2).Borders(xlEdgeBottom).Weight = xlThin
Range("A" & 5 + Si * 2 & ":Af" & 6 + Si * 2).Borders(xlEdgeRight).Weight = xlThin
Range("A" & 5 + Si * 2 & ":Af" & 6 + Si * 2).Borders(xlInsideVertical).Weight = xlThin
Range("A" & 5 + Si * 2 & ":Af" & 6 + Si * 2).Borders(xlInsideHorizontal).Weight = xlHairline
Next Si
'공무tip' 카테고리의 다른 글
엑셀을 sql (0) | 2013.09.29 |
---|---|
캐드 - 도면 쪼개기 에드온 (0) | 2013.09.25 |
KS F2311 (0) | 2013.09.25 |
되메우기 (0) | 2012.05.15 |
USB 3.0인식문제 (0) | 2012.05.14 |