본문 바로가기

VBA/엑사남_심화방26

[심화방] VBA_심화_100제 #16 [ 소득세계산기] 오늘은 소득세 계산기를 만들어보려고 한다. https://incometax.calculate.co.kr/earned-income-tax-calculator 근로소득세 계산기 - 소득세 계산기 전체 공제대상 가족 중 7세 이상 20세 이하 자녀 수 : 0인 1인 2인 3인 4인 5인 6인 7인 8인 9인 10인 11인 incometax.calculate.co.kr 사이트에서 필요한 내용을 선택해서 값을 넣으면 계산해주는 방식이다. 더보기 Sub 소득세계산기() Dim Sel As New Selenium.ChromeDriver Dim rngAll As Range Dim rngA As Range Dim Reg As Object: Set Reg = CreateObject("vbscript.regexp") '= .. 2023. 4. 4.
[심화방] VBA_심화_100제 #14-1 [ 셀레니움 네이버항공 조회] 어제 올린 셀레니움 심화 # 14에서 잠깐 언급했듯, 출발날짜를 선택하는 부분에서 약간의 난이도가 필요했다. 이유는 [ 년 + 월 ] 을 찾은 후 [ 일 ] 을 찾아야 했기 때문에 본인이 가장 싫어하는 다중 For문의 늪에서 허우적 걸릴 수 밖에는 없다. 아래의 함수는 [출발년월] 과 [출발일]을 매개변수로 받아서 해당출발일을 클릭하는 함수이다. 그냥 딱봐도 질리는 맛이다. Xpath로 하면 단 2줄이면 해결이 되기에 공유하려고 한다. Console 창에서 Xpath를 사용하려면 $x를 붙혀서 selector 값을 붙혀주면된다. 본인이 선택한 날짜는 2023.05.03이었기 때문에 이를 Xpath로 했을 때 정확하게 값이 불러와진다면 실제 코딩에 입혀주기만 하면된다. 코드를 설명하면 1. 우선 div태그.. 2023. 4. 2.
[심화방] VBA_심화_100제 #15 [ 4대보험계산기] 우린 이전 시간에 테이블 태그를 한방에 엑셀로 가져오는 것을 연습하였다. https://1stminokingdom.tistory.com/228 [심화방] VBA_심화_100제 #11 [ 셀레니움 Astable] 셀레니움으로 추출된 표는 KBO 홈페이지의 데이터를 추출한 내용이다. 웹의 데이터를 크롤링할때 우리는 table 태그 안에 tr태그와 td태그들을 For each 또는 For 순환문으로 적절하게 파씽하면서 크 1stminokingdom.tistory.com 하지만 이번 본인이 4대 보험계산기를 통해서 값을 가져오려 했을 때 이런식으로 폼만 가져오는 것을 보고 HTML을 살펴보았더니 이런식으로 비어있는것을 알 수 있었다. 자바스크립트로 뒷단에서 조건에 맞게 계산을 한 후 화면에 보여주는 형식인거 같.. 2023. 4. 1.
[심화방] VBA_심화_100제 #14 [ 셀레니움 네이버항공 조회] 셀레니움으로 항공권을 조회하는 것을 해보려한다. 더 섬세하게 만들수도 있겠지만, 만들면서 생각해봐도 조회하는 정도 밖에는 쓸모가 없을 것 같아서 딱 그정도로 구현을 가능하게 하였다. 위와 같이 크롤링 되는 모습이 화면에 보이도록 창의 위치과 엑셀 창의 크기를 조절하는 코드이다. Application.WindowState = xlNormal '= 창의 위치와 크기 조정 Application.Top = 0 Application.Left = 0 Application.Width = 730 Application.Height = 1080 strUrl = "https://flight.naver.com/" '= 항공권 예매 Sel.Start "chrome" Sel.Window.SetPosition 960, 0 Sel... 2023. 4. 1.