전체 글259 숫자만 빼내기(추출하기) Like 연산자 활용, 함수, 자체함수 등등 1. VBA Like 연산자 활용 ? : 문자1칸# : 숫자1칸* : 0자 이상 모든것. 예) ABC는 *A*조건에서 TRUE [A-C][A-Z][가-힣] if not 문자열 like "A*" then A1-B가C나3다-100 → 가나다로 바꾸는 순환물 + Like 코드 참고)https://lst914.tistory.com/entry/Like%EB%A1%9C-%EC%A1%B0%EA%B1%B4%EC%97%90-%EB%A7%9E%EB%8A%94-%EB%8D%B0%EC%9D%B4%ED%84%B0-%EC%B6%94%EC%B6%9C%ED%95%98%EA%B8%B0 Like로 조건에 맞는 데이터 추출하기!『 회사 실무자들이 업무를 처리하다 보면 상품 혹은 거래처 코드가 123-a-11aa와 같은 형태로 부.. 2024. 5. 17. 주피터 노트북에서 gdown import colab에서는 gdown이 깔려있는데 주피터 노트북에서는 설치해줘야된다. 여기서 Terminal pip install gdown 입력하고 엔터치면 끝 Anaconda prompt에서 실행해도됨(아나콘다 다운받을때 같이 딸려오는 거 있음) 2024. 5. 15. 파일 존재하는지, 열려있는지 함수 IsFileExist, IsFileOpen Function IsFileExist(파일 As Variant) As Boolean IsFileExist = Dir(파일) "" End Function Function IsFileOpen(파일 As Variant) As Boolean Dim 열린파일 As Workbook On Error Resume Next Set 열린파일 = Workbooks(Dir(파일)) IsFileOpen = Err.Number = 0 End Function 2024. 5. 15. 엑셀파일 열기 GetOpenFilename Sub 파일선택() Dim 선택파일 As Variant Dim 파일형식 As String 파일형식 = "엑셀 파일 (*.xls*), *.xls*" 선택파일 = Application.GetOpenFilename(FileFilter:=파일형식, Title:="작업 파일 선택") If 선택파일 False Then Workbooks.Open Filename:=선택파일 Else MsgBox "파일을 선택하지 않았습니다." End If End Sub 2024. 5. 15. 파일(Workbook)이 열려있는지 확인하는 법 출처 : 엑셀 바이블 486p Function IsFileOpen(파일 As String) As Boolean Dim 열린파일 As Workbook On Error Resume Next Set 열린파일 = Workbooks(Dir(파일)) IsFileOpen = (Err.Number = 0) End Function 파일이 열려있을 경우 : → Dir(파일)이 파일명을 뱉어냄 → 열린파일이라는 변수에 Workbooks 개체가 맞게 들어감→ 에러 발생안함→ Err.Number = 0이 됨→ IsFileOpen이 True가 됨 파일이 열려있지 않을경우(파일이 존재하지 않는 경우 등등):→ 열린파일이라는 변수에 Workbooks 개체가 안 들어감 [★밑에설명]→ 에러 .. 2024. 5. 15. 폴더 내에 있는 파일명들 불러오는 방법 https://separang.tistory.com/65 [엑셀 VBA] Dir을 사용하여, 폴더 내 파일명 불러오기.윤 대리다. 간지 나는 메서드가 있어서 공유한다. 그동안 그냥 파일 열 때 [GetOpenFileName] 만 주구장창 썼는데 [Dir]을 통해 좀 더 우아한 매크로를 만들 수 있을 거 같아서 간단히 소개하고자 한다.separang.tistory.com Sub test() Dim File_Name As String Dim Folder As String Folder = ThisWorkbook.Path File_Name = Dir(Folder & "\" & "*.xls*") Do Cells(Rows.Count, 1).End(3)(2) = File_Name File_Nam.. 2024. 5. 15. 이전 1 ··· 9 10 11 12 13 14 15 ··· 44 다음
