페이지

▼
레이블이 VBA인 게시물을 표시합니다. 모든 게시물 표시
레이블이 VBA인 게시물을 표시합니다. 모든 게시물 표시
2020년 1월 29일 수요일

Excel VBA 엑셀 파일 경로 값 가져오기 File Location

›
엑셀 파일 경로 값 가져오기 Function getCellValue(LOC_, strFile , strSheet , strPath ) '파일을 여는 것 따로 해줘야 하는데, 열었다 닫았다 prcess 과부하가 걸릴 수 있으므로 주의 ...
2019년 9월 11일 수요일

Excel Vba Sheet 내용을 Text 파일로 저장하기 (UTF-8)

›
시트의 내용을 텍스트 파일로 저장하기. (UTF-8 대응) Sub SheetToText() Dim streamWrite As New ADODB.Stream '// 쓰기 스트림 선언 Microsoft ADODB 6.1 (ActiveX)...

EXCEL VBA로 euc-kr -> utf-8로 변경하는 코드

›
EXCEL VBA로 텍스트 쓸 때 이미 써진 파일을 euc-kr -> utf-8 로 수정하는 코드 'Microsoft ActiveX Data Objects 6.1 Library 참조 필요 Private Sub EuckrToUtf8NoB...

EXCEL VBA 텍스트 파일 저장하기 (출력하기)

›
data 코드의 일부를 자동 생성해주는 스크립트 만들 때 유용하다. Option Explicit Sub Createtextfile() Dim TF As Object Dim TFT As Object '만들기 Set TF = CreateO...
2019년 8월 20일 화요일

Excel 모든 시트 셀 내용만 지우기

›
아래의 스크립트를실행한다. Sub 모든시트내용지우기() Dim WS_Count As Integer Dim i As Integer WS_Count = ActiveWorkbook.Worksheets.C...
2019년 7월 26일 금요일

vba 로 color=#ffffff 태그 깨진 것 찾기

›
시간이 너무 없었다. 태그가 어디에서 깨졌는지 모르겠는데, 처리해야 할 스트링 양이너무 많았다. 남은시간은 30분 정도... 그래서 TAG verifty 관련하여 vba 툴을 검색하다가 시간이 없어서 대충 몇가지 조건으로 거르도록 했다. ...
2019년 6월 12일 수요일

Excel 에서 JSON 파싱하기 (VBA사용, excel 365에서 확인 완료)

›
좋은 방법이 있을까 고민하다가 선구자를 따라가기로 했다. github에 괜찮은 도구가 있어서 이것을 소개한다. 해당 git에서 "JsonConverter.bas" 파일을 VBA 프로젝트로 가져오기 (Import) 하면 끝 Js...
2019년 4월 20일 토요일

Excel 어떤 단어가 몇개 포함하고 있는지 계산하는 방법

›
정규식으로 하려다가 엑셀 기능 가지고 해보게 된 일이 있는데... 어떤 단어가 1개 이상 포함된 경우 이것이 몇개 포함되었는지 확인하는 계산식이다. 만일 G2라는 셀에 "abc(VALUE)ab(VALUE)abcd(VALUE)eee...
댓글 1개:
2019년 4월 19일 금요일

Excel 123 을 ABC로 변경하기 (숫자를 알파벳으로)

›
입력된 숫자를 순서대로 ABC로 표시해주는 VBA 함수 쓸일이 있어서 찾아본 뒤 기록함. 출처 : https://ateitexe.com/change-alphabet-integer/ Function CNumAlp(va As Variant) A...
댓글 1개:
2018년 11월 7일 수요일

Excel VBA 파일(Book)의 모든 시트에 함수를 삭제하고 값만 남기기

›
외부로 파일 전달시 유용하다. (수식이 깨지거나 바뀌어서 값이 변동되는것 방지) Sub MacroSaveValue() With Application: .Calculation = 3: .ScreenUpdating = 0 On Error Resume ...

Excel VBA 특정 컬럼 명(1열) 만 남기고 삭제하기.

›
대량 작업시 유용... Sub Delete_Cols_WithOut() Dim co As Long, I As Long Dim join As String co = ActiveSheet.Range("A1").C...

Excel VBA 시트마다 1셀 클릭으로 위치 초기화 하기

›
저장전에 해서 주면 다른 사람이 사용하기 좋다. 특별히 기능적인건 아님.. '1시트 1셀 클릭 초기화 Sub WorksheetLoop() Dim WS_Count As Integer Dim I As Inte...

Excel VBA 해당 파일(Book)에서 돌면서 특정 시트 찾아서 지우기

›
특정 시트 찾아서 지우기 조금 고치면 여러 시트도 할 수 있다. WS_NameFindKey 에 지정된 이름을 찾는다. (아래 코드는 ETC) '폰트 생성과 관련된 시트 삭제 Sub RemoveFontSheet() Dim...

Excel VBA 해당 시트의 모든 서식 지우기

›
엑셀 작업 하는게 많아져서 매크로 제작한 것 백업 겸 공유로 올림 Sub 서식지우기() Dim co As Long, I As Long Dim ro As Long, J As Long Dim join As ...
2017년 11월 16일 목요일

EXCEL VBA 에서 Http Request 하는 방법

›
VBA 도구를 만들다가 외부 API 와 통신할 일이 있어서 남기는 기록이다. 보통 Open API 를 이용하면 JSON 으로 리턴되므로 이걸 파싱해서 쓰면 된다. 아래코드를 실행 하기 전에, 참조를 추가해야 한다. Visual Basic 도구...
댓글 1개: