VBA 코드

Sub ArrayDimension (배열) 입력한 배열의 차원을 계산합니다. 배열 Sub ArrayToRng (시작셀, 배열, 열번호, 하이퍼링크열번호) 배열 전체 또는 열 번호를 지정하여 시트 위 범위로 출력합니다. 배열 Sub Base64ToFile (Base64코드, 파일경로) Base64로 작성된 코드를 디코딩하고 파일로 저장합니다. 파일·폴더 Sub ClearRange (범위1, 범위2, ...) 지정한 범위의 값을 초기화합니다. 범위를 직접 입력하거나 문자로 지정할 수 있습니다. 유틸리티 Sub CloseWB (변경사항저장, 안내창출력) 파일저장여부에 따라 파일을 강제 종료하거나 취소합니다. 파일·폴더 Function =CombineText (범위, 구분기호) 범위 내 문자열을 하나로 합칩니다 텍스트 Sub Connect_DB (기존DB, ID번호, 연결할시트, 불러올필드, 머릿글포함) 서로 다른 두 시트 데이터를 관계형 DB로 연결합니다. 시트·DB Function =Contert_HTMLEntities (HTML코드) HTML 코드에 포함된 특수문자 표현문자를 실제 특수문자로 변경합니다. 텍스트 Sub CreateTOC (분류기준, 정렬방향, 돌아가기링크생성, 링크위치) 시트를 지정한 기준에 따라 그룹화 및 정렬하여 목차를 생성합니다. 유틸리티 Sub CsvToArray (파일경로, 파일여부, 열강제맞춤) CSV 파일을 엑셀 파일의 배열로 반환합니다. 파일·폴더 Sub cvRng (범위) 범위로 받아온 인수를 다른 데이터형태의 값으로 변환합니다. 배열 Function =DecodeURL (URL주소, 출력여부) URL 주소를 기존의 한글/영문으로 디코딩합니다. (2016 이후버전 내장함수로 포함) 웹·HTTP Sub Delete_Record (시트, ID, 행번호여부, ID열) 시트에서 지정한 ID 또는 행번호의 데이터를 삭제합니다. 시트·DB Function =EncodeURL (문자열, 출력여부) 한글 또는 영문 문자를 URL로 인코딩합니다. (2016 이후버전 내장함수로 포함) 웹·HTTP Sub ExportText (텍스트, 파일명, 파일경로) 텍스트를 지정한 경로의 메모장으로 추출합니다. 파일·폴더 Sub Extract_Column (배열, 열번호) 배열에서 지정한 열의 데이터를 추출합니다. 배열 Function =ExtractLetter (텍스트, 시작지점, 종료지점, 특수문자포함) 셀 안의 텍스트에서 '문자'만 찾아 추출합니다. 텍스트 Function =ExtractNumber (텍스트, 시작지점, 종료지점) 셀 안의 텍스트에서 숫자만 추출합니다. 텍스트 Sub FileExists (파일경로) 지정한 경로에 파일존재여부를 확인합니다. 파일·폴더 Sub FileSequence (파일경로, 시작번호) 파일이름이 중복되지 않도록 순번을 매깁니다. 파일·폴더 Sub Filtered_DB (DB, 조건, 열번호, 일치옵션) 데이터가 입력된 배열(DB)를 조건에 따라 필터링합니다. 배열 Sub FolderDialog (폴더선택창제목, 시작경로, 보기방식) 폴더선택창으로 사용자가 선택한 폴더의 경로를 반환합니다. 파일·폴더 Sub Get_DB (시트, ID없음, 머릿글포함) 시트에서 사용중인 범위를 배열로 반환합니다. 시트·DB Sub Get_Dict (시트) 시트 안에 입력된 데이터를 Dicationary 개체로 변환합니다. 시트·DB Sub Get_Records (시트, ID, 필드명, 필드갯수조절) 시트의 지정한 항목(ID)을 만족하는 필드의 데이터를 반환합니다. 시트·DB Sub Get_UniqueDB (배열, 열번호, 고유열반환) 배열의 특정 열 또는 모든 열을 참조하여 고유값을 반환합니다. 배열 Function =GetColor (셀, 글자색반환, 반환옵션) 특정 셀의 글자색 및 배경색을 반환합니다. 유틸리티 Function =GetDesktopPath (백슬래쉬표시) 컴퓨터의 바탕화면 경로를 출력합니다. 파일·폴더 Function =GetFileApplication (파일경로) 선택한 파일의 실행프로그램을 찾아 반환합니다. 파일·폴더 Sub GetHttp (URL주소, Request-Header) 웹 페이지 정보를 HTML 문서로 받아옵니다. 웹·HTTP Function =GetRedirectURL (URL주소, RequestHeader) 접속시 리다이렉트 되는 URL 주소를 반환합니다. 웹·HTTP Function =GetVocList (메시지출력여부) PC에서 사용가능한 음성 변환 목록을 출력합니다. 유틸리티 Function =HEX2FONTCOLOR (색상코드, 범위) 색상 코드로 선택한 범위의 글자 색을 변경합니다. 유틸리티 Sub Hide/ShowToolbar (전체화면) 실행 중인 엑셀 파일의 툴바를 숨기거나 보입니다. 유틸리티 Sub ImageConverter (기존파일경로, 새로운파일경로, 파일형식, 덮어쓰기, 그림품질, 최대넓이, 최대높이, 좌우반전, 상하반전, 회전각도) 지정한 이미지의 크기, 방향, 형식 등을 변경합니다. 유틸리티 Function =ImageLookup (파일명, 폴더경로, 일치옵션, N/A값, 경로출력, 테두리출력, 확장자) 직접 파일명을 입력하여 셀 안에 그림을 삽입합니다. 유틸리티 Sub Insert_Record (시트, 값1, 값2, ...) 시트에 입력된 데이터베이스에 새로운 데이터를 추가합니다. 시트·DB Sub InsertWebImage (셀, URL주소, 너비, 높이) URL을 지정하여 웹 이미지를 셀 안에 삽입합니다. 웹·HTTP Function =IsCellColored (범위) 선택된 범위에 배경색 존재 여부를 확인합니다. 유틸리티 Function =IsErrorInArray (배열(또는 범위), 오류종류) 범위 또는 배열안의 오류 존재여부를 확인합니다. 배열 Sub IsInArray (찾을값, 배열, 일치옵션, 반환형식, 검색차원) 배열 안의 값 존재여부를 정확히일치/유사일치로 검색하여 값 또는 목록을 반환합니다. 배열 Sub isListBoxSelected (리스트박스) 리스트박스 안의 항목이 선택되었는지 여부를 확인합니다. 유틸리티 Sub ListFiles (폴더경로, 경로출력여부, 하위폴더포함, 최대깊이) 폴더 내 파일 목록을 출력합니다. 파일·폴더 Sub ListFolders (폴더경로, 경로포함여부) 특정 경로의 하위 폴더 목록을 배열로 반환합니다. 파일·폴더 Sub MeasureRange (범위) 범위의 넓이/높이 및 셀 병합여부를 확인합니다. 유틸리티 Sub Multi_AutoFilter (기준열, 필터적용범위, 필터링값, 필터옵션) 지정한 범위에 다중 필터를 적용합니다. (옵션 선택 가능) 시트·DB Sub OpenFolder (폴더경로, 보기형식) 지정한 경로의 폴더를 실행합니다. 파일·폴더 Sub Page_Setup (시트, 좌측머릿글, 우측머릿글, 좌측꼬릿말, 우측꼬릿말, 여백, 중앙정렬, 가운데정렬, 인쇄방향) 지정한 시트의 머릿글, 여백 등의 인쇄영역을 설정합니다. 유틸리티 Sub ParseJSON (JSON데이터, 추출할필드, 1열머리글, 제외할문자열) JSON 데이터에서 지정한 필드 데이터를 추출하여 배열로 반환합니다. 웹·HTTP Sub PlayAlarm (알림음종류, 완료대기여부) 윈도우 알림음 또는 기본 알림음을 지정하여 출력합니다. 유틸리티 Function =RandBetweenUnique (최소값, 최대값, 개수, 제외값) 두 숫자 사이의 무작위 고유값을 지정한 갯수만큼 배열로 반환합니다. 배열 Function =Read_TextFile (파일경로, 인코딩형식) 파일경로의 메모장 또는 CSV 파일의 내용을 출력합니다. 파일·폴더 Sub Reset_Notes (시트, 크기초기화, 위치초기화) 특정 시트에 사용한 모든 메모의 위치와 크기를 한 번에 초기화합니다. 유틸리티 Function =RngConcat (범위, 구분자, 빈칸무시) 선택한 범위의 값을 구분자로 병합합니다. 텍스트 Sub Save_EachWS (파일경로, 시트명, 덮어쓰기여부, 제외할시트) 각 시트를 나누어 각각의 통합문서로 저장합니다. 파일·폴더 Sub SaveImageFromURL (URL주소, 파일경로) URL 주소의 이미지를 지정한 경로의 파일로 저장합니다. 웹·HTTP Sub SaveWS (시트, 파일경로, 파일명, 확장자) 선택한 시트를 특정 경로에 저장합니다. 파일·폴더 Sub Send_Email (메일주소, 제목, HTML본문, 표범위, CC, BCC, 첨부파일, 구분자, 예약발송, 즉시발송, 그림으로붙여넣기, 서명삽입) 아웃룩과 연동하여 메일 발송을 자동화합니다. 웹·HTTP Sub Sort2DArray (배열, 순번, 정렬방향, 가로방향정렬, 정렬시작지점, 정렬종료지점, 정렬한계값) 2차원 배열을 지정한 열에 맞춰 내림차순/오름차순으로 정렬합니다. 배열 Sub SortArray (배열, 정렬방향, 숫자기준정렬) 배열을 오름차순/내림차순으로 정렬합니다. 배열 Sub Split_EachWS (범위, 기준열, 머릿글포함, 덮어쓰기, 열자동맞춤) 범위를 기준에 따라 여러개의 시트로 나눕니다. 시트·DB Sub SplitFileExt (파일명(또는 배열)) 파일경로에서 순수 파일경로(파일명)과 확장자를 분리합니다. 파일·폴더 Function =Splitter (문자열, 시작문자, 마지막문자) 시작 문자와 마지막 문자를 지정하여 두 문자 사이의 문자열을 추출합니다. 텍스트 Sub SQL_CONN (연결문자열) 엑셀과 SQL 서버를 연결 후, ADO 개체를 반환합니다. SQL Sub SQL_DELETE (연결문자열, 테이블이름, WHERE절) 엑셀에서 SQL DELETE 쿼리를 실행하여 레코드를 삭제합니다. SQL Sub SQL_INSERT (연결문자열, 테이블이름, 필드목록, 값목록) 엑셀에서 SQL INSERT 쿼리를 실행하여 데이터를 추가합니다. SQL Sub SQL_PRINT (연결문자열, 테이블이름, 출력셀, 필드목록, WHERE절, JOIN절, 머릿글포함, 열자동맞춤) 엑셀에서 SQL SELECT 쿼리를 실행한 후, 반환된 데이터를 시트에 출력합니다. SQL Sub SQL_UPDATE (연결문자열, 테이블이름, 필드목록, 값목록, WHERE절) 엑셀에서 SQL UPDATE 쿼리를 실행하여 데이터를 업데이트합니다. SQL Sub Start_Routine (명령문, 초, 분, 종료시간, 종료날짜, 종료명령문) 특정 명령문을 매초/매분마다 반복실행 합니다. 유틸리티 Function =TEXTJOIN 함수 (VBA) (구분자, 빈칸무시, 범위) 선택된 범위의 각 셀의 값을 구분자로 나눠서 합친 텍스트를 반환합니다. 텍스트 Function =TextToNumber (텍스트, 단위) 숫자/문자 구분 없이 모든 텍스트를 숫자로 변환합니다. 텍스트 Function =TrendX (차트이름, X값, 수식출력, 범례번호) 차트 추세선의 예측값을 계산하거나 수식을 출력합니다. 유틸리티 Sub Update_Record (시트, ID, 값1, 값2, ...) 시트의 데이터베이스를 업데이트합니다. 업데이트 할 데이터의 첫번째 값은 반드시 ID여야 합니다. 시트·DB Sub ValidFileName (파일경로) 지정한 파일이름의 사용가능 여부를 확인합니다. 파일·폴더 Sub vbFileSearch (파일명, 폴더경로, 일치옵션, 확장자, 경로출력여부) 특정 폴더 안의 파일을 정확히/유사일치로 검색합니다. 파일·폴더 Sub VocSpeak (텍스트, 사용언어, 강제종료) 텍스트를 지정한 언어로 읽어줍니다. PC에 해당 언어팩이 설치되어 있어야 합니다. 유틸리티 Function =xImage (URL/파일경로, 여백, 새로고침여부) 인터넷 URL 또는 파일 경로에서 실시간으로 이미지를 받아옵니다. 웹·HTTP