ADODB3 [ADO] 구글 주소록 한글 깨짐을 해결하자 본인의 업무는 일주일에 신규 매장에 관한 인폼을 정리하여 구글 주소록에 업데이트 해야 하는 업무를 한다. 그러나 구글 주소록에서 [내보내기]로 받은 파일을 바로 열때는 인코딩 문제로 인해 한글 깨짐 현상이 발생한다. 구글링을 해도 단순하게 메모장으로 구글주소록을 연 후 [다른이름으로저장] 옵션에서 변경하여 인코딩문제를 해결하는 방법뿐이었다. VBA 코드를 통해서 이를 해결해 보려했지만 통곡의 코드벽에서 막혀 새벽을 날린 후 아침에 푸념섞인 투정(?)을 하자 나의 히어로 갓엑사남님이 응답주셨다. 은근 츤데레 매력 있음.....등치는 산만해 가지고... 구마적 스펙보다 훨씬 오바스펙임 우리 엑사남님은... 더보기 Option Explicit Sub OpenCsv() Dim Rs As Object: Set R.. 2023. 2. 17. [ADO] sql : Pivot 함수를 이용하자 sql 문법중 Pivot 함수를 이용하여 월별 매출을 출력하는 구문을 만들어보자 sql 구문은 정규식의 패턴을 형성하는 것과 같기에 정확한 sql 문법을 찾아내는게 가장 중요하다 sql 구문의 집계함수들은 SELECT 함수보다 먼저 와야 한다. 또한 TRANSFORM과 PIVOT함수는 같이 페어링 된다. https://stackoverflow.com/questions/16691853/transform-and-pivot-in-access-2013-sql TRANSFORM and PIVOT in Access 2013 SQL How can I get second table from first table using TRANSFORM and PIVOT functions: TABLE_01 Config_ID | Co.. 2022. 6. 1. Early binding 이제 자동으로..(Feat.Guid) Option Explicit Sub Haja_ListReference() Dim i& On Error Resume Next With ActiveSheet [a1].CurrentRegion.Clear .[a1] = "참조이름" .[b1] = "참조경로" .[c1] = "GUID" [a1:c1].HorizontalAlignment = xlCenter End With For i = 1 To ThisWorkbook.VBProject.References.Count With ThisWorkbook.VBProject.References(i) ActiveSheet.Cells(Rows.Count, "a").End(3)(2) = .Name ActiveSheet.Cells(Rows.Count, "b").End(3)(2) =.. 2022. 5. 3. 이전 1 다음
