본문 바로가기

365함수14

[기초방] VBA 100제 #97 [시트 요약하기] 📊 VBA와 ADODB로 동적 데이터 계산 자동화이 포스팅에서는 VBA와 ADODB를 활용해 엑셀 시트의 데이터를 SQL 쿼리로 처리하고, 과목별 평균 점수와 응시자 수를 계산하는 방법을 소개한다. 더보기Option ExplicitSub 기초방97() Dim strConn As String Dim Rs As New ADODB.Recordset Dim ws As Worksheet Dim 월, 과목, 결과 Dim i&, j& Dim strSQL$, strPath$ Dim 테이블범위$, 시트명$ Dim 평균값@, 응시자수& ' 현재 워크북의 전체 경로를 가져옴 strPath = ThisWorkbook.FullName ' .. 2024. 10. 27.
[기초방] VBA 100제 #96 [데이터를 PIVOT 시키기 feat. ADODB] VBA로 피벗 테이블 생성: ADODB 매크로 완벽 정복 🎯1. 코드 설명 📝이 매크로는 엑셀의 VBA에서 ADODB를 활용해 SQL 쿼리를 사용하고, 피벗 테이블과 유사한 형태로 데이터를 집계해 셀에 출력한다. `TRANSFORM` 쿼리를 통해 여러 과목의 점수를 이름별로 집계해주는 기능을 한다.2. 코드 전체Option ExplicitSub Haja_Guid_Pivot() Dim StrGuid$: StrGuid = "{B691E011-1797-432E-907A-4D8C69339129}" ' = ADODB 참조 On Error Resume Next ThisWorkbook.VBProject.References.AddFromGuid StrGuid, 0, 0 ' = 최신 버.. 2024. 10. 26.
[기초방] VBA 100제 #94 [ ADODB 데이터조회 ] 엑셀 VBA를 사용하면 외부 데이터베이스처럼 엑셀 파일에서 데이터를 조회하고 관리할 수 있다.이번 포스팅에서는 ADODB를 사용해 SQL 쿼리로 데이터를 필터링하고 엑셀에 출력하는 방법을 소개한다. 이 코드는 엑셀 데이터를 SQL 방식으로 조회하고 원하는 셀에 결과를 자동으로 출력한다.코드와 주석1. Haja_Guid_Pivot 서브 프로시저더보기Option Explicit ' 변수 선언을 강제하여 코드의 안정성을 높임Sub Haja_Guid_Pivot() ' ADODB 참조를 위한 GUID를 문자열로 선언 Dim StrGuid$: StrGuid = "{B691E011-1797-432E-907A-4D8C69339129}" ' 오류 발생 시 무시하고 다음 코드로 넘어감 (참조 추가.. 2024. 10. 20.
[365리뷰] 날짜추출하기 [feat. 서랍님] https://www.youtube.com/watch?v=e2E87OeceBM 오늘은 서랍님 영상중 [텍스트에서 자동날짜인식] 을 리뷰하기로 하겠다. =LET( →step1, "각 셀의 단어들을 모두 행으로분리한후 숫자만 결합해라", q,CONCAT(IFERROR(--MID(D2,SEQUENCE(LEN(D2)),1),"")), →step2, "각 셀의 단어들을 모두 행으로분리한후 에러가 발생한것을 공백으로 연결한후 트림으로 공백을 분리후 하이픈으로 연결해라", _d,--SUBSTITUTE(TRIM(CONCAT(IFERROR(--MID(D2,SEQUENCE(LEN(D2)),1)," "),""))," ","-"), →step3, "전체문자의 길이가 4개인 경우", _d4,IF(((--LEFT(q,2)>=1).. 2024. 3. 6.