abyul.com > Excel > Question & Answer - 한셀안의 서식을 다르게 지정할 수 있는 방법 없을까요?

엑셀에 대해서 궁금한 것이 있으시면 마음껏 질문해주세요.

이 게시판은 아별닷컴 회원만 질문을 올릴 수 있습니다. 회원에게 주어지는 특권인셈이지요. 회원이 아닌 분들은 열람만 가능합니다.

글 수 113

한셀안의 서식을 다르게 지정할 수 있는 방법 없을까요?

VBA 조회 수 6109 추천 수 0 2011.09.28 13:59:10

부루끄 *.136.41.5 http://abyul.com/zbxe/100329

안녕하세요 최근 업무가 바빠서 오랫만에 질문글을 올리는군요..

항상 업무향상을 위해 연구를 합니다. ^^

질문을 시작합니다.

한셀안의 내용중 특정부분을 강조하여 눈에 띄게 하고 싶은데 대략 불가능하다는 내용의 검색이 전부더군요.

하지만 일정한 규칙이 있다면 가능하지 않을까하여 실낱같은 희망을 찾고자 문의 드립니다.

ex).

이런식으로 앞으두문자를 진하게 글씨크기를 크게,색상파랑

뒤에서4번째까지 문자를 진하게 글씨크기를 크게, 색상빨강

G9R11I0154

XAR11I0154

CFR1B94973

첨부참조

xp, excel2003 ver

이 게시물을...

서식문의.xls [File Size:37.0KB/Download:98]

엮인글 :: http://abyul.com/zbxe/100329/477/trackback

2011.09.28 18:16:12
*.104.126.21

네.. 이상하군요.. 왜 불가능하다고 대답했을까요? @_@;;

답변부터 드리면.. 가능합니다.

일단..

셀안에 텍스트 단위로 셀서식을 적용하기 위해서는 전제조건이 있습니다.

셀 서식이 회계 서식으로 적용되어 있으면 안됩니다.

정확히 얘기하면.. 문자열 서식 부분에 @외에 다른 요소가 있으면 안됩니다.

회계 서식은 아래와 같은데요.. 문자열 부분이 _-@_-로 되어 있어서 텍스트 단위로 적용한 서식이 반영이 안됩니다.

_-* #,##0_-;-* #,##0_-;_-* "-"_-;_-@_-

아래와 같이 바꾸면 적용이 되죠..

_-* #,##0_-;-* #,##0_-;_-* "-"_-;@

왜 그러냐면.. 모르겠습니다. =_=;; MS의 일률적이지 않은 셀 서식 정책이 이해가 안가는 1인..

===> 디테일 쩌는 엑신 오주원.. ㅋㅋ

암튼..

아래의 절차를 따라하시면 텍스트 단위로 서식을 달리 적용할 수 있습니다.

1. 셀 서식을 회계서식이 아닌 다른 서식으로 지정한다.

보통은 일반으로 지정합니다. 단축키도 있지요.. Ctrl+Shift+~ 입니다. ~는 숫자1 왼쪽에 있습니다.

2. F2를 눌러 셀 편집 모드로 들어가시구요.. (셀을 더블 클릭하거나, 수식입력줄을 클릭해도 편집 모드로 들어가겠죠..)

3. 변경할 텍스트들만 선택을 합니다. 예제처럼 앞에서 2개 텍스트만 선택해보세요..

4. 글자 색을 파랑으로 변경합니다. Ctrl+1을 눌러서 서식창에서 설정해줘도 되구요..

5. 나머지도 바꾸고 싶은데로 바꿉니다.

6. 엔터를 쳐서 편집 모드를 종료합니다.

끝~

자.. 이걸..

셀 하나씩 편집해야하냐고 물어보실 수 있습니다.

답변은 간단하죠.. 그렇습니다.

그게 싫다고 하시면..

이때 필요한게 뭐죠?

그렇습니다. 이때 필요한게 VBA입니다.

첨부파일을 다운 받으시고..

변경할 영역을 선택하신 다음.. Ctrl+Shift+J를 눌러보세요..

다운받기 : abyul.com_20110928_서식문의-1.xls

촤라락 바뀌는걸 볼 수 있습니다.

Ctrl+Shift+J는 제가 임의로 지정한 단축키입니다.

Alt+F8을 눌러 매크로 창에서 옵션 버튼을 눌러 단축키를 변경할 수도 있지요..

해당 코드는 아래와 같습니다.

VBA.. 공부해볼만 하겠죠? ^^;

'### Created by abyul.com 2011.09.28 pm 5:58
'### Shortcut is Ctrl+Shift+J
Sub abTextFormatting()
    Dim rngTarget As Range: Set rngTarget = Selection
    Dim r As Range
    For Each r In rngTarget
        If r.NumberFormat <> "General" Then r.NumberFormat = "General"
        With r.Characters(Start:=1, Length:=2).Font
            .Color = -65536
            .TintAndShade = 0
            .Bold = True
        End With
        With r.Characters(Start:=7, Length:=4).Font
            .Color = -16776961
            .TintAndShade = 0
            .Bold = True
        End With
    Next r
End Sub

