OfficeAutomation

※ 텍스트 파일 access방법 Sequence Access(순차적 Access) : 각 문자나 데이터 전체 라인을 읽고 쓸 수 있다(일반적 방식) Random Access(임의 Access) : DB를 이용하는 프로그램 작성시 사용 Binary Access(이진Access) : 바이트형식 읽고 쓰기에서 사용 ▶ FileSystemObject 에 포함된 TextStream 개체를 사용해서 텍스트 파일 읽기쓰기 가능 ■ Open 명령문을 이용해서 텍스트 파일 열기 Open pathname For mode [ Access access ] [ lock ] As [ # ] filenumber [ Len = reclength ] pathname 파일경로를 포함한 파일이름 mode File Access Mode (..

■ 범위의 최대/최소 셀 찾기 및 활성화 Range개체.Find(찾을 값) Range개체.Find(찾을 값).Activate Function FindMaxCell(r As Range) '최대값이 있는 셀을 활성화 r.Find(Application.WorksheetFunction.Max(r)).Activate End Function Sub Test() FindMaxCell ([a1:e10]) End Sub

▶ Goto문 ▶ If ~ Then문 ▶ Select Case문 ▶ For ~Next문 For Each 요소 In 컬렉션 문 ▶ Do ~ Loop문 Do While ~ Loop문, Do ~ While Loop문 Do Until ~ Loop문, Do ~ Until Loop문 ■ Goto문 프로그램의 다음 실행 위치를 레이블이 지정된 곳으로 한다. - 정상 흐름이 레이블을 만나지 않도록 레이블 전에 Exit 문을 삽입한다. - 오류처리 코드에만 사용하라!!! (코드가 꼬일 수 있음) [ 레이블 지정 ] - 문자열 레이블 : - 숫자 Sub GoTo_Demo() Dim i As String Dim a As Integer 1 i = InputBox("암호를 입력하시오") If i "1234" Then GoTo ..

■ 출력함수 1. MsgBox함수 : 대화상자에 반환값 출력 MsgBox (prompt, [ buttons, ] [ title, ] [ helpfile, context ]) prompt : 대화상자에 표시할 내용 buttons : 버튼 종류 title : 대화상자 제목 helpfile : 대화상자에 도움말 제공시 필요한 도움말 파일 context : 도움말에 지정된 컨덱스트 ID를 나타내는 수식 ※ MsgBox함수는 반환값(사용자가 선택한 버튼)이 있다. 반환값 표시 창으로만 사용하려면 Button인수를 생략하면 된다. ( 반환값 없음 ) A = msgbox ("Result : ", vbOKCancel,Title:="결과창") ※ 디버깅에 MsgBox함수를 사용하여 코드를 중지하고 변수/지금까지의 계산값..

- VBA 내장함수 : VBA에 내장된 함수 - WorkSheet함수: 엑셀 수식입력창에서 사용하는 함수 ■ VBA내장함수 : VBA 라이브러리에 속한다. ( 개체 찾아보기(F2) > 라이브러리 중 VBA에 해당 ) -> 녹색 아이콘 ※ 코드입력 시 확인 방법 : [VBA.] 함수명 Debug.Print VBA.Sqr(25) ' 5 Debug.Print Sqr(25) ■ WorkSheet함수 - VBA에서 WorkSheet함수를 사용할 수 있다 Application.WorksheetFunction.함수 Application.WorksheetFunction.vlookup(1,[a1:c10],3) ※ 사용자 정의 함수 Function Procesure를 이용하여 함수를 만들어 Worksheet함수처럼 사용 ..

VBA 언어의 구성 요소와 문법 ※ 명령문 한줄에 입력 시 : (콜론) 이용 For i = 1 to 100 : Total = Total + i : Next i ■ 주석 ( ' )작은 따옴표 이용 용도 : 설명을 달고자 할 때 / 코드 테스트에서 주석처리하여 코드 실행 해제 할 때 ※ "문자열안의 작은 따옴표" : 큰따옴표 안의 작은따옴표는 문자열의 일부분으로 본다. Txt = "Can't find." ■ 변수 ※ 변수 작명 원칙 - 대소문자를 구분하지 않는다. : 변수 선언 시 이름이 이후 코딩 때 바로 적용됨 (대소문자를 구분하는 것처럼 보임) 쉽게 알아 볼 수 있도록 대소문자를 혼합하여 작명한다. Dim DataEntry as Currency - 첫글자는 영문자(한글)로 시작하고 숫자, _(언더바) ..

1. 개체에 대해서 기억해야 할 필수 개념 - 개체에는 고유한 속성과 메소드가 있다. 그러나 공통된 요소도 있다.( Name, Delete ) - 개체를 선택하지 않고서도 개체에 작업 수행 가능(Select꼭 필요하지는 않고 셀조작 가능) - 컬렉션의 개념을 이해하라!!! : 컬렉션 개체를 참조하면 컬렉션 개체에 포함된 개체가 반환된다. Workbooks("Myfile.xlsx") - 일부 속성은 다른 개체에 대한 참조를 반환한다. Range("A1").Font.Bold = True Range도 개체이고 Font도 객체이며 Bold는 Font개체에 속한다. - 개체는 다양한 방법으로 참조 가능 Workbooks("통합문서1.xlsx").Worksheets ("재무재표") Workbooks(1).Works..

■ 병합된 셀 존재 확인 CODE Function ContainsMergedCells(rng As Range) As Boolean Dim c As Range ContainsMergedCells = False For Each c In rng If c.MergeCells Then ContainsMergedCells = True Exit Function End If Next c End Function Sub aaa() If ContainsMergedCells(Range("a1:e20")) Then MsgBox ("병합셀이 존재합니다.") Else MsgBox ("병합셀이 없습니다.") End If End Sub ■ 병합셀의 특징 [A1:B2]셀이 병합되어 있다 가정하면 - 병합된 셀을 참조하는 방법 ① 병합된..