아쉽게도 vba는 문자열을 쉽게 이어 붙일수 있는 함수가 따로 없다... 함수 짜기 귀찮아서 구글 여기저기 찾아보다 이상한것만 있길래 간단하게 직접 짰다. 기본적인 예외처리만 해두었음. Function printf(Input_Text As String, ParamArray Args()) As String Application.ScreenUpdating = False Application.DisplayAlerts = False Dim strReturn As String Debug.Print UBound(Split(Input_Text, "{")) If UBound(Args) UBound(Split(Input_Text, "{")) - 1 Then printf = "배열 개수 Error" GoTo 종료: End..
분류 전체보기
[Error Message] Method not found: 'Microsoft.CodeAnalysis.SyntaxTree Microsoft.CodeAnalysis.VisualBasic.VisualBasicSyntaxTree.ParseText(System.String, Microsoft.CodeAnalysis.VisualBasic.VisualBasicParseOptions, System.String, System.Text.Encoding, System.Collections.Immutable.ImmutableDictionary`2, System.Threading.CancellationToken)'. 의존성이 없다는 오류내용이다. 일단 그래서 바로 import 탭에서 없다는 의존성에 추가를 해줬다. 보통은 ..
탭 창 펼치기 ⌘ + ⇧(Shift) + A
아래처럼 csv형식으로 data가 있을 때 엑셀에 붙여 넣기 하는 법을 해보도록 하겠습니다. 데이터 출처 : https://www.data.go.kr/data/15099119/fileData.do#/tab-layer-file 충청북도 진천군_공공미술 프로젝트 관리 리스트_20220222 충청북도 진천군 공공미술 프로젝트 (물의 정원) 관리 리스트 입니다. 내용은 연번, 구분 유형, 작품명, 작가, 비고 등으로 되어 있습니다. www.data.go.kr 위 같은 데이터 경우 일반적으로 수동으로 전체 복사 해서 엑셀에 붙여 넣기를 하면 이렇게 자동으로 테이블 형태로 붙여넣어 질 때 사용하면 됩니다. 예제는 데이터 다운받아서 복사붙여넣기 한 형식이지만 Clipboard 를 활용해서 다양한 상황에서 적용하면 됩..
Dim digit As Integer Dim num As Double num = 123.456 digit = Len(CStr(num)) - InStr(CStr(num), ".")
● 문자열 확장하면서 선택 Window : Ctrl + w ● 이전작성 단어 가져오기 Window : Alt + / ● Generate (Getter/Setter/Override) Window : Alt + insert ● Tab 이동 Window : Ctrl + tab