abyul.com_20110928_서식문의-1.xls [File Size:96.5KB/Download90]

2011.09.28 20:28:26
*.136.41.5

정말 감사 드립니다. 일단 들어본 구문이긴하나 ㅋㅋ;

처음에 하나씩 입력 >>>끝 여기까지 보고 깜짝 놀랐습니다. ; 설마 이게 다인가 ㅋㅋ

끝단부에 해결책을 내놓으시다니 영화의 반전을 느끼는 기분이네요 ^^

2011.09.29 09:27:59
*.104.126.21

하하..

일단.. 기본적인 것을 설명한 다음에 실무적인 것을 설명하는 센스.. ㅋㄷㅋㄷ

문자별 서식 지정시 셀서식 문제를 지적하는 것은 저 밖에 없을 듯.. ㅎㅎ

거기다가 문자열 서식부분에 @만 있어야한다는 원인 분석을 해주는 곳도 아별닷컴 밖에 없습니다. ^_^;;

완소 아별닷컴 우헤헤~~

2011.09.29 19:16:19
*.136.41.5

한마디로 모범답안 입니다.^^

근데 메크로 실행시 >> .TintAndShade = 0 부분이 노랑음영으로 에러가 나는데 검색을 해보니

해당문구는 색의명도를 설정하는 것 같던데 전혀 이부분이 에러가 날 이유가 없는 것 같더라구요

2011.09.29 23:04:55
*.130.73.75

부르끄님..

제가 간과한게 있군요..

Ecel 2003에는 .TintAndShade라는 개념 자체가 없었습니다.

Excel 2007에서 생긴 개념이지요..

2003버전에서 실행할꺼면 .TintAndShade 라인을 없애주세요....

Shade가 0이면 없는 것과 진배없으니까요..... ^-^;;

슬슬 2003을 배제하는 과정을 거처야할 것 같습니다. 2003은 이제 과거의 유물.. ^_^;;;;;;

2010으로 업그레이드할 것을 추천드립니다.

» 편집 도구모음 건너뛰기

하이퍼링크

새 창으로
특수문자 삽입
선택한 기호
찾기/바꾸기
- 찾기
- 바꾸기
찾을 단어

찾을 단어
바꿀 단어

칸 수 지정

행
열

표 속성 지정

테두리 굵기
테두리 색
표 배경색

문서 첨부 제한 : 0Byte/ 2.00MB
파일 제한 크기 : 2.00MB (허용 확장자 : *.*)

비밀글 기능

List of Articles

번호	제목	글쓴이	날짜	조회 수
공지	공지 [공지] 아별닷컴의 엑셀 질문방 폐쇄합니다. 카페 질문방 이용하세요..	아별	2015-04-23	43739
113	VBA 엑셀 열 추가 _ 엑셀의 마지막 셀 재 인식시키는 팁 ActiveSheet.UsedRange.Select [1]	눈물바다	2009-08-27	10174
112	VBA 엑셀 일괄암호저장 [1]	천운	2017-03-13	9515
111	VBA 매크로 질문 드립니다.	ORACLE	2016-08-16	8586
110	VBA 컴파일 에러가 나요?	구름바다	2015-09-14	8273
109	VBA 매크로를 이용한 exe 파일 자동 실행 방법 문의~	hickel	2016-09-07	8131
108	VBA 추가기능 파일 수정 관련 [1]	고수가되고파	2015-04-03	8063
107	VBA .Find 재고 입고월 분석(vba) [3]	럽웨어	2009-07-24	7855
106	VBA 셀에 맞춰 그림 삽입하기 [1]	눈물바다	2012-06-05	7742
105	VBA 파일&폴더 파일 만들기 _ 파일 생성, 폴더 생성, 파일 존재하는지 여부 확인 등 [4]	엑셀대단해	2012-08-15	7569
104	VBA 셀 복사 후 아래셀에 수식 및 메모 붙여넣기 관련	고수가되고파	2015-04-17	7519
103	VBA 사용자 정의 함수에서 변수의 행번호 추출하기	백미90	2015-08-17	7196
102	VBA .Find 매크로 질문입니다.~ [2]	카멜	2009-07-02	6891
101	VBA .Find ListBox1 에 추가가 되지를 않습니다. [3]	사오정원조	2009-07-03	6890
100	VBA vba질문하나 올리겟습니다.ㅠㅠ [3]	gg남자	2013-03-27	6730
99	VBA 랜덤 출력 관련 짧고 간결(?)한 3가지 질문입니다. _ 중복 없는 랜덤 패스워드 생성하는 방법.. [4]	파이스	2011-11-29	6662
98	VBA 조건문을 변수화 하는 방법 [2]	엑셀대단해	2012-07-23	6595
97	VBA 특정개체 수정 관련 [5]	고수가되고파	2015-04-02	6250
96	VBA 프로그램바 질문 _ 작업 진행바 Progress bar [2]	신강현	2013-01-30	6148
95	VBA VBA로 정렬하는 법 문의 [6]	부루끄	2011-07-21	6123
»	VBA 한셀안의 서식을 다르게 지정할 수 있는 방법 없을까요? [5]	부루끄	2011-09-28	6109