Please Enable JavaScript!
Gon[ Enable JavaScript ]

엑셀 VBA 함수 CDbl 부동 소수점으로 형변환하기

엑셀(Excel)/VBA
반응형

VBA에서 CDbl 함수는 표현식을 실수로 변환하는 함수입니다. CDbl 함수를 사용하면 정수, 문자열 또는 다른 데이터 유형을 실수로 변환할 수 있으며, 정수를 실수로 변환하거나 문자열을 실수로 변환하는 등 다양한 변환 작업에 사용할 수 있습니다. 아래에서 CDbl 함수의 개념, 구문, 예제, 실행 결과, 및 소스 설명을 설명하겠습니다.

 

 

정수로 변환하고 싶다면 Cint 함수를 사용해 보세요.

https://mainia.tistory.com/7022

 

엑셀 VBA 함수 CInt 정수로 형변환하기

VBA에서 CInt 함수는 표현식을 정수로 변환하는 함수입니다. 함수는 소수점을 제거하고 나머지 숫자를 정수로 변환할 수 있습니다. 소수점 이하를 삭제하고 나머지 숫자를 정수로 반올림하지 않

mainia.tistory.com

 

 

◎ 구문

 

CDbl 함수는 주어진 표현식을 실수로 변환합니다. 이 함수는 정수, 문자열 또는 다른 데이터 유형을 실수로 변환합니다.

 

CDbl(Expression)

l  [Expression]: 더블로 변환하려는 표현식입니다.

 

 

◎ 예제 1: 정수를 실수로 변환

 

예제에서는 [CDbl] 함수를 사용하여 정수를 실수로 변환합니다. 원래 숫자를 표시하고, [CDbl] 함수를 사용하여 정수를 실수로 변환한 결과를 표시합니다. 

Sub ConvertToDouble()
    Dim originalNumber As Integer
    originalNumber = 123
 
    Dim doubleResult As Double
    doubleResult = CDbl(originalNumber)
 
    MsgBox "원래 숫자: " & originalNumber & vbCrLf & "실수로 변환: " & doubleResult, vbInformation, "실수로 변환"
End Sub

 

 

 

◎ 예제 2: 문자열을 실수로 변환

 

예제에서는 [CDbl] 함수를 사용하여 문자열을 실수로 변환합니다. 문자열을 표시하고, [CDbl] 함수를 사용하여 문자열을 실수로 변환한 결과를 표시합니다.  

Sub ConvertStringToDouble()
    Dim numericString As String
    numericString = "456.789"
 
    Dim doubleResult As Double
    doubleResult = CDbl(numericString)
 
    MsgBox "문자열: " & numericString & vbCrLf & "실수로 변환: " & doubleResult, vbInformation, "문자열을 실수로 변환"
End Sub

 

 

 

◎ 예제 3: 다른 데이터 유형을 실수로 변환

 

예제에서는 [CDbl] 함수를 사용하여 다른 데이터 유형을 실수로 변환합니다. 여기서는 시간 값을 사용합니다. 원래 값(시간)을 표시하고, [CDbl] 함수를 사용하여 시간 값을 실수로 변환한 결과를 표시합니다. 

 

Sub ConvertOtherDataTypes()
    Dim originalValue As Date
    originalValue = #12:30:45 PM#
 
    Dim doubleResult As Double
    doubleResult = CDbl(originalValue)
 
    MsgBox "원래 값: " & originalValue & vbCrLf & "실수로 변환: " & doubleResult, vbInformation, "다른 데이터 유형을 실수로 변환"
End Sub

 


 

반응형
Posted by 녹두장군1
,