Sub 인쇄하기() Dim J As Integer J = InputBox("몇장인쇄 할까요?") For J = 1 To J Worksheets(2).Range("A1") = Worksheets(1).Cells(2 * J, 2) Worksheets(2).Range("A3") = Worksheets(1).Cells(2 * J + 1, 2) ActiveWindow.SelectedSheets.PrintOut Next End Sub 출처 : https://answers.microsoft.com/ko-kr/msoffice/forum/all/%EC%97%91%EC%85%80-%EB%84%98%EB%B2%84%E... 더보기

https://mainia.tistory.com/3877

'' Cells 첫 번째 셀 선택 

ActiveSheet.Cells(1, 1).Select '' Range 두 번째 셀 선택 

ActiveSheet.Range("a2").Select 

Sheets("Sheet1").Cells(3, 1).Select 

Sheets(1).Cells(4, 1).Select 

출처: https://mainia.tistory.com/3877 [녹두장군 - 상상을 현실로]

2. 녹두장군 블로그 https://mainia.tistory.com/category/%EC%97%91%EC%85%80%28Excel%29 https://mainia.tistory.com/category/%EC%97%91%EC%85%80%28Excel%29 1. vba 기초 https://macerayarislari.com/ko/vba/ https://macerayarislari.com/ko/vba/ https://aromio.tistory.com/entry/%EC%97%91%EC%85%80%ED%8B%B0%EC%BC%93-%EC%B6%9C%EB%A0%A5%ED%95%98%EA%B8%B0%EC%9D%BC%... 더보기

https://mainia.tistory.com/1295

PrintPreview

vba에서 딜레이 시간 주기 

Application.Wait (Now + TimeValue("0:00:05"))

http://www.officetutor.co.kr/board/Dtype/bfrmvw.asp?f_tn=Dqa_excel_n2&f_bno=112570&page=&fchk=&fval=

https://md2biz.tistory.com/231

https://www.extendoffice.com/ko/documents/excel/4334-excel-hide-button-when-printing.html

vba 문자열 합치기

https://mainia.tistory.com/3970

https://thank-q.tistory.com/85 https://thank-q.tistory.com/85 Cells(i, "A") = Now '현재날짜와 시간을 출력합니다. Cells(i, "B") = DateAdd("yyyy", 1, Now) '현재시간을 기준으로 1년을 더한 날짜를 출력합니다. Cells(i, "C") = DateAdd("m", 1, Now) '현재시간을 기준으로 1개월을 더한 날짜를 출력합니다. Cells(i, "d") = DateAdd("h", 1, Now) '현재시간을 기준으로... 더보기

https://wikidocs.net/2074

http://mwultong.blogspot.com/2007/01/excel-vba-time-stamp-24-12-hours.html

https://mainia.tistory.com/787

Format(Date, "yyyy-mm-dd")

https://stackoverflow.com/questions/9414969/excel-vba-exit-for-loop

If [condition] Then Exit For

If 조건문 Then Exit For