본문 바로가기
반응형

엑셀13

엑셀 시트 한개씩 단일파일로 저장하기 Sub 시트저장() Dim Sht As Worksheet Dim strPath As String Application.ScreenUpdating = False strPath = ThisWorkbook.Path & "\" For Each Sht In Worksheets With Sht .Copy ChDir strPath ActiveWorkbook.SaveAs Filename:=strPath & Sht.Name & ".xlsx" ActiveWindow.Close End With Next Sht End Sub 2023. 3. 30.
엑셀 문장에 리스트에 있는 값이 존재하는지 확인 엑셀 특정 문장에 내가 만든 리스트에 있는 값이 존재하는지 확인하려면 다음 팡션을 활용해보자. function 문장은 다음과 같다. =sumproudct(--isnumber(search(리스트,문장)))>0 2023. 3. 3.
엑셀 리스트중 존재유무 확인하는 함수 1. 내가 선택한 값이 엑셀 리스트/표 상에 존재하는지 확인하고자 할때, 다음 명령어를 사용한다. =OR(찾고자하는값=비교리스트셀범위) 2023. 2. 8.
If 문으로 조건 판단하기 if 조건 Then 명령문 / if...Then...Else 조건문 등이 존재합니다.Sub IfSample()Dim intNumber As IntegerintNumber = 100 if intNumber > = 50 Then MsgBox "50점 이상"if intNumber =50 Then MsgBox "50점 이상" Else MsgBox "50점 이하 위와 같이 하나의 명령문이 길어질 경우 줄 연결 문자를 사용하여 두 줄 이상으로 입력할 수 있다. 줄 연결 문자는 '빈 칸과 밑줄(_)로 이루어진다.if intN.. 2018. 10. 9.
동적 배열 사용하기 동적 배열은 배열 요소 개수를 정의하지 않고 선언하는 배열을 의미한다. 배열의 행과 열의 수가 정해지는 지점에서 ReDim문으로 개수를 재정의한다.Dim matNumber() As Integer //동적 배열 선언//...ReDim matNumber (1 To 20) //20개의 배열 요소로 크기 정의//...ReDim matNumber(1 To 40) // 40개의 배열 요소로 크기 재정의//ReDim 문을 재사용한 경우 (1 To 40), 이전에 배열에 저장된 값(1 To 20)은 모두 사라진다. 이전 값을 유지하려면 ReDim Preserve 키워드를 사용해야 한다.ReDim Preserve matNumber (1 To 20) ReDim 문은 2차원 이상의 다차원 배열에 사용할 때 제약이 있다. 바.. 2018. 10. 9.
Excel VBA 실행 속도 빠르게 하기 엑셀 VBA 실행 시, 처리 속도를 빠르게 하기 위해서 적용할 수 있는 코드는 다음과 같다.Application.ScreenUpdating = False Application.DisplayStatusBar = FalseApplication.Calculation = xlCalculationManualApplication.EnableEvents = FalseActiveSheet.DispplayPageBreaks = Flase(코드 입력)Application.ScreenUpdating = TrueApplicationDisplayStatusBar = TrueApplication.Calculation = xlCalculationAutomaticApplication.EnableEvents = TrueActiveSh.. 2018. 8. 21.
배열(Array) 선언과 사용법 1. 배열 (Array) 또한 변수이므로 Dim, Public 등을 사용하여 선언한다. 2. 일반 변수(variable)과 다른 점은 배열 변수는 선언시 몇 개의 값을 저장할 배열인지 숫자를 정해야 한다.3. 배열변수를 선언할 때 입력될 데이터 형식을 지정하지 않으면 각 요소마다 서로 다른 데이터 형식의 값을 저장할 수 있다. 하짐나 이는 선언 형식이 Variant가 되므로 메모리 공간을 많이 차지하게 된다.4. 배열 선언 예제Dim numberList(10) As Integer위와 같이 선언하면 numberList(0)부터 numberList(10)까지 총 11개의 값을 저장할 수 있는 배열 변수를 사용할 수 있다.배열 변수에 값을 저장하려면 다음과 같이 한다.numberList(0) = 10numbe.. 2018. 8. 19.
개체 변수(Object Variable) 1. 개체 변수 (Object Variable)은 워크북, 시트, 셀 범위 등의 개체를 저장하는 변수이다. 이를 사용하면 코드가 더 단순해지고 실행 속도도 올라간다. 2. 예제Sub ObjectVariableExmaple() Const UserName As String = "YOYOYO" Dim intSize As Integer Dim rngTarget As Range intSize = 13 Set rngTarget = Sheets(1).Range("A1:C5") rngTarget = UserName rngTarget.Font.Size = intSizeEnd Sub3. 결과화면 2018. 8. 19.
변수 선언, 데이터 형식, 사용범위 & 상수 선언방법 1. 변수 선언시 사용되는 선언자DimStaticPrivatePublic2. Pulibc선언시에는 모든 모듈에서 사용할 수 있음. 전역변수와 마찬가지~Dim strName As StringDim intAge As IntegerDim strName As String, intAge As Integer3. 모듈의 시작 부분에 Option Explicit을 입력하면, 사용자가 선언하지 않은 변수를 사용했을 때 실행이 멈춘다!4. 변수의 데이터 형식[숫자] Byte Integer Long Single Double Currency Decimal[날짜] Date[논리값] Boolean[텍스트] String[특수형] Variant(숫자) Variant(문자)5. 변수의 사용 범위단일프로시저 - 프로시저 내 선언- Di.. 2018. 7. 29.
하위 개체 접근하기 1. Range("A1").Value = 200 현재 활성화된 Worksheet의 A1셀에 200 입력 2. Worksheets("Sheet2").Range("A1").Value = 200Sheet2라는 이름의 Worksheet가 존재한다면, Sheet2의 A1셀에 200입력 3. Workbooks("통합문서2.xlsx").Worksheets("Sheet1").Range("A1").Value = 200통합문서2.xlsx파일의 sheet1이라는 이름의 Worksheet의 A1셀에 200 입력 개체에 접근하기 위해서는 상위 -> 하위 순으로 접근해야 한다. (Workbooks -> Worksheets -> Range) 상위 개체가 생략된 경우에는 현재 활성화된 (화면에 뜬) 개체가 생략된 것으로 이해한다. .. 2018. 7. 1.
반응형