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

 졸따구 (zolddagu)

추천:  2
파일:     조회:  2250
제목:   "DM발송" 건.. 너무 어려웠어요.
     
 
혼자서 해보려니깐 디게 힘들더라구요....ㅡㅡ"
진짜로 초본데... VBA강좌에 있는 걸 보구.. 따라하려니깐 무슨 말인지도 모루겠구...

결국.. 아~~!! 모루겠다..... 하면서.. 오피스튜터를 디적거리다가...
"DM발송용 라벨" 이라는 걸 찾았어요.....ㅡㅡ"

제가 생각했던 거랑은 조금 달랐지만.... 와우~~!! 참 반갑고.. 고맙고...신기하기도 하구...ㅡㅡ;;;


감사합니당~~~ ^^*


그런데요.....
제가.. 매크로도 사용을 할 줄을 몰라서 그러는데요...
저기.. 그거....음......
글자의 일부분을 진하게 하거나....
크게 하거나.. ... 뭐.. 그렇게는 할 수 없나요??
원본 데이터에서 글자를 진하게 해도... 
매크로를 실행해서 라벨 시트로 옮겨서 보면.... 그대로더라구요...ㅡ"ㅡ

가르쳐주세요~~~ 
감사합니당~~~ ^^*
==============[ⓨⓔⓞⓝⓞⓚ님 글에 대한 답변입니다]==============

안녕하세요.

'DM 발송용 라벨만들기'를 요긴하게 쓰신다니 고맙습니다.

다음의 코드는 해당 파일의 코드중 일부분입니다.  '회사명'을 진하게(Bold) 하고 '성명'의 크기를 14로 만들는 예제입니다.

    With LbRng
      .Cells(1, 1) = AddRng.Cells(intB, 3) '우편번호
      .Cells(2, 1) = AddRng.Cells(intB, 4) '주소
      .Cells(3, 1) = AddRng.Cells(intB, 2) '회사명
      .Cells(3, 1).Font.Bold = True '추가된 진하게 만들기
      .Cells(4, 1) = AddRng.Cells(intB, 1) & " 귀하" '성명
      .Cells(4, 1).Font.Size = 14 '추가된 글자크기 14 만들기
    End With

그럼 도움이 되시길..
 
[불량 게시물 신고]  
ⓨⓔⓞⓝⓞⓚ와우~~* 감사합니당~~ (--)(__)~~~~~!!08-19 (15:22)
삭제 ■신고
        
  

작성일 : 2003-08-19(15:01)
최종수정일 : 2003-08-19(15:01)
 


 ◎ 관련글

  제 목   작성자   날짜
"DM발송" 건.. 너무 어려웠어요... 그래서...^^* ⓨⓔⓞⓝⓞⓚ 2003-08-19
"DM발송" 건.. 너무 어려웠어요. 졸따구 2003-08-19