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

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

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

글 수 113

몇가지 질문들

VBA 조회 수 3438 추천 수 0 2015.01.13 17:59:07
[레벨:2]정용규 *.241.147.60

1. 1번시트를제외한 나머지시트 인쇄하기

 

현재 제가 해논코드로는 각각의 시트들마다 인쇄를 걸어줘서 (FOR ~NEXT 로) 인쇄속도가 느립이다.

 

이문서가 시트수가 항상 바뀌는대신 첫번째 시트에 실행버튼들을만들어놔서 첫시트만빼고 나머지 시트들을 빠르게 할수있는방법이 있을까요??

 Sub 출력( )

 

Dim i as Long

  for i = 2 to Application.min(thisworkbook.worksheets.count)

          Thisowrkbook.Worksheets(i).printout

  next

end sub


 

2.특정셀의 문자열내의 단어

 

지금 if 함수를 가지고 특정셀의 값들에 따라 특정한 값들을 다른셀에 넣고있는데

 개중에 조금특수한경우가 (ex, B2셀의 값이 경남 서울시 에서 창원시 ) 저기서 시의 값들이 변화하는데

특정시일경우 elseif  "XX시 일경우" Then 으로 조건을 걸고싶습니다. 저문자열에서 문자를 찾아내는방법은 어떻게 하나요?

   

이 게시물을...
엮인글 :
http://abyul.com/zbxe/134096/0c1/trackback
목록

댓글 '8'

[레벨:2]정용규

2015.01.14 09:28:00
*.241.147.60

추가 질문~!

통합문서에 첫시트를 제외하고 A,C(1),C,...B(1),B,A(2),A(1)....이렇게 시트가있을때A,A(1),A(2),A(3).....B,B(1)....C,C(1)C(2)...이런식으로 시트를 정리를 해주고싶은데 가능할까요??

 

2번재 질문은 INSTR 함수로 도전해보고있습니다.

[레벨:2]정용규

2015.01.14 10:14:44
*.241.147.60

추가질문도 해결완료! 인쇄만 해결하면되겠어요

profile

[레벨:30]아별

2015.01.14 10:32:34
*.132.210.135

쩝.. 바로 바로 답변을 드리지 못해서 아쉽네요.. +_+;;


추가질문에 해당하는 내용은..

INSTR()하시면 되구요.. 워크시트의 함수의 FIND와 비슷한 기능이지요..

워크시트함수랑 VBA함수를 비교해 놓은 게시물이 있으니 참고해보세요..

http://www.abyul.com/zbxe/84126


댓글로 질문하신 부분은 

FOR ~ NEXT 순환문을 이용한 버블소트로 해결하시면 될 것 같네요..


인쇄문제는

글쎄요.. 보통은 각각의 시트를 PRINTOUT으로 날려주는데..

다른 방법이라면 시트들을 그룹으로 묶은 다음에 한방에 인쇄를 날리는 방법이 있겠네요..

실행속도면에서는 어떤게 더 빠를지는 해봐야 알 것 같습니다.


다만 코드에 Application.Min()는 왜 있는지 모르겠네요..

그냥 sheets.Count 하시면 될텐데..


도움이 되셨기를..

[레벨:2]정용규

2015.01.15 07:15:18
*.241.147.60

답변감사합니다 ^^

항상 추가되는 시트의양이달라서 ~맨마지막시트까지 라고 명령을 줄때가 궁금했는데 sheet.count 라고 하면 되는건가요?

profile

[레벨:30]아별

2015.01.15 09:09:53
*.132.210.135

아래 코드가 좀 참고가 될지 모르겠습니다.

worksheets와 sheets는 같은 sheet들의 컬렉션 객체입니다.


Sub abyulTest()

    Dim i As Long

    For i = 1 To Sheets.Count

        ActiveCell.Offset(i).Value2 = Sheets(i).Name

    Next i

End Sub


[레벨:2]정용규

2015.01.16 07:10:31
*.241.147.60

혹시 그렇다면 array 에 sheets.count 를 적용시킬수도있나요?

