본문 바로가기
반응형

IT 이모저모41

VBA(엑셀 매크로) 숫자를 문자열로 바꾸는 방법 종종 엑셀에서 숫자를 문자열로 변환하여 자르거나 붙이는 작업을 해야하는 경우가 있다. 숫자를 문자열로 바꾸어주는 2가지 방법에 대해 알아보도록 하겠다. 1. String 변수에 넣기 숫자형 변수를 바로 문자열 변수에 넣은 다음 문자처럼 쓸수 있다. Sub NumberToString() Dim Number As Integer Dim Text As String Number = 99 Text = Number MsgBox Left(Text, 1) End Sub Integer형의 변수에 숫자 99를 넣고, 그 변수를 다시 String형 변수에 넣는다. 그 뒤 문자열을 왼쪽으로부터 자르는 Left를 사용하여 왼쪽으로부터 1개만 잘라낸다. 결과 : 9 2. Format() 함수 사용 구조 - Format(인수1, (.. 2020. 7. 16.
VBA(엑셀 매크로) 글자색, 배경색 바꾸기 (interior, Font) VBA로 셀에 있는 글자색이나 배경색을 바꿔야 하는 경우가 있다. 셀에 있는 글자색, 배경색을 바꾸는 방법을 알아보도록 하겠다. 셀 배경색 설정 1. Cells(x, y).Interior.ColorIndex = 컬러 인덱스 2. Cells(x, y).Interior.Color = RGB(red, green, blue) 배경색은 Cells(x, y)로 부터 접근 가능하다. 1번의 경우는 컬러인덱스를 사용하는 방법이고 2번의 경우는 RGB를 사용하는 방법이다. 컬러인덱스는 예제와 함께 보도록 하겠다. 셀 글자색 설정 1.Cells(x, y).Font.ColorIndex = 컬러 인덱스 2. Cells(x, y).Font.Color = RGB(red, green, blue) 글자색도 마찬가지로 Cells(x,.. 2020. 7. 16.
VBA(엑셀 매크로) 문자열 길이 구하기(Len, LenB) VBA에도 다른 언어와 마찬가지로 문자열 길이를 구해주는 아래와 같은 함수가 있다. Len(), LenB() 하나씩 설명 후 예제를 보도록 하겠다. Len(), LenB() 1. Len(문자열) : 영어, 한글 구분 없이 문자열의 글자의 갯수만 반환한다. 예) "안녕하세요" -> 크기:5 "안a녕b하c세d요" -> 크기:9 2. LenB(문자열) 영어, 한글 관계 없이 한 글자당 2바이트로 계산 예) "안녕하세요" -> 크기:10 "안a녕b하c세d요" -> 크기:18 예제 Sub TextLen() Dim TmpTextEng As String Dim TmpTextKr As String TmpTextKr = "안녕하세요" TmpTextKE = "안a녕b하c세d요" MsgBox Len(TmpTextKr) Ms.. 2020. 7. 14.
VBA(엑셀 매크로)배열 길이 가져오는 법(UBound, LBound) VBA에서 배열크기를 취득하기 위해서는 마지막 인덱스 번호를 가져오는 UBound()함수와 처음 시작하는 인덱스 번호를 가져오는 LBound()함수를 활용하여 계산한다. 먼저 UBound(), LBound()의 구조와 활용법을 알아보고 UBound(), LBound()를 활용하여 아래와 같은 배열의 크기를 구하는 법을 알아보겠다. 1. 인덱스 번호가 0부터 시작하는 1차원 배열 2. 인덱스 번호가 0부터 시작하지 않는 1차원 배열 UBound(), LBound()의 구조와 활용법 1. UBound 구조 - 인수 : 배열 변수 결과값 : 배열의 마지막 인덱스 번호 UBound(배열) 아래는 간단한 예제이다. Sub SearchLastIndexU() Dim tmpArr(10) As Integer MsgBox.. 2020. 7. 12.
반응형