'목표는!!퇴근!! (엑셀VBA)' 카테고리의 글 목록
본문 바로가기
728x90
반응형

목표는!!퇴근!! (엑셀VBA)48

(엑셀/Excel/VB) 지정한 시간만큼 대기하기 - Application.Wait() 인쇄를 자동으로 하기 위해 PrintOut()을 사용합니다 대략 100장의 서류를 출력해야 하는데 그냥 계속 인쇄 명령을 프린터에 전달한다면 각각의 프린터마다 성능의 차이가 있기 때문에 충돌이 일어날 가능성이 높습니다 이럴 때 사용하는 명령어가 Wait()입니다 목차 1. Application.Wait() 실제 시간까지 대기하기 2. Application.Wait() 현재 간부터 정한 시간 동안 대기하기 3. 하나 더 Application.Wait( [시간] ) 🖐️ 1. Application.Wait() 실제 시간까지 대기하기 Private Sub CommandButton1_Click() Application.Wait ("21:39:00") MsgBox "티스토리" End Sub 실제 시간을 설정해서 .. 2023. 9. 8.
(엑셀/Excel/VBA) 프린트 하기 - PrintOut() 저의 업무 중 가장 귀찮은 업무가 있습니다 바로 고객 명단을 받아서 서식에 맞는 엑셀 양식에 하나하나 입력해서 문서를 출력해야 하는데 문제는 이게 거의 100장 정도의 문서를 만들어서 출력해야 합니다 아... 생각만 해도... 아찔합니다.... 그런데 거의 하루가 걸리던 일을 1시간 만에 마무리하고 퇴근했습니다 그중에 가장 도움이 되었던 프린트 함수 PrintOut()을 알려드리겠습니다 목차 1. PrintOut() 속성 알아보기 2. PrintOut() 사용하기 3. 하나 더 🖨️ 1. PrintOut() 속성 알아보기 Worksheets( [시트명] ).PrintOut [Form], [To], [Copies], [Preview] ⋯ ⋯ ⋯ From 인쇄를 시작할 페이지 번호 To 마지막으로 인쇄할 페.. 2023. 9. 7.
(엑셀/Excel/VBA) 지정한 셀 변수에 저장하기 - Range 기본적인 값을 저장하는 변수도 있고 셀을 저장하는 객체 변수가 있습니다 이번에는 셀을 저장하는 변수 설정과 사용하는 방법을 알아보겠습니다 목차 1. 변수 사용하기 2. 저장된 셀 중에 특정 셀 지정하기 3. 설명 🗳️ 1. 변수 사용하기 객체 변수이기 때문에 셀에 지정된 글자체, 배경색, 테두리 등등의 정보들도 같이 저장됩니다 Private Sub CommandButton1_Click() Dim testRange As Range Set testRange = Range("A2:B10") testRange.Value = "티스토리" End Sub 🗳️ 2. 저장된 셀 중에 특정 셀 지정하기 지정한 전체 범위의 속성을 설정하는 건 위와 같이 속성을 설정하면 됩니다 그러나 특정 셀의 속성을 변경하기 위해서는 C.. 2023. 9. 2.
(엑셀/Excel/VBA) 입력한 값 받아오기 - InputBox() 명령어들을 실행하다 보면 사용자에게 필요한 값을 받을 때가 있습니다 셀 범위라든지 이름이나 생년월일 같은 값들을 받아오기 위해 InputBox()를 사용합니다 목차 1. InputBox() 설정하기 2. Type 종류 3. InputBox() 사용하기 4. 주의사항 🖇️ 1. InputBox() 설정하기 Application.InputBox( [Prompt], [Title], [Default], [Left], [Top], [HelpFile], [HelpContextID], [Type]) Prompt 대화 상자에 표시할 메시지입니다. Title 입력 상자의 제목입니다. Default 대화 상자가 처음 표시될 때 텍스트 상자에 표시될 값 Left 화면의 왼쪽 상단 모서리 위치 Top 화면의 왼쪽 상단 모서리.. 2023. 9. 2.
(엑셀/Excel/VBA) 명령어 중 정해 놓은 위치로 이동하기 - Goto() Goto()문을 사용해서 정해진 위치로 이동해서 명령어를 실행합니다 간단하게 다음 명령어를 무시하고 정해진 위치로 점프(??) 한다고 보시면 됩니다 목차 1. Goto()문 설정하기 2. Goto()문 설명 ✅ 1. Goto()문 설정하기 Goto [이름] / [이름] : Private Sub CommandButton1_Click() GoTo MSG1 MSG1: Debug.Print "메시지 1" MSG2: Debug.Print "메시지 2" MSG3: Debug.Print "메시지 3" End Sub 이동할 위치를 "MSG1"로 설정하고 아래는 각각 위치 이름을 설정합니다 Debug.Print를 사용해서 명령어가 실행되는것을 확인합니다 Goto MSG1 Goto MSG2 Goto MSG3 ✅ 2. Go.. 2023. 9. 2.
(VBA) 임의로 선택한 셀 - Selection 간단하게 마우스로 드래그로 선택한 셀을 말합니다 목차 1. 선택한 셀 배경색 변경하기 2. 선택한 셀 행(Row)과 열(Column) 개수 알아보기 3. 선택한 셀 행(Row)과 열(Column) 첫 번째 셀 위치 4. 선택한 셀 설정하기 🎛️ 선택한 셀 배경색 변경하기 (VBA) 색상 설정하는 방법 (Color) (VBA) 지정한 셀 디자인(꾸미기) 하기 (배경색,글자크기,굵게) 가장 많이 사용하는 속성만 정리했습니다 추가적으로 필요한 속성은 아래 주소로 이동 후 확인하시면 됩니다 Interior object (Excel) Office jjongdalk.tistory.com Private Sub CommandButton1_Click() Selection.Interior.Color = vbBlack En.. 2023. 8. 30.
(VBA) 셀 테두리 설정하기 - Borders 셀의 테두리를 설정합니다 각각 위쪽, 아래쪽, 오른쪽, 왼쪽, 대각선 설정이 가능합니다 목차 1. 바깥쪽 테두리 (각각 위치) 2. 안쪽 테두리 (여러 셀일 경우) 3. 지정한 셀 테두리 4. 테두리 종류 5. 테두리 굵기 6. 테두리 색상 🈁 바깥쪽 테두리 (각각 위치) 위 xlEdgeTop 아래 xlEdgeBottom 오른쪽 xlEdgeRight 왼쪽 xlEdgeLeft Private Sub CommandButton1_Click() Selection.Borders(xlEdgeTop).LineStyle = xlContinuous Selection.Borders(xlEdgeBottom).LineStyle = xlContinuous Selection.Borders(xlEdgeRight).LineStyle .. 2023. 8. 29.
(VBA) 열(Row) 너비 / 행(Column) 높이 설정 하기 VBA를 사용해서 열 너비와 행 높이를 설정할 수 있습니다 🧱 열 너비 설정하기 하나의 열 Private Sub CommandButton1_Click() Columns("A").ColumnWidth = 10 End Sub 여러 열 Private Sub CommandButton1_Click() Column("A:E").ColumnWidth = 10 End Sub 🧱 행 높이 설정하기 하나의 행 Private Sub CommandButton1_Click() Rows("1").RowHeight = 10 End Sub 여러 행 Private Sub CommandButton1_Click() Rows("1:5").RowHeight = 10 End Sub 🧱 열 너비 자동 설정하기 하나의 열 Private Sub C.. 2023. 8. 28.
(VBA) 행이나 열 전체 선택하기 - Entire, Select ⛔ Columns Private Sub CommandButton1_Click() Columns("B").Select End Sub Private Sub CommandButton1_Click() Columns(2).Select End Sub ⛔ Rows Private Sub CommandButton1_Click() Rows(4).Select End Sub ⛔ EntireColumn Private Sub CommandButton1_Click() Range("A3").EntireColumn.Select End Sub EntireCulumn으로 설정했기 때문에 Columns("A")랑 같습니다 ⛔ EntireRow Private Sub CommandButton1_Click() Range("A3").EntireR.. 2023. 8. 16.
728x90
반응형