목록VBA (35)
남극

엑셀에서 공백 제거하기 trim, 정돈을 한다는 뜻을 가지고 있습니다. 프로그래밍 분야에서는 공백을 제거할 때 사용됩니다. 엑셀에서는 왼쪽, 오른쪽, 양쪽의 공백을 지우는 함수가 있습니다. LTrim 가장 먼저 왼쪽의 공백을 지우는 함수입니다. Sub test() Dim str As String str = " 공백 제거 " MsgBox LTrim(str) End Sub 한 번 실행결과를 보도록 합시다. 우선 공백 제거를 하지 않았을 때입니다. 했을 때 확실히 공백이 사라졌습니다. RTrim LTrim과 같은 개념입니다. LTrim을 RTrim으로 바꾸면 동일하게 사용할 수 있습니다. 하지만 메시지 박스에서는 알아볼 수 없으니 다른 방법으로 알아보도록 하겠습니다. Sub test() Dim str As S..
엑셀에서 문자열 자르기 엑셀에도 문자열을 자르는 함수들이 있습니다. 총 3가지로 Left, Right, Mid 즉 왼쪽, 오른쪽, 원하는 방향에서 자를 수 있습니다 Left Left는 왼쪽에서부터 문자열을 자르기 시작합니다. Left(자를 문자열, 자를 길이) 기본 형식은 이렇습니다. Sub test() Dim str As String str = "안녕하세요" MsgBox Left(str, 2) End Sub 실행하면 "안녕하세요"에서 안녕만 화면에 출력됩니다. Right Left가 왼쪽에서부터 잘랐다면 Right는 오른쪽에서부터 자르겠죠? 기본 형식은 left에서 right로 바뀐 것 밖에 없습니다. Sub test() Dim str As String str = "안녕하세요" MsgBox Right(s..

Lcase, Ucase LCase는 lower case 즉 소문자를 뜻합니다. UCase는 그 반대로 Upper case, 대문자를 의미하죠. Sub test() Dim str As String str = UCase("hello world") MsgBox str End Sub 위의 소스코드처럼 소문자를 Ucase함수에 넣어주시면 대문자로 변환해서 리턴을 해줍니다. 소문자가 모두 바뀐 것을 확인하실 수 있습니다. 이번에는 반대의 경우도 한 번 실행해보도록 하겠습니다. Sub test() Dim str As String str = LCase("HELLO WORLD") MsgBox str End Sub 아까와는 값과 함수를 반대로 지정해주었습니다. 결과가 예상가시나요? 네, 모두 소문자로 나온 것을 보실 수 ..

InStr 함수란? InStr함수는 문자열을 찾는 함수입니다. 엑셀에서의 search와 비슷한 함수입니다. InStr(검색할 문장, 검색할 문자열) 기본적인 사용법은 앞에 검색할 문장을 넣고 뒤에는 문자열을 넣어서 사용합니다. Sub test() Dim var As Long Dim str As String str = "안녕하세요. 포스팅을 합시다" var = InStr(str, "포스팅") MsgBox var End Sub 예제를 보면서 빠르게 이해를 해봅시다 예제를 실행하면 값이 나옵니다. 처음 문자를 1을 기준으로 시작하며 처음 검색한 단어가 나왔을 때의 값을 반환합니다. 처음 검색을 시작하는 부분도 정해줄 수 있습니다.

InputBox로 값을 받아보자 InputBox는 대화 상자를 띄워서 값을 입력받도록 할 수 있습니다. Sub test() Dim var As Variant Dim id As Long var = InputBox("아이디를 입력하세요.", "로그인", id) End Sub 그냥 기본적으로 값을 입력받도록 할 수 있는 소스코드입니다. 다른 동작 없이 박스에 입력만이 가능합니다. 화면에는 이렇게 박스가 나옵니다. vba에는 inputbox에 상당히 여러 가지를 할 수 있습니다. 박스의 간격도 설정할 수 있지만 이 포스팅에서는 타입까지만 다루도록 하겠습니다. Type inputbox에 type을 설정할 수 있습니다. 문자만 넣게 할 건지 숫자만 넣게 할 건지 처럼 말이죠. 0 수식 반환 1 숫자 반환 2 문자열..
IIF 함수란? If문과 유사한 기능을 가진 함수로 결과에 따라서 값을 반환합니다. IIf(조건, true 반환 값, false 반환 값) 기본적인 사용 방식입니다. 조건에 따하여서 true, false값을 반환합니다. Sub test() Dim var As Long var = IIf(Range("A1").Value > 1000, 1000, Range("A1").Value) MsgBox var End Sub a1 셀의 값이 1000이 넘으면 var의 값은 1000이 되고 그것이 아니라면 var의 값은 a1셀의 값이 됩니다. 이 소스코드는 밑에 있는 소스코드와 같은 역할을 합니다. If Range("A1").Value > 1000 Then var = 1000 Else var = Range("A1").Val..