행마다 높이 값을 특정 셀에 추출할 수 있나요?

VBA
작성자
악순환의 굴레
작성일
2020-07-15 14:25
조회
127

행마다 높이 값을 특정 셀에 불러올 수 있나요?
RowHeight = "20"

RowHeight 를 활용해서 높이를 직접 지정할 수 있다는 것은 알겠는데요.

혹시나 가능한지 불가능한지 궁금합니다.

아직 VBA는 이제 알아가는 중이라서 아직 많이 모르기도 하고 찾아봐도 원하는 답은 찾질 못했네요.

셀 줄 바꿈 기능을 사용하거나 표에 따라 높이 간격이 보기 좋게 느껴지는 높이가 다르더라고요. 그래서 그에 맞게 높이를 ZZ1 열 전체에 맑은고딕, 글꼴 크기를 조정해 주고 있거든요.
그러면 행 높이 자동 맞춤을 해도 기본 크기는 원하는 데로 맞추면서 줄바꿈 시에도 그에 맞게 맞춰지기도 해서 말이죠.

매번 필요시에 조절하면서 사용해왔는데요. 이참에 표를 만들어 놓으면 좋을 거 같아서 만들려는데 가능한지 모르겠네요.
아시는 분 알려주세요~
(글로 설명한 게 잘 전달이 될는지 모르겠네요;)

개인적으로,
행 높이 맑은고딕 11pt / 16.5 높이를 기본으로 사용하고 있고,
그다음으로는 14pt / 20.25
이미지 삽입 시 30pt / 45, 50pt / 71.25
이런 식으로 사용하고 있습니다.

글꼴 크기 행 높이
맑은고딕 11pt 16.5
맑은고딕 14pt 20.25
맑은고딕 20pt 31.5
맑은고딕 30pt 45
맑은고딕 50pt 71.25
회원등급 : 열매3단계
포인트 : 1767 EP
총질문 : 11 개 (마감율 : 9%)
채택답변 : 0 개
전체 4

  • 2020-07-15 20:04

    안녕하세요?^^
    네 가능합니다.
    아래 VBA 코드를 적절히 응용해서 사용해보세요.

    Sub Test()
    
    Dim WS As Worksheet
    
    Set WS = ActiveSheet
    
    With WS.Range("A1").EntireColumn
        .RowHeight = 20
        .Font.Size = 40
    End With
    
    End Sub

    • 2020-07-15 20:54

      네 안녕하세요.
      바쁘실텐데 빠른 답변 주시고 감사합니다.

      음. 제가 원하는 방향이랑 조금 다른 거 같지만.
      이 방법도 나름 쉽게 행 높이를 일괄 적용할 수 있는 방법이라서 이것도 활용할 수 있을 거 같네요.^^
      이 방법으로도나마 행 높이를 일괄 적용하는데 조금이라도 빠르게 할 수 있겠어요.
      또 하나 배워 갑니다.


  • 2020-07-15 20:55

    댓글이 달리면 글을 수정할 수 없네요;;

    본문 표에서

    그러니까 쉽게 A2열부터 A열에 글꼴 크기를 적용하고,
    C열에 글꼴 크기만큼 변경된 행 높이값을 자동으로 받아 오고 싶은 거였습니다.

    (글꼴 크기가 변경되면 기본적으로 행 높이가 '자동 맞춤' 되면서 행 높이가 달라지잖아요.
    그것을 활용하고자 함입니다. 글 설명으로만 전달이 쉽지는 않네요.)

    1. [글꼴] 열에 내용을 입력하고,
    2. [크기] 열의 글꼴 크기처럼 A열에 적용함.
    그러면
    3. [행 높이] 열, C열에 입력된 값 예시처럼 (글꼴 크기에 따라 자동 맞춤으로 변경된) 행 높이를 추출하는 것이 가능한지였습니다. (C열에 행 높이 값 입력 받기)

    어려울 거 같아 보이긴 합니다만...

    최종 하려는 것은
    글꼴 10~50pt까지 적용된 약40개 목록을 만들 거고요.
    그에 따른 증가된 행 높이 값을 보다 쉽게 알고 싶은 것인데요.
    이게 가능할까요?


    • 2020-07-15 22:58

      흠.. 질문이 잘 이해되지 않습니다. ㅜㅜ; 이놈의 멍충멍충한 머리가 문제네요 흑
      잘 이해하지 못했지만, 내용을 요약하자면,
      A열 각 셀에 입력된 글꼴 크기에 따라 행 높이를 다르게 적용해주고 싶다는 말씀이신가요?
      그리고 각 글꼴크기마다의 행 높이는 위에 적어주신 표 처럼 정해져 있는 상황이구요..
      제가 잘 이해했는지 모르겠습니다 ^^;


