직장인의 엑셀, VBA 그리고 Python

윈도우 11(windows 11)을 사용하고 있습니다.윈도우 11의 우측 하단을 보면 시간과 날짜가 표시됩니다.간단하게 요일까지 표시 하는 방법입니다. 먼저 [ 윈도우키 + R ]을 눌러[ timedate.cpl ]을 입력합니다.  그럼 아래 그림과 같은 창이 나타납니다.여기서 아래 빨간색 네모 안의[ 날짜 및 시간 변경 ]을 클릭합니다. 그런 후[ 달력 설정 변경 ]을 눌러줍니다.  그 다음 아래 그림에서[ 추가 설정 ]을 눌러줍니다. 그 다음[ 날짜 ] 탭을 선택하고[ 날짜 형식 ]의 [ 간단한 날짜 ]에아래 그림과 같이 입력합니다.입력할 값은[  yyyy-MM-dd'('ddd')' ]입니다. 이제 다시 윈도우 작업표시줄의오른쪽 하단을 보면 아래 그림과 같이 요일이 표시됩니다.

[ DIR 함수 소개 ] DIR 함수는 엑셀 VBA에서파일 시스템을 탐색하는 데 사용되는 내장함수입니다.이 함수는 주어진 경로와 일치하는,즉 선택된 폴더의첫번째 파일의 이름을 반환하며,이후에는 DIR 함수를 다시 호출하면해당 폴더의 다음 파일이름을 반환합니다. 즉, DIR 함수는 처음 호출될 때지정된 폴더의 모든 파일을 찾아내고이후에 다시DIR 함수가 호출 될때마다해당 폴더의 다음 파일을 반환합니다.  [ 예시코드 ] Sub 파일목록확인() Dim MyFile As String Dim MyPath As String Dim fd As FileDialog Set fd = Application.FileDialog(msoFileDialogFolderPicker) If fd.Show =..

[ 들어가기 ]VBA에서 [ Application.FileDialog ]는 사용자에게 파일 또는 폴더를 선택하도록 요청하는대화상자를 표시하는 데 사용되는 객체입니다.  [ 사용할 수 있는 옵션 ]파일 또는 폴더를 열기위해 사용할 수 있는 옵션은 4가지가 있습니다. 첫째. msoFileDialogOpen 이 옵션은 하나의 파일을 열도록 사용자에게 요청하는 대화상자를 표시합니다.Sub 폴더열기() Dim fd As FileDialog Set fd = Application.FileDialog(msoFileDialogOpen) fd.Show If fd.SelectedItems.Count > 0 Then MsgBox "선택한 파일: " & fd.SelectedItems(1) ..

