로그인 유지
회원만 다운로드 가능합니다. 비회원은 열람만 가능합니다. 뭥미.ㅋ 회원 가입은 공짜니.. 성심성의껏 가입해주세요.. ^^
2011.08.11 14:26
키다리님..
그건 생각해서 그렇게 구현한건데요.. ^-^;;;;;;;
기능 구현은 아래처럼 되어 있습니다.
If Application.Version < 12 Or Right(ActiveWorkbook.Name, 4) = ".xls" Then
.Borders.ColorIndex = 16
Else
.Borders.Color = OutLines_Color
End If
엑셀 2007이전 버전, 즉 2003 이하 버전이거나, 파일 형식이 .xls일 경우에는
환경설정에서 지정한 색이 아닌 회색으로 설정하게 되어 있습니다.
음..
.xls파일이라도 지정한 색으로 표시하는게 맞을까요?
2003이전 버전에서는 사용할 수 있는 색이 제한적입니다. 색상 팔레트에 있는 아이만 사용가능하죠..
그래서 다른 색으로 사용되는걸 막아놓은 건데.. 음.. 어쩌까나..
일단.. 키다리님을 위해서(강조!ㅋ) 무조건 지정한 색상이 들어가는 버전으로 만들었습니다.
아래 파일을 다운 받아.. 기존 파일을 대체해주세요..
abyul_Excel_Tools2.xlam
새 창으로
선택한 기호
![[레벨:30]](http://www.abyul.com/zbxe/modules/point/icons/default/30.gif "포인트:141749point, 레벨:30/30"){kind=icon}
아별
키다리님..
그건 생각해서 그렇게 구현한건데요.. ^-^;;;;;;;
기능 구현은 아래처럼 되어 있습니다.
If Application.Version < 12 Or Right(ActiveWorkbook.Name, 4) = ".xls" Then
.Borders.ColorIndex = 16
Else
.Borders.Color = OutLines_Color
End If
엑셀 2007이전 버전, 즉 2003 이하 버전이거나, 파일 형식이 .xls일 경우에는
환경설정에서 지정한 색이 아닌 회색으로 설정하게 되어 있습니다.
음..
.xls파일이라도 지정한 색으로 표시하는게 맞을까요?
2003이전 버전에서는 사용할 수 있는 색이 제한적입니다. 색상 팔레트에 있는 아이만 사용가능하죠..
그래서 다른 색으로 사용되는걸 막아놓은 건데.. 음.. 어쩌까나..
일단.. 키다리님을 위해서(강조!ㅋ) 무조건 지정한 색상이 들어가는 버전으로 만들었습니다.
아래 파일을 다운 받아.. 기존 파일을 대체해주세요..
abyul_Excel_Tools2.xlam