본문 바로가기

VBA280

셀레니움 내가 원하는 폴더에 다운로드하기 Sub 다운로드폴더()     Dim driver As New WebDriver     Dim downloadPath As String     Dim userProfile As String     ' 현재 사용자 경로 가져오기 (환경 변수 USERPROFILE 사용)     userProfile = Environ("USERPROFILE")          ' 다운로드 경로 설정 (Haja 폴더로 설정)     downloadPath = userProfile & "\Desktop\Haja"          ' 드라이버에 다운로드 경로 설정     driver.SetPreference "download.default_directory", downloadPath     ' 크롬 브라우저 시작     drive.. 2024. 10. 13.
[VBA] 스프레드시트의 내용을 엑셀로 가져오기 스프레드시트의 내용을 엑셀로 가져오는 방법에 대해서는 많은 방법이 있다.파워쿼리로 가져오는 방법, 스프레드시트의 내용을 웹에 게시 후 그것을 파싱하는 방법, 그냥 복붙 하는 방법...여러가지 방법이 있지만 오늘 소개할 내용이 가장 편하고 쉬운 방법이 아닐까 한다. 스프레드시트에서 엑셀로 변환되는 속도 역시 맘에 쏙든다... 오늘 예로 보여준 스프레드시트의 내용은 각 시간별로 루프를 돌면서 해당 시간이 되면 텔레그램으로 카카오톡 오픈채팅방에 해당메세지가 발송되는 내용이다. 카카오톡으로 챗봇을 만드는 방법은 추후 테스트를 통해서 코드를 공개하려고 한다.(언제일지는 모르겠으나....ㅋㅋ) 더보기Option ExplicitSub ConvertSpreadsheetData() Dim url As String:.. 2024. 6. 9.
[VBA] 열려있는 엑셀 편집하기 예전에 포스팅한 ERP에서 열린 엑셀을 편집하는 작업의 다른 버전(?)이다.https://1stminokingdom.tistory.com/152 [VBA] Old시트 New시트 업데이트하기아오...브라질한테 축구 질 준 알았지만 너무 발려서....글쓰기도 시르다... 의뢰 들어온건데...이걸 공개할 수 있도록 데이터 수정하는게 더 어려워서...그냥 이렇게만 적으려고 한다. 1. ERP에서1stminokingdom.tistory.com 이번에 작업할 내용은 예전 글과 비슷하게 열려진 엑셀을 순환하면서 파일이름을 비교하여서 원하는 파일이름이 있으면 그중 필요한 열만 슬라이싱하여 배열에 담은 후 파일 이름을 정규식으로 정리하여 원하는 결과물을 만드는 작업이다. 더보기Sub 입고리스트() Dim Win A.. 2024. 5. 1.
[365함수] 테이블에서 LIST값의 합계 구하기 오늘은 간단하게 테이블에서 리스트 값을 뽑아서 합계를 내는 수식을 해보려고 한다. REDUCE는 연산을 처음부터 끝까지 계속 누적으로 해나가기 때문에 속도면에서 가급적 지양해야 한다. 365를 배움에 따라 배열형태 또는 리스트 형태로 값을 구하기 바란다. 2024. 3. 23.