나눔터  
  HOME > 나눔터 > 묻고답하기 > 엑셀
엑셀
엑셀에 대한 질문과 답변을 올려주세요. 단, 취지에 맞지 않는 글은 운영자가 삭제합니다.
 "000 님, 도와주세요", "부탁 드립니다.", "급합니다!" 등과 같이 막연한 제목을 달지 말아주세요.
[필독] 빠르고 정확한 답변을 얻는 16가지 Tip !
[필독] 저작권법 개정에 따른 이용안내
작성자:  

 Dubito (LUDISTO)

추천:  2
파일:     조회:  4076
제목:   [RE]도움요청
     
  * 답변하시는 분들께 도움이 되도록 자신의 환경을 아래 항목 옆에 기재해 주세요.

1. 엑셀 버전(95,97,2000,2002): 2000
2. 윈도우즈의 버전(win95,win98,winME,winNT,win2000,winXP): 98
3. CPU (486,PentiumI/II/III/IV...):III
4. RAM (32,64,128,256,512MB,1G...): 64

* 아래줄에 질문을 작성하세요 >>

1. 정열
  ㅇ첨부파일에서 시.군기준 전주->군산->익산순으로 한 번에 정열하는 방법
2. 조건부서식
  ㅇ첨부파일에서 학교가 고등학교인경우 글자색을 파랑색으로 강조하는 방법

위 두가지 사항에 대하여 고수님들의 조언을 듣고자 합니다.
==============[최필렬님 글에 대한 답변입니다]==============
1번에 대한 답변
도구메뉴의 옵션>사용자정의목록에 전주>군산>익산 순으로 등록시킨 후 정렬메뉴에 들어가 사용자 정의 정렬에서 등록시킨 목록을 선택하시면 됩니다.
물론 해당 도시에 숫자로 코드를 부여하여 코드로 정렬시키는 것도 한 방법이 될테지만...

2번에 대한 답변
저도 초봅니다. 잘은 모르나 엑셀 기본기능에는 없는 거 같고 그래서 엑셀 VBA사전을 뒤져 한 번 해 봤습니다. 아래의 코드를 VBA MODULE에 삽입해서 해당 시트를 여신 후 TEST라는 프로시져를 실행해 보세요. 엑셀 전체 셀을 검색해서 "고등학교"라는 문자 스트링이 있는 경우 색깔을 파랑색 비슷한 색깔(제가 파랑색을 RGB스타일로 잘몰라서)로 바뀝니다. 전체 셀을 검색하므로 시간이 걸리는 데 중간에 정지하셔도 원하는 결과를 얻으실 수 있을 겁니다. 즐거운 하루 되세요...


Sub test()
    Dim str As Variant
        For Each str In ActiveSheet.Cells
            If InStr(1, str.Value, "고등학교") <> 0 Then
             str.Font.Color = RGB(0, 0, 100)
            End If
        Next str
    End Sub
 
[불량 게시물 신고]  
        
  

작성일 : 2003-07-01(14:28)
최종수정일 : 2003-07-01(14:28)
 


 ◎ 관련글

  제 목   작성자   날짜
도움요청 최필렬 2003-07-01
[RE]도움요청 Dubito 2003-07-01
[RE]도움요청 작은오리 2003-07-01
[RE]도움요청(추가도움요청) 최필렬 2003-07-01