1. FAQ
  2. 엑셀(Excel)
  3. AfterEffects
  4. Premiere
  5. Photoshop
  6. ETC

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

vba로 서식정렬

VBA 조회 수 4942 추천 수 0 2015.01.03 09:41:59

매크로로 복사해온 시트들의 서식이 기존처럼 가져오지못해서 열너비나 행너비 불필요한 행,열 삭제를 매크로기록으로 따서 실행하였는데요, 행열삭제까지는 잘되지만 열너비부분에서 시트마다 뒤죽박죽 맘대로 움직여버리네요 어디서 문제가있는것일까요??

 

Row("1:1").Select

Selection.delete Shifr: =xlUp

.

.

.

columns("k:l").select

Selection.columnwidth = 6

.

.

rows("1:1")select

selectoin.rowhight =16

.

.

대충이런식입니다.


댓글 '4'

정용규

2015.01.03 10:18:44
*.241.147.60

흠..열너비 조절하는거만안넣으면 정상적으로움지이네요

 

맨끝열 인 m~o를 열너비2로하는부분에서 오작동을합니다

profile

[레벨:30]아별

2015.01.07 12:50:57
*.132.210.135

정용규님.. 안녕하세요? ^^


저는 아래의 구문이 잘 이해가 안됩니다.

"열삭제까지는 잘되지만 열너비부분에서 시트마다 뒤죽박죽 맘대로 움직여버리네요"


샘플로 주신 코드들은 열너비가 뒤죽박죽될 이유가 없는 코드들인데요..

그리고.. 셀범위를 SELECT한 다음에 SELECTION에 대해서 값을 수정하는것은 불필요한 코딩입니다.


아래처럼 선택하지 않고도 셀 범위의 특성을 변경할 수 있습니다.

ROWS("1:1").ROWHEIGHT = 16


실행 속도도 빨라지고, 코드도 단순해지지요..


결론은..

엑셀 파일을 첨부해주셔야 질문을 이해할 수 있게 되고, 답변을 드릴 수 있겠습니다.


즐거운 하루 되세요.. ^^)/

[레벨:2]정용규

2015.01.13 13:57:06
*.241.147.60

답변감사드립니다 ^^. 해당파일들이 보안이 걸려있어서 첨부해드리지 못한점 죄송합니다.

 

당시에는 제가 시트에 셀병합되어있는것을 파악하지못하고 너비조절을해서 한번에 병합된 열들까지 변경이되어서 그런오류들이 생겼었습니다 ㅎ

현재는 코드 자체를 바꿔버려 다른워크북들의 이동복사가 가능하게 되어서 서식정렬을 할필요가없어졌습니다 ^^ ㅎ

 

또다른 질문들이 생겨났는데 질문또남겨드릴게용~

[레벨:2]정용규

2015.01.13 13:58:58
*.241.147.60

오호 기록기로 작업해보면서 공부하다보니 쓸모없는 코드들이 많았는데 한가지 배웠습니다 ㅎ

문서 첨부 제한 : 0Byte/ 2.00MB
파일 제한 크기 : 2.00MB (허용 확장자 : *.*)
List of Articles
번호 제목 글쓴이 날짜sort 조회 수
공지 공지 [공지] 아별닷컴의 엑셀 질문방 폐쇄합니다. 카페 질문방 이용하세요.. imagefile [레벨:30]아별 2015-04-23 61703
462 엑셀일반 엑셀 줄 간격에 대해서 [1] [레벨:3]빛의행운아 2011-12-28 9548
461 피벗테이블 엑셀 데이터 정리관련 문의~~~ [2] [레벨:2]flash 2011-12-30 3179
460 엑셀일반 엑셀에서 가로 세로 바꾸기 입니다. file [2] [레벨:4]pgpoch 2011-12-30 3989
459 엑셀일반 구버전 호환모드로 로드 시, 계행문자 줄바꿈 저장 안되는 현상 관련 file [2] [레벨:6]파이스 2012-01-02 4560
458 피벗테이블 질문하나 더 올립니다 file [6] [레벨:4]pgpoch 2012-01-02 3221
457 엑셀일반 ㅠ-ㅠ [1] [레벨:3]빛의행운아 2012-01-03 3031
456 테두리 두께 변경과 색상 입히기 file [2] [레벨:1]최선 2012-01-08 4542
455 엑셀일반 엑셀 듀얼모니터 사용 시 붙여 넣기 문제 [2] [레벨:3]읍내꽃미남 2012-01-09 4840
454 엑셀일반 입력된 데이터의 끝으로 이동하는 방법이 궁금합니다. [1] [레벨:6]파이스 2012-01-09 4591
453 엑셀일반 [Ctrl + F] 찾기 관련 질문... [9] [레벨:4]나카타 2012-01-09 2777
452 엑셀일반 바꾸기 기능 file [4] [레벨:0]불꽃남자76 2012-01-12 2755
451 엑셀일반 UDF에 의한 계산 결과 오류 [2] [레벨:0]엑셀의 초짜 2012-01-13 3249
450 엑셀일반 함수 관련 질문 드립니다. file [2] [레벨:3]블루짱이 2012-01-13 2783
449 아별툴관련질문 아별툴을 설치 하고 나서 crtl+f 의 기능 중에.. [4] [레벨:2]큰아빠에요 2012-01-16 3158
448 아별툴관련질문 쥔장님! 오류가 나서요. 한번 봐주세요. [3] [레벨:1]함도 2012-01-17 2742
447 IF수식 조건 함수문의 file [2] [레벨:3]블루짱이 2012-01-17 2870
446 아별툴관련질문 아별툴 설치시 오류...ㅠ.ㅠ imagefile [4] [레벨:1]House 2012-01-22 3166
445 엑셀일반 아별을 깔면 이러네요.ㅠ.ㅠ 엑셀 창이 알트텝으로 검색이 안되요 imagefile [2] [레벨:2]큰아빠에요 2012-01-30 4698
444 아별툴관련질문 아별 깔고나서 글이 안써져요 [1] [레벨:1]박주연 2012-02-02 3086
443 IF수식 특정조건에 만족이 되면 끝에 문자를 추가하는 방법 file [3] [레벨:4]부루끄 2012-02-02 3570