[ 소수란? ]소수란 1보다 큰 자연수 중1과 자기 자신만을 약수로 가지는 수입니다. 예를들어숫자 5는 약수를 1과 5즉 1과 자기 자신만을 약수로 갖고 있으므로소수입니다. 숫자 4의 약수는 1, 2, 4 이므로소수가 아닙니다. [ 소스코드 ]def is_prime(n): if n  [ 코드설명 ]여기부터는 관심있으신 분들께서만 보시면 될 것 같습니다. is_prime(n) 함수는숫자를 입력 받아 소수인지를 확인하는 함수입니다. 먼저 소수는 1보다 큰 자연수 중에 존재하므로2 미만의 수는 소수가 아닙니다. if n  다음 구문을 보시기 전에만약 range() 함수를 모르신다면 여기를 먼저 확인하시기 바랍니다. 아래 코드는 소수를 구하는 가장 중요한 코드입니다. for i in range(..

[ 결 과 물 ]  [ 들어가며 ]엑셀을 사용하여 간단한 내용을 취합하는 경우가 있습니다.한글과는 다르게 엑셀은 어떤 나열된 문자를 입력하기는 그렇게 좋은 프로그램은 아니지만그렇게 사용하는 경우도 종종 있습니다. 모양을 보기 좋게 하기 위해시작을 특수문자로 해야하는 경우가 있는데매번 특수문자를 넣으려면귀찮고 번거로운 일입니다. 이번  블로그에서는 위 그림처럼자동으로 특수문자를 입력하는 방법을알아보겠습니다.  [ 자동으로 특수문자 입력하기 ] 먼저 특수문자를 자동으로 입력할 범위를 지정해 줍니다.저는 [ H열 ] 전체를 범위로 지정했습니다. 그런 후 [ CTRL + 1 ]을 눌러[ 셀 서식 ]을 열어 준 후[ 사용자 지정 ]을 선택해줍니다. 그런 후 아래의 파란색 네모 부분의 [ 형식 ]을 클릭합니다.그리..

[ 들 어 가 기 ]  비단 파이썬 뿐만아니라 여러가지 언어에서 참과 거짓을 사용하여조건을 확인하는 경우가 많습니다. 파이썬에서도 IF문이나 While문 등에서참과 거짓을 구분하고코드를 실행할 조건을 지정하는 경우가 많습니다.※ If 문에 대한 내용은 여기를 참고하시면 됩니다. 파이썬이 어떤 경우에 [ 참 = True ]으로 인식하고어떤 경우에 [ 거짓 = False ]으로 인식하는지 알아보겠습니다.  [ 결    론 ] [ 참 = True ]으로 인식하는 경우1. True2. not None3. 0이 아닌 숫자4. 값이 있는 리스트, 값이 있는 튜플, 값이 있는 딕셔너리 [ 거짓 = False ]으로 인식하는 경우1. False2. None3. 숫자 04. 비어있는 리스트, 비어있는 튜플, 비어있는 딕..

윈도우에서 바이오스 버전을 확인하는 방법 그리고 기타 시스템 정보를 확인하는 방법입니다.  [ msinfo32 ] 윈도우 버튼을 누른 후아래 그림과 같이 [ msinfo32 ]를 눌러줍니다.  그러면 여러가지 시스템 정보를 확인할 수 있고아래 그림과 같이 Bios 버전 정보도 확인할 수 있습니다.  [ systeminfo ]윈도우 버튼을 마우스 우클릭하게 되면아래 그림과 같이 창이 나타납니다.나타난 창에서 [ 터미널(관리자) ]를 실행해줍니다. 그리고 [ systeminfo ]를 입력해줍니다. 이렇게 실행하면 여러가지 시스템 정보와 함께바이오스 버전 정보도 확인할 수 있습니다.   [  wmic bios get smbiosbiosversion ]동일하게 [ 터미널(관리자) ]를 실행해 줍니다. 그런 후[..

엑셀을 사용하다보면여러개의 시트를 만들어야 하는 경우가 생깁니다.부서별로 데이터를 분류한다거나반별로 데이터를 분류하는 등시트 여러개를 한번에 만들어야 하는 일이 생깁니다. 만들어야하는 시트가 10개 정도라면쉽게 만들 수가 있으나,그 수가 20개, 30개가 넘어가게되면그리고 그 일을 자주 반복해야 한다면간단한 VBA 코드를 작성하여업무의 효율성을 높일 수 있습니다.   [ 만들어볼 기능 ]첫번째 시트에 아래 그림과 같이 데이터를 입력합니다. 입력된 데이터의 양만큼시트를 만들고 이름을 데이터에 입력된 이름으로바꾸어 줄 것입니다. 현재의 시트를 제외하고총 10개의 시트가 만들어지고그 이름이 [ 1반 ~ 10반 ]이 만들어 져야 합니다. 만약 아래 그림과 같이기존에 시트가 있다면,기존의 시트의 이름은 데이터에 ..

오래전에 즐겼던 디아블로2!!디아블로2 레저렉션이 발매되고부터 조금씩 다시 즐기고 있습니다.아무래도 게임에 많은 시간을 할애하지 못하는만큼디아블로2 레저렉션처럼 혼자 즐기기에도 무난하고시간에 구애받지 않고 마음대로 껏다 켯다 하는 게임을찾기가 어렵더라구요 오늘은 디아블로2 레저렉션을하나의 컴퓨터에서 2계정, 3계정 이상 사용하는 방법을말씀드리겠습니다. [ process explorer 다운로드 ]먼저 구글에[ process explorer ]를 검색하시면 아래와 같은 사이트를 발견하실 수 있습니다.  아래 그림의 빨간색 네모 부분을 누르셔서다운로드를 받습니다.  다운로드 후 압축을 푸시면아래 그림과 같이 파일이 나타납니다.[ procexp64.exe ] 파일을 우클릭 하신 후[ 관리자 권한으로 실행 ]을..

여러개의 시트가 있는 엑셀 파일에서각각의 시트를 각각의 파일로나누어 저장하는 방법을 알아보겠습니다.  아래 그림처럼 [ A반, B반, C반 ]이 세개의 시트로나누어져 있습니다..이 시트들을 각각의 파일로 저장하는 코드는아래와 같습니다.Sub 시트별_별도파일_저장()Dim i As LongDim ws As WorksheetApplication.ScreenUpdating = FalseApplication.DisplayAlerts = FalseFor Each ws In ThisWorkbook.Sheets ws.Copy With ActiveWorkbook .SaveAs ThisWorkbook.Path & "\" & ws.Name & ".xlsx" .Close End Wi..