profile

[레벨:30]아별

2015.01.16 09:15:17
*.132.210.135

네.. 질문이 잘 이했는지 모르겠으나.. sheets를 배열로 처리할 수 있는지를 질문하신 것으로 해석됩니다.

그렇게 처리할 수 있습니다.


sheets(1) 이 첫번째 시트를 의미하고..

sheets(sheets.count)가 마지막 시트를 의미합니다.


참고로.. sheets와 같은 컬렉션 객체는 아래와 같이 접근하는 것도 가능합니다.


dim sht as worksheet

for each sht in sheets

msgbox sht.name

next sht


도움이 되셨기를..

[레벨:2]정용규

2015.01.16 14:53:24
*.241.147.60

큰 깨달음 입니다!! 감사합니다 ^^^^^

문서 첨부 제한 : 0Byte/ 2.00MB
파일 제한 크기 : 2.00MB (허용 확장자 : *.*)
List of Articles
번호 제목 글쓴이 날짜 조회 수sort
공지 공지 [공지] 아별닷컴의 엑셀 질문방 폐쇄합니다. 카페 질문방 이용하세요.. imagefile [레벨:30]아별 2015-04-23 42621
113 VBA 엑셀 열 추가 _ 엑셀의 마지막 셀 재 인식시키는 팁 ActiveSheet.UsedRange.Select imagefile [1] [레벨:5]눈물바다 2009-08-27 10078
112 VBA 엑셀 일괄암호저장 imagefile [1] [레벨:1]천운 2017-03-13 9330
111 VBA 매크로 질문 드립니다. [레벨:1]ORACLE 2016-08-16 8392
110 VBA 컴파일 에러가 나요? [레벨:1]구름바다 2015-09-14 8114
109 VBA 매크로를 이용한 exe 파일 자동 실행 방법 문의~ imagefile [레벨:1]hickel 2016-09-07 7968
108 VBA 추가기능 파일 수정 관련 file [1] [레벨:4]고수가되고파 2015-04-03 7932
107 VBA .Find 재고 입고월 분석(vba) file [3] [레벨:1]럽웨어 2009-07-24 7792
106 VBA 셀에 맞춰 그림 삽입하기 [1] [레벨:5]눈물바다 2012-06-05 7714
105 VBA 파일&폴더 파일 만들기 _ 파일 생성, 폴더 생성, 파일 존재하는지 여부 확인 등 [4] [레벨:3]엑셀대단해 2012-08-15 7536
104 VBA 셀 복사 후 아래셀에 수식 및 메모 붙여넣기 관련 [레벨:4]고수가되고파 2015-04-17 7350
103 VBA 사용자 정의 함수에서 변수의 행번호 추출하기 file [레벨:1]백미90 2015-08-17 7018
102 VBA .Find 매크로 질문입니다.~ [2] [레벨:1]카멜 2009-07-02 6806
101 VBA .Find ListBox1 에 추가가 되지를 않습니다. file [3] [레벨:1]사오정원조 2009-07-03 6804
100 VBA vba질문하나 올리겟습니다.ㅠㅠ file [3] [레벨:1]gg남자 2013-03-27 6697
99 VBA 랜덤 출력 관련 짧고 간결(?)한 3가지 질문입니다. _ 중복 없는 랜덤 패스워드 생성하는 방법.. [4] [레벨:6]파이스 2011-11-29 6633
98 VBA 조건문을 변수화 하는 방법 [2] [레벨:3]엑셀대단해 2012-07-23 6540
97 VBA 특정개체 수정 관련 [5] [레벨:4]고수가되고파 2015-04-02 6126
96 VBA 프로그램바 질문 _ 작업 진행바 Progress bar file [2] [레벨:4]신강현 2013-01-30 6102
95 VBA VBA로 정렬하는 법 문의 file [6] [레벨:4]부루끄 2011-07-21 6085
94 VBA 한셀안의 서식을 다르게 지정할 수 있는 방법 없을까요? file [5] [레벨:4]부루끄 2011-09-28 6065
목록
쓰기