전체 2,502
번호 카테고리 제목 작성자 작성일 추천 조회
2493 함수/공식
New Vlookup, 피벗으로 해결되지 않는 데이터 정리 문제 (1)
오달 | 00:43 | 추천 0 | 조회 15
오달 00:43 0 15
2492 함수/공식
New 스프레드시트 조건부서식
거꾸로문 | 2021.03.06 | 추천 0 | 조회 29
거꾸로문 2021.03.06 0 29
2491 함수/공식
New 다중조건 관련 함수 부탁드려요. (2)
낮은자 | 2021.03.06 | 추천 0 | 조회 34
낮은자 2021.03.06 0 34
2490 문서서식
New 셀 표시형식 질문 (2)
4Block | 2021.03.06 | 추천 0 | 조회 29
4Block 2021.03.06 0 29
2489 문서서식
New 날짜서식 영문 표기 오류 첨부파일 (2)
SAM | 2021.03.05 | 추천 0 | 조회 31
SAM 2021.03.05 0 31
2488 함수/공식
New 피킹리스트 같은걸 만들어 볼까 하는데요.
이쑤노 | 2021.03.05 | 추천 0 | 조회 35
이쑤노 2021.03.05 0 35
2487 VBA
New ImageLookup를 엑셀에서 에라 발ㅅ생
jig637 | 2021.03.05 | 추천 0 | 조회 27
jig637 2021.03.05 0 27
2486 VBA
New 네이버 로그인 관련 질문 (1)
dreamingsky | 2021.03.05 | 추천 0 | 조회 25
dreamingsky 2021.03.05 0 25
2485 함수/공식
New 발주 리스트 순서대로 세로 가져오기 (1)
qkrwlg**** | 2021.03.05 | 추천 0 | 조회 36
qkrwlg**** 2021.03.05 0 36
2484 문서서식
New 버스배차관리파일 (2) 답변완료
미성 | 2021.03.05 | 추천 0 | 조회 32
미성 2021.03.05 0 32
2483 함수/공식
New IF함수 동일조건에 다른값 문의 첨부파일 (2)
Ns프링글스 | 2021.03.05 | 추천 1 | 조회 32
Ns프링글스 2021.03.05 1 32
2482 기능/도구
New 텍스트 정렬, 언어별로
LJH | 2021.03.05 | 추천 0 | 조회 28
LJH 2021.03.05 0 28
2481 함수/공식
New VLOOKUP 세로/가로 방향 가져오기 (1)
qkrwlg**** | 2021.03.05 | 추천 0 | 조회 45
qkrwlg**** 2021.03.05 0 45
2480 문서서식
New 표에서 수식이 들어 있는 셀은 보호하면서, 표의 자동확장 기능은 이용할 수 없을까요? (1)
이한준(김해) | 2021.03.05 | 추천 0 | 조회 21
이한준(김해) 2021.03.05 0 21
2479 차트/그래프
New 간트차트 관련 문의 사항
kuh**** | 2021.03.05 | 추천 0 | 조회 17
kuh**** 2021.03.05 0 17
2478 기능/도구
New DuTool 설치시 오류 문의드립니다.
반짝반짝 | 2021.03.04 | 추천 0 | 조회 26
반짝반짝 2021.03.04 0 26
2477 VBA
New 네이버부동산 크롤링 (2) 답변완료
웃음 | 2021.03.04 | 추천 0 | 조회 36
웃음 2021.03.04 0 36
2476 함수/공식
New small함수로 작은수를 찾은 뒤 그에 상응하는 옆셀 불러오기 질문합니다. 첨부파일 (1)
솔솔 | 2021.03.04 | 추천 0 | 조회 32
솔솔 2021.03.04 0 32
2475 함수/공식
New 조건이 있는 중복된 값들의 개수 셀수 있을까요? (3)
dasdas | 2021.03.04 | 추천 1 | 조회 44
dasdas 2021.03.04 1 44
2474 VBA
New 같은이름 다른파일의 데이터 복사 붙이기 첨부파일
H.B | 2021.03.04 | 추천 1 | 조회 27
H.B 2021.03.04 1 27
2473 파워쿼리/피벗
New 파워쿼리 편집기 날짜 및 시간 (10진수) 2 첨부파일 (1)
JaeChoi | 2021.03.04 | 추천 0 | 조회 33
JaeChoi 2021.03.04 0 33
2472 함수/공식
New 9.4512E+15 식으로 발생되는 건들에 대하여 어떻게 하면 정상적으로 숫자가 나올까요? (5)
mo**** | 2021.03.04 | 추천 0 | 조회 56
mo**** 2021.03.04 0 56
2471 함수/공식
New 중복된걸 제외하고 셀수 있는 방법이 있어까요? (2)
dasdas | 2021.03.04 | 추천 0 | 조회 48
dasdas 2021.03.04 0 48
2470 VBA
New 에러가 생기면 코드 실행을 멈추고 싶은데 어떡하면 좋을까요? (1)
cyi | 2021.03.04 | 추천 0 | 조회 27
cyi 2021.03.04 0 27
2469 문서서식
New 엑셀 표를 PPT로 불러왔을때 선 굵기 관련 건 (3)
운영자동차 | 2021.03.04 | 추천 1 | 조회 37
운영자동차 2021.03.04 1 37
2468 VBA
New 아웃룩 첨부파일 저장 시 파일제목 (1)
KDHkm | 2021.03.04 | 추천 0 | 조회 23
KDHkm 2021.03.04 0 23
2467 VBA
New 혹시 2007에서 2010과 같은 스크린샷 vba는 없나여? (1)
손님 | 2021.03.04 | 추천 0 | 조회 21
손님 2021.03.04 0 21
2466 함수/공식
두가지 DATA를 비교하여 없는 값 불러오기 첨부파일
Jeff | 2021.03.04 | 추천 0 | 조회 35
Jeff 2021.03.04 0 35
2465 차트/그래프
간트에서 선행업무와 연결하는 방법 (1)
라이언 | 2021.03.04 | 추천 0 | 조회 25
라이언 2021.03.04 0 25
2464 함수/공식
xFilter 함수 기능 설치 (1)
서강국 Noah | 2021.03.04 | 추천 0 | 조회 26
서강국 Noah 2021.03.04 0 26