728x90 반응형 목표는!!퇴근!! (엑셀VBA)48 (VBA) 시트(Sheet) 추가, 삭제, 변경, 복사, 이동 해보기 - Sheet 기본적으로는 시트를 추가하는 방법으로는 두 가지 방법으로 추가할 수 있습니다 VBA로 시트 추가, 삭제, 변경, 복사하는 방법을 알아보겠습니다 ✍🏻 시트 추가하기 Private Sub CommandButton1_Click() Sheets.Add End Sub 활성화된 시트 왼쪽에 시트가 하나 추가됩니다 여러 개의 시트가 있을 경우 원하는 위치에 시트를 추가하고 싶다면?? Private Sub CommandButton1_Click() Sheets.Add after:=Sheets("Sheet1") Sheets.Add before:=Sheets("Sheet1") End Sub Sheets.Add "위치":="기준 시트" (위치 : after = 오른쪽 / before = 왼쪽) 기준 시트를 선택하시고 왼쪽이나.. 2023. 7. 23. (VBA) 시트(Sheet) 이름과 번호에 대해 알아보기 - Sheets VBA를 작성하다 보면 여러 개의 시트를 참조할 때가 있습니다 예를 들어 "Sheet1"에 "A1" 값을 가져오거나 "Sheet2"에 "A1" 값을 "Sheet1"에 "A2"에 복사를 하거나 등등 이럴 때 시트 이름으로 찾거나 아니면 번호로 찾을 수 있는데요 위 시트의 이름을 알아보기 위해서는 Sheets(1).Name 또는 Sheets("Sheet1").Name을 사용하면 됩니다 Private Sub CommandButton1_Click() Debug.Print Sheets(1).Name Debug.Print Sheets("Sheet1").Name End Sub 💯 시트 번호 이해하기 Private Sub CommandButton1_Click() Debug.Print Sheets(1).Name Debu.. 2023. 7. 23. (VBA) 팝업창(MsgBox) 띄워서 사용하기 (VBA) 팝업창(MsgBox) 띄우기 어떠한 프로그램을 사용하다 보면 위와 같은 팝업창을 볼 수 있습니다 가장 많이 사용하는 게 사용자에서 어떠한 내용을 전달하기 위해 사용을 하죠 예를 들어 잘못된 값을 입력했거나 프로그 jjongdalk.tistory.com 기본적인 팝업창 띄우기는 위 포스팅에서 확인하시면 됩니다 이번에는 응답형(??)으로 팝업창을 사용하는 방법입니다 예를 들어 프로그램을 닫을 때 이런 팝업창을 많이 보셨을 겁니다 "예"를 선택하면 프로그램이 종료되고 "아니요"를 선택하면 팝업창이 닫힙니다 이런 식으로 사용할 수 있는 팝업창을 만들어 보려고 합니다 팝업창의 종류는 그리고 버튼 클릭했을 때 반환되는 값입니다 이제 예제를 만들어 보겠습니다 제일 많이 사용할 것 같은 팝업창으로 만듭니다 .. 2023. 7. 16. (VBA) 팝업창(MsgBox) 띄우기 어떠한 프로그램을 사용하다 보면 위와 같은 팝업창을 볼 수 있습니다 가장 많이 사용하는 게 사용자에서 어떠한 내용을 전달하기 위해 사용을 하죠 예를 들어 잘못된 값을 입력했거나 프로그램에 에러가 발생했을 때 이런 경우 팝업창을 사용해서 사용자에게 내용을 전달합니다 Private Sub CommandButton1_Click() MsgBox "확인하세요" End Sub 명령어를 입력하시면 위와 같이 팝업창이 뜹니다 각각의 설정을 확인해 볼께요 MsgBox ["내용"], [아이콘], ["제목"] Private Sub CommandButton1_Click() MsgBox "확인하세요", vbCritical, "팝업창 띄위기" End Sub 1. 내용 2. 아이콘 3. 제목 내용과 제목은 필요에 맞게 바꾸시면 되.. 2023. 7. 16. (VBA) 매크로 / VBA 사용 방법 조금 늦은 것 같은데..... VBA라고 포스팅을 하다 보니 이걸 좀 정리 해아 될 것 같아서 포스팅합니다 매크로랑 VBA는 같은 말입니다 엑셀에서 단순하고 반복적인 작업을 매크로 설정으로 해결한다고 검색해 보시면 나옵니다 그래서 매크로랑 VBA는 같은 말입니다 매크로를 만들기 위해서 필요한 프로그래밍 언어(코딩)가 VBA입니다 간단한 설명은 아래 링크로 보시면 됩니다 엑셀(Excel) VBA 간단 소개 1. 엑셀 VBA란? 엑셀 VBA(Visual Basic for Applications)는 마이크로소프트 엑셀에서 사용될 수 있는 프로그래밍 언어입니다. 사용자는 VBA를 사용하여 엑셀 파일 내에 매크로를 작성하고 실행할 수 있습니 jjongdalk.tistory.com 이번에는 매크로 이하(VBA)를 .. 2023. 7. 9. (VBA) 다른 시트 지정한 셀 값 가져오기 (Worksheets) "Sheet2"-"B2" 셀 값을 "Sheet1"-"B2"로 가져오는 명령어입니다 Sub Test() Range("B2").Value = Worksheets("Sheet2").Range("B2").Value End Sub "Sheet1"을 선택하고 VBA를 실행("F5") 하시면 "Sheet2"-"B2"에 "워크시트"라는 값이 입력됩니다. 중요한 건 위 명령어는 "Sheet1"-"B2"라고 설정하지 않은 상태입니다 그래서 "Sheet2"를 제외한 다른 시트에서 실행하면 "B2"에 값이 입력됩니다 무조건 VBA가 실행되면 "Sheet1"-"B2"에만 입력되게 하려면 명령어를 바꾸셔야 됩니다 Sub Test() Worksheets("Sheet1").Range("B2").Value = Worksheets("S.. 2023. 7. 9. (VBA) 문자열 자르기 (Right,Left,Mid) 문자열중에 필요한 문자만 자르는 함수 입니다 예를 들어 아래 주소에서 첫번째는 "부산광역시" 두번째는 "영도구" 세번째는 "티스토리아파트" 이렇게 자를 수 있습니다 첫번째로 "부산광역시" Left( [대상 문자열], [찾을 문자수] ) Left("부산광역시 영도구 티스토리아파트", 5) 간단하게 왼쪽 첫번위치부터 5개의 문자를 자릅니다 두번째로 "영도구" Mid( [대상 문자열], [시작 위치], [찾을 문자수] ) Mid("부산광역시 영도구 티스토리아파트", 7, 3) Mid()는 위치를 설정해야 합니다 "영도구" 시작 위치는 7이고 찾을 문자수는 3개 이러면 "영도구"만 자를 수 있습니다 세번째로 "티스토리아파트" Right( [대상 문자열], [찾을 문자수] ) Right("부산광역시 영도구 티스토.. 2023. 7. 1. (VBA) 날짜 형식 변경하기 (Format) Format() 함수를 사용해서 날짜 형식을 변경 가능합니다 "2023/06/25" 2023-06-25 2023/06/25 2023년6월25일 2023년06월25일 등등 년도를 두자리로 표시 하는 방법 23-06-25 23/06/25 23년6월25일 23년06월25일 등등 조건은 날짜형식으로된 문자열이여야 합니다 만약 "B2"에 "20230625"를 입력하고 Private Sub CommandButton1_Click() Range("B4").Value = Format(Range("B2").Value, "yyyy-mm-dd") End Sub 날짜 형식으로 변환 한다면 에러 발생 ! ! 그냥 문자열이기 때문에 날짜 형식으로 변환이 불가능 합니다 그래서 "B2"에 "2023/06/25"를 입력하고 Privat.. 2023. 6. 25. (VBA) 숫자에 콤마 찍기 (Format) Format() 함수를 사용해서 숫자에 콤마를 입력할겁니다 70000000 -> 70,000,000 이렇게 변신!!!! Format() 함수는 날짜 표시 방법, 시간 표시 방법, 숫자 표시 방법 등등 내가 원하는 방식대로 표시하기 위해 사용하는 함수입니다 이번에도 가장 많이 사용하는 숫자에 1000단위로 콤마를 찍는 방법을 알아보려합니다 "B2"에 70000000을 입력합니다 Private Sub CommandButton1_Click() Dim AAA As Long AAA = 70000000 Range("B2").Value = AAA End Sub 이게 700인지 7000인지.... 😵😵😵 알아보기 편하게 Format() 사용해서 숫자에 콤마 찍기 Private Sub CommandButton1_Clic.. 2023. 6. 23. 이전 1 2 3 4 5 6 다음 728x90 반응형