코딩
-
Python/날짜와 시간으로 사진 이름 변경 - 2. 임시 이름 변경코딩/Python 2024. 1. 18. 17:13
매개변수 path (str): 파일이 존재하는 디렉토리의 경로. files (list[str]): 파일 이름들을 담고 있는 리스트. csv_name (str): CSV 파일의 이름. 변경된 파일 목록 및 각 파일의 원래 경로와 임시 경로를 저장. prefix_tmp (str): 임시 파일 이름의 접두어. 설명 특정 디렉토리에서 파일 이름을 임시로 변경하고, 변경된 파일 목록을 CSV 파일에 저장하는 기능을 수행. 파일 수에 따른 자릿수 지정: file_count = len(files): 주어진 디렉토리에서 가져온 파일의 수를 계산. zfill_number = len(str(file_count)): 파일 수에 따라 필요한 자릿수를 계산. 파일 이름 임시로 변경: tmp_files와 csv_rows 리스트 ..
-
Python/날짜와 시간으로 사진 이름 변경 - 1. 파일 목록 가져오기코딩/Python 2024. 1. 18. 17:08
이 코드는 특정 디렉토리에서 특정 확장자를 가진 파일 목록을 가져오는 함수다. 매개변수 path (str): 파일 목록을 가져올 디렉토리의 경로. extensions (list[str]): 선택하고자 하는 파일의 확장자 목록. 기능 파일 목록 가져오기: os.listdir(path)를 사용하여 지정된 경로에서 파일 목록을 가져온다. 확장자 선택 및 정렬: 가져온 파일 목록 중에서 주어진 확장자(extensions)에 해당하는 파일을 선택하고, 선택된 파일들을 정렬. 확장자 미사용 목록 출력: 선택된 확장자 외의 다른 확장자들을 모아서 미사용 목록을 출력. 설명 os.path.splitext(file)를 사용하여 파일의 확장자를 추출. extension.lower() in extensions를 통해 대소문..
-
VBA/파워포인트/사진정리 - 3. 기타 유틸리티코딩/vba 2024. 1. 13. 18:33
사진 정리 코드 작성을 위한 간단한 세 개의 유틸리티를 만들었다. 2024.01.10 - [코딩/vba] - VBA/파워포인트/사진정리 - 0. 개요 VBA/파워포인트/사진정리 - 0. 개요 맥에서 키노트로 열심히 사진을 정리하던 중, 왜 내가 이 노가다를 하고 있나 하는 자괴감이 생겨 파워포인트에서 자동정렬하는 VBA 코드를 만들었다. 키노트에서는 자동화를 할 수 있는 방법이 summertrees.tistory.com 사진 크기 확인 사진 크기를 픽셀 단위로 확인하기 위한 코드. 파워포인트에서 사진을 선택하고 실행한다. 선택된 개체가 사진이면 사이즈를 출력한다. Sub GetPictureSize() Dim selectedShape As Shape ' 현재 선택된 슬라이드에서 선택된 모양(Shape) 가..
-
VBA/파워포인트/사진정리 - 2.3. Shape 이동코딩/vba 2024. 1. 13. 14:02
도형을 새로운 슬라이드로 이동시키는 서브루틴으로, 도형의 배열(shapesArray), 이동할 원본 슬라이드의 도형들(sourceShapes), 그리고 이동할 대상 슬라이드의 도형들(destinationShapes)을 인자로 받는다. For i = LBound(shapesArray, 2) To UBound(shapesArray, 2): 도형 배열의 인덱스에 대해 반복. Set shp = sourceShapes(shapesArray(0, i)): 현재 인덱스에 해당하는 도형을 원본 슬라이드에서 가져온다. If shp.Type = msoPicture Then: 가져온 도형이 사진인 경우를 확인. msoPicture는 PowerPoint에서 사진을 나타내는 상수. shp.Copy: 현재 도형을 복사. dest..
-
VBA/파워포인트/사진정리 - 2.2.1. 사진 수 계산 함수코딩/vba 2024. 1. 13. 13:49
이 함수는 슬라이드에 있는 도형들 중에서 사진인 도형을 찾아서 해당 수를 반환하는 간단한 역할을 한다. 인수로 슬라이드에 있는 도형들(slideShapes)을 받는다. numberOfPics = 0: 초기에 사진의 수를 0으로 설정합니다. For Each shp In slideShapes ... Next shp: 슬라이드에 있는 각 도형에 대해 반복. If shp.Type = msoPicture Then: 현재 도형이 사진인 경우를 확인. msoPicture는 PowerPoint에서 사진을 나타내는 상수. numberOfPics = numberOfPics + 1: 사진인 도형을 발견하면 numberOfPics를 증가시킨다. GetNumberOfPictures = numberOfPics: 최종적으로 사진..
-
VBA/파워포인트/사진정리 - 2.2. 사진 정렬코딩/vba 2024. 1. 13. 13:45
슬라이드에 있는 사진을 정렬하는 서브루틴으로, 슬라이드에 있는 도형들(slideShapes), 도형들의 배열(shapesArray), 사진의 위치(positions), 그리고 크기(sizes)를 인자로 받는다. 인자들은 모두 참조형으로 받는다. numberOfPics = GetNumberOfPictures(slideShapes): GetNumberOfPictures 함수를 호출하여 슬라이드에 있는 사진의 수를 계산하고, numberOfPics에 저장. Select Case numberOfPics: numberOfPics의 값에 따라 다른 경우를 나누어 처리. Case 1: 사진의 수가 1개인 경우, positions(0) 및 sizes(0)에 따라 사진을 위치 및 크기를 설정. Case 2: 사진의 수가..
-
VBA/파워포인트/사진정리 - 2.1. Shapes 배열 생성코딩/vba 2024. 1. 13. 13:24
' 이 프로시저는 값을 반환하는 함수로 작성한다. 배열을 반환하므로 Variant를 사용한다. ' 인수는 슬라이드의 Shapes 객체의 참조, 나머지는 옵션값으로 배열을 정렬할 지 여부의 부울 값, ' 키 디멘전 값, 디멘전 수를 받는다. Function GetShapesArray(ByRef slideShapes As Shapes, _ Optional ByVal boolSortArray As Boolean, Optional ByVal keyDimension As Integer, _ Optional ByVal dimensions As Integer) As Variant ' build array (shape index, left position) ' 변수 i는 반복문에서 사용되는 도형 인덱스이며 ' shap..
-
VBA/파워포인트/사진정리 - 2. 사진 정열코딩/vba 2024. 1. 13. 13:01
슬라이드에 삽입된 사진들을 정리하는 메인 프로시저다. 파일 목록 가져오기처럼 여기서 사용자 입력값을 모두 입력한다. 파일 목록의 키 디멘전과 총 디멘전 수를 정한다. 그리고 사진을 배치할 픽셀 위치와 사진 크기를 슬라이드 당 사진 수에 따라 미리 정한다. 루프 종료 조건을 주기 위해 슬라이드 수를 세어 변수에 저장한다. 프로세스를 시작할 지점을 알기 위해 현재 화면 상 슬라이드 번호를 확인한다. 그런 다음, 현재 슬라이드부터 마지막 슬라이드까지 아래의 절차를 반복한다. Do While slideIdx < slideCount + 1: 슬라이드 인덱스가 slideCount보다 작은 동안 루프를 실행. slideCount는 총 슬라이드 수. Debug.Print "Working: Slide " & slideI..