Vba excel приведение типов

Type Conversion Functions (Visual Basic)

These functions are compiled inline, meaning the conversion code is part of the code that evaluates the expression. Sometimes there is no call to a procedure to accomplish the conversion, which improves performance. Each function coerces an expression to a specific data type.

Syntax

expression
Required. Any expression of the source data type.

Return Value Data Type

The function name determines the data type of the value it returns, as shown in the following table.

Function name	Return data type	Range for expression argument
CBool	Boolean Data Type	Any valid Char or String or numeric expression.
CByte	Byte Data Type	Byte.MinValue (0) through Byte.MaxValue (255) (unsigned); fractional parts are rounded. 1 Starting with Visual Basic 15.8, Visual Basic optimizes the performance of floating-point to byte conversion with the CByte function; see the Remarks section for more information. See the CInt Example section for an example.
CChar	Char Data Type	Any valid Char or String expression; only first character of a String is converted; value can be 0 through 65535 (unsigned).
CDate	Date Data Type	Any valid representation of a date and time.
CDbl	Double Data Type	-1.79769313486231570E+308 through -4.94065645841246544E-324 for negative values; 4.94065645841246544E-324 through 1.79769313486231570E+308 for positive values.
CDec	Decimal Data Type	+/-79,228,162,514,264,337,593,543,950,335 for zero-scaled numbers, that is, numbers with no decimal places. For numbers with 28 decimal places, the range is +/-7.9228162514264337593543950335. The smallest possible non-zero number is 0.0000000000000000000000000001 (+/-1E-28).
CInt	Integer Data Type	Int32.MinValue (-2,147,483,648) through Int32.MaxValue (2,147,483,647); fractional parts are rounded. 1 Starting with Visual Basic 15.8, Visual Basic optimizes the performance of floating-point to integer conversion with the CInt function; see the Remarks section for more information. See the CInt Example section for an example.
CLng	Long Data Type	Int64.MinValue (-9,223,372,036,854,775,808) through Int64.MaxValue (9,223,372,036,854,775,807); fractional parts are rounded. 1 Starting with Visual Basic 15.8, Visual Basic optimizes the performance of floating-point to 64-bit integer conversion with the CLng function; see the Remarks section for more information. See the CInt Example section for an example.
CObj	Object Data Type	Any valid expression.
CSByte	SByte Data Type	SByte.MinValue (-128) through SByte.MaxValue (127); fractional parts are rounded. 1 Starting with Visual Basic 15.8, Visual Basic optimizes the performance of floating-point to signed byte conversion with the CSByte function; see the Remarks section for more information. See the CInt Example section for an example.
CShort	Short Data Type	Int16.MinValue (-32,768) through Int16.MaxValue (32,767); fractional parts are rounded. 1 Starting with Visual Basic 15.8, Visual Basic optimizes the performance of floating-point to 16-bit integer conversion with the CShort function; see the Remarks section for more information. See the CInt Example section for an example.
CSng	Single Data Type	-3.402823E+38 through -1.401298E-45 for negative values; 1.401298E-45 through 3.402823E+38 for positive values.
CStr	String Data Type	Returns for CStr depend on the expression argument. See Return Values for the CStr Function.
CUInt	UInteger Data Type	UInt32.MinValue (0) through UInt32.MaxValue (4,294,967,295) (unsigned); fractional parts are rounded. 1 Starting with Visual Basic 15.8, Visual Basic optimizes the performance of floating-point to unsigned integer conversion with the CUInt function; see the Remarks section for more information. See the CInt Example section for an example.
CULng	ULong Data Type	UInt64.MinValue (0) through UInt64.MaxValue (18,446,744,073,709,551,615) (unsigned); fractional parts are rounded. 1 Starting with Visual Basic 15.8, Visual Basic optimizes the performance of floating-point to unsigned long integer conversion with the CULng function; see the Remarks section for more information. See the CInt Example section for an example.
CUShort	UShort Data Type	UInt16.MinValue (0) through UInt16.MaxValue (65,535) (unsigned); fractional parts are rounded. 1 Starting with Visual Basic 15.8, Visual Basic optimizes the performance of floating-point to unsigned 16-bit integer conversion with the CUShort function; see the Remarks section for more information. See the CInt Example section for an example.

1 Fractional parts can be subject to a special type of rounding called banker’s rounding. See «Remarks» for more information.

As a rule, you should use the Visual Basic type conversion functions in preference to the .NET Framework methods such as ToString() , either on the Convert class or on an individual type structure or class. The Visual Basic functions are designed for optimal interaction with Visual Basic code, and they also make your source code shorter and easier to read. In addition, the .NET Framework conversion methods do not always produce the same results as the Visual Basic functions, for example when converting Boolean to Integer . For more information, see Troubleshooting Data Types.

Starting with Visual Basic 15.8, the performance of floating-point-to-integer conversion is optimized when you pass the Single or Double value returned by the following methods to one of the integer conversion functions ( CByte , CShort , CInt , CLng , CSByte , CUShort , CUInt , CULng ):

This optimization allows code that does a large number of integer conversions to run up to twice as fast. The following example illustrates these optimized floating-point-to-integer conversions:

Behavior

Coercion. In general, you can use the data type conversion functions to coerce the result of an operation to a particular data type rather than the default data type. For example, use CDec to force decimal arithmetic in cases where single-precision, double-precision, or integer arithmetic would normally take place.

Failed Conversions. If the expression passed to the function is outside the range of the data type to which it is to be converted, an OverflowException occurs.

Fractional Parts. When you convert a nonintegral value to an integral type, the integer conversion functions ( CByte , CInt , CLng , CSByte , CShort , CUInt , CULng , and CUShort ) remove the fractional part and round the value to the closest integer.

If the fractional part is exactly 0.5, the integer conversion functions round it to the nearest even integer. For example, 0.5 rounds to 0, and 1.5 and 2.5 both round to 2. This is sometimes called banker’s rounding, and its purpose is to compensate for a bias that could accumulate when adding many such numbers together.

CInt and CLng differ from the Int and Fix functions, which truncate, rather than round, the fractional part of a number. Also, Fix and Int always return a value of the same data type as you pass in.

Date/Time Conversions. Use the IsDate function to determine if a value can be converted to a date and time. CDate recognizes date literals and time literals but not numeric values. To convert a Visual Basic 6.0 Date value to a Date value in Visual Basic 2005 or later versions, you can use the DateTime.FromOADate method.

Neutral Date/Time Values. The Date Data Type always contains both date and time information. For purposes of type conversion, Visual Basic considers 1/1/0001 (January 1 of the year 1) to be a neutral value for the date, and 00:00:00 (midnight) to be a neutral value for the time. If you convert a Date value to a string, CStr does not include neutral values in the resulting string. For example, if you convert #January 1, 0001 9:30:00# to a string, the result is «9:30:00 AM»; the date information is suppressed. However, the date information is still present in the original Date value and can be recovered with functions such as DatePart function.

Culture Sensitivity. The type conversion functions involving strings perform conversions based on the current culture settings for the application. For example, CDate recognizes date formats according to the locale setting of your system. You must provide the day, month, and year in the correct order for your locale, or the date might not be interpreted correctly. A long date format is not recognized if it contains a day-of-the-week string, such as «Wednesday».

If you need to convert to or from a string representation of a value in a format other than the one specified by your locale, you cannot use the Visual Basic type conversion functions. To do this, use the ToString(IFormatProvider) and Parse(String, IFormatProvider) methods of that value’s type. For example, use Double.Parse when converting a string to a Double , and use Double.ToString when converting a value of type Double to a string.

CType Function

The CType Function takes a second argument, typename , and coerces expression to typename , where typename can be any data type, structure, class, or interface to which there exists a valid conversion.

For a comparison of CType with the other type conversion keywords, see DirectCast Operator and TryCast Operator.

CBool Example

The following example uses the CBool function to convert expressions to Boolean values. If an expression evaluates to a nonzero value, CBool returns True ; otherwise, it returns False .

CByte Example

The following example uses the CByte function to convert an expression to a Byte .

CChar Example

The following example uses the CChar function to convert the first character of a String expression to a Char type.

The input argument to CChar must be of data type Char or String . You cannot use CChar to convert a number to a character, because CChar cannot accept a numeric data type. The following example obtains a number representing a code point (character code) and converts it to the corresponding character. It uses the InputBox function to obtain the string of digits, CInt to convert the string to type Integer , and ChrW to convert the number to type Char .

CDate Example

The following example uses the CDate function to convert strings to Date values. In general, hard-coding dates and times as strings (as shown in this example) is not recommended. Use date literals and time literals, such as #Feb 12, 1969# and #4:45:23 PM#, instead.

CDbl Example

CDec Example

The following example uses the CDec function to convert a numeric value to Decimal .

CInt Example

The following example uses the CInt function to convert a value to Integer .

CLng Example

The following example uses the CLng function to convert values to Long .

CObj Example

The following example uses the CObj function to convert a numeric value to Object . The Object variable itself contains only a four-byte pointer, which points to the Double value assigned to it.

CSByte Example

The following example uses the CSByte function to convert a numeric value to SByte .

CShort Example

The following example uses the CShort function to convert a numeric value to Short .

CSng Example

The following example uses the CSng function to convert values to Single .

CStr Example

The following example uses the CStr function to convert a numeric value to String .

The following example uses the CStr function to convert Date values to String values.

CStr always renders a Date value in the standard short format for the current locale, for example, «6/15/2003 4:35:47 PM». However, CStr suppresses the neutral values of 1/1/0001 for the date and 00:00:00 for the time.

For more detail on the values returned by CStr , see Return Values for the CStr Function.

CUInt Example

The following example uses the CUInt function to convert a numeric value to UInteger .

CULng Example

The following example uses the CULng function to convert a numeric value to ULong .

CUShort Example

The following example uses the CUShort function to convert a numeric value to UShort .

Источник

Функции преобразования типов (Visual Basic)

Эти функции компилируются встроенным образом, то есть код преобразования является частью кода, который вычисляет выражение. Иногда нет вызова процедуры для выполнения преобразования, что повышает производительность. Каждая функция принудает выражение к конкретному типу данных.

Синтаксис

Часть

expression
Обязательный. Любое выражение исходного типа данных.

Тип данных возвращаемого значения

Имя функции определяет тип данных возвращаемого значения, как показано в следующей таблице.

Имя функции	Тип возвращаемых данных	Диапазон для expression аргумента
CBool	Логический тип данных	Любое допустимое Char или String числовое выражение.
CByte	Тип данных Byte	Byte.MinValue (0) до Byte.MaxValue (255) (без знака); дробные части округляются. 1 Начиная с Visual Basic 15.8, Visual Basic оптимизирует производительность преобразования с плавающей запятой в байт с помощью функции. Дополнительные сведения см. в CByte разделе «Примечания». Пример см. в разделе » Пример CInt «.
CChar	Тип данных Char	Любое допустимое Char или String выражение; преобразуется только первый символ String ; значение может составлять от 0 до 65535 (без знака).
CDate	Тип данных Date	Любое допустимое представление даты и времени.
CDbl	Тип данных Double	-1.79769313486231570E+308–-4.94065645841246544E-324 для отрицательных значений; 4.94065645841246544E-324–1.79769313486231570E+308 для положительных значений.
CDec	Тип данных Decimal	+/-79,228,162,514,264,337,593,543,950,335 для нулевые числа, то есть числа без десятичных разрядов. Для чисел с 28 десятичными разрядами диапазон — +/-7.9228162514264337593543943950335. Наименьшее возможное ненулевое число — 0,00000000000000000000000001 (+/-1E-28).
CInt	Целочисленный тип данных	Int32.MinValue (-2 147 483 648) до Int32.MaxValue (2 147 483 647); дробные части округляются. 1 Начиная с Visual Basic 15.8, Visual Basic оптимизирует производительность преобразования с плавающей запятой в целочисленное с помощью функции. Дополнительные сведения см. в CInt разделе «Примечания». Пример см. в разделе » Пример CInt «.
CLng	Тип данных Long	Int64.MinValue (-9 223 372 036 854 775 808) до Int64.MaxValue (9 223 372 036 854 775 807); дробные части округляются. 1 Начиная с Visual Basic 15.8, Visual Basic оптимизирует производительность преобразования с плавающей запятой до 64-разрядного целого числа с помощью функции. Дополнительные сведения см. в CLng разделе «Примечания». Пример см. в разделе » Пример CInt «.
CObj	Object Data Type	Любое допустимое выражение.
CSByte	Тип данных SByte	SByte.MinValue (–128) до SByte.MaxValue (127); дробные части округляются. 1 Начиная с Visual Basic 15.8, Visual Basic оптимизирует производительность преобразования с плавающей запятой на подписанный байт с помощью функции. Дополнительные сведения см. в CSByte разделе «Примечания». Пример см. в разделе » Пример CInt «.
CShort	Тип данных Short	Int16.MinValue (-32 768) до Int16.MaxValue (32 767); дробные части округляются. 1 Начиная с Visual Basic 15.8, Visual Basic оптимизирует производительность преобразования с плавающей запятой до 16-разрядного целого числа с помощью функции. Дополнительные сведения см. в CShort разделе «Примечания». Пример см. в разделе » Пример CInt «.
CSng	Тип данных Single	-3.402823E+38–-1.401298E-45 для отрицательных значений; От 1.401298E-45 до 3.402823E+38 для положительных значений.
CStr	Тип строковых данных	Возвращает значение для CStr зависимости от аргумента expression . См. возвращаемые значения для функции CStr.
CUInt	Тип данных UInteger	UInt32.MinValue (0) до UInt32.MaxValue (4 294 967 295) (без знака); дробные части округляются. 1 Начиная с Visual Basic 15.8, Visual Basic оптимизирует производительность преобразования с плавающей запятой до целого числа без знака с помощью функции. Дополнительные сведения см. в CUInt разделе «Примечания». Пример см. в разделе » Пример CInt «.
CULng	Тип данных ULong	UInt64.MinValue (0) до UInt64.MaxValue (18 446 744 073 709 551 615) (без знака); дробные части округляются. 1 Начиная с Visual Basic 15.8, Visual Basic оптимизирует производительность преобразования с плавающей запятой до целого числа без знака с помощью функции. Дополнительные сведения см. в CULng разделе «Примечания». Пример см. в разделе » Пример CInt «.
CUShort	Тип данных UShort	UInt16.MinValue (0) до UInt16.MaxValue (65 535) (без знака); дробные части округляются. 1 Начиная с Visual Basic 15.8, Visual Basic оптимизирует производительность с плавающей запятой до 16-разрядного преобразования целых чисел без знака с помощью функции; дополнительные сведения см. в CUShort разделе «Примечания». Пример см. в разделе » Пример CInt «.

1 Дробные части могут быть подвержены особому типу округления, называемого округлением банкира. Дополнительные сведения см. в разделе «Примечания».

Как правило, следует использовать функции преобразования типов Visual Basic в предпочтениях методов платформа .NET Framework, таких как ToString() Convert класс или в отдельной структуре типа или классе. Функции Visual Basic предназначены для оптимального взаимодействия с Visual Basic кодом, а также упрощают чтение исходного кода. Кроме того, методы преобразования платформа .NET Framework не всегда создают те же результаты, что и функции Visual Basic, например при преобразовании Boolean Integer в . Дополнительные сведения см. в разделе «Устранение неполадок типов данных».

Начиная с Visual Basic 15.8, производительность преобразования с плавающей запятой в целочисленное значение оптимизируется при передаче Single или значении, возвращаемых следующими методами в одну из функций преобразования целых чисел ( CByte , , CShort , CInt CLng , CUShort CSByte : CUInt CULng ):Double

Эта оптимизация позволяет коду выполнять большое количество целых преобразований до двух раз быстрее. В следующем примере показаны следующие оптимизированные преобразования с плавающей запятой в целые числа:

Поведение

Принуждения. Как правило, можно использовать функции преобразования типов данных, чтобы привести результат операции к конкретному типу данных, а не к типу данных по умолчанию. Например, используйте для CDec принудительной арифметики десятичных знаков в случаях, когда обычно происходит арифметика с одной точностью, двойной точностью или целочисленным арифметиком.

Неудачные преобразования. Если переданный expression функции находится за пределами диапазона типа данных, в который он должен быть преобразован, возникает ошибка OverflowException .

Дробные части. При преобразовании неинтегрального значения в целочисленный тип функции преобразования целых чисел ( CByte , , CInt , , CLng , CSByte , CULng CShort CUInt и CUShort ) удалите дробную часть и округлите значение до ближайшего целого числа.

Если дробная часть равна ровно 0,5, то целочисленное преобразование округляет его до ближайшего даже целого числа. Например, 0,5 округляется до 0, а 1,5 и 2,5 округляется до 2. Иногда это называется округлением банкира, и его целью является компенсация предвзятости, которая может накапливаться при добавлении многих таких чисел вместе.

CInt и CLng отличаются от Int функций Fix , которые усечения, а не округления, дробной части числа. Кроме того, Fix всегда Int возвращается значение того же типа данных, что и при передаче.

Преобразования даты и времени. IsDate Используйте функцию, чтобы определить, можно ли преобразовать значение в дату и время. CDate распознает литералы даты и литералы времени, но не числовые значения. Чтобы преобразовать значение Visual Basic 6.0 Date в Date значение в Visual Basic 2005 или более поздних версиях, можно использовать DateTime.FromOADate этот метод.

Нейтральные значения даты и времени. Тип данных Date всегда содержит сведения о дате и времени. Для преобразования типов Visual Basic считает 1/0001 (1 января 1 года) нейтральным значением даты, а 00:00:00 (полночь) — нейтральным значением для времени. При преобразовании Date значения в строку CStr не включает нейтральные значения в результирующую строку. Например, при преобразовании #January 1, 0001 9:30:00# в строку результатом будет «9:30:00»; сведения о дате подавляются. Однако сведения о дате по-прежнему присутствуют в исходном Date значении и могут быть восстановлены с помощью таких функций, как DatePart функция.

Конфиденциальность языка и региональных параметров. Функции преобразования типов, включающие строки, выполняют преобразования на основе текущих параметров языка и региональных параметров для приложения. Например, CDate распознает форматы дат в соответствии с языковым стандартом системы. Необходимо указать день, месяц и год в правильном порядке для языкового стандарта, или дата может быть неправильно интерпретирована. Длинный формат даты не распознается, если он содержит строку дня недели, например «среда».

Если необходимо преобразовать или из строкового представления значения в формате, отличном от указанного языковым стандартом, нельзя использовать функции преобразования типов Visual Basic. Для этого используйте ToString(IFormatProvider) методы Parse(String, IFormatProvider) этого типа значения. Например, используйте Double.Parse при преобразовании строки в строку Double и используйте Double.ToString при преобразовании значения типа Double в строку.

CType Function

Функция CType принимает второй аргумент и приводит expression к typename тому, typename что typename может быть любым типом данных, структурой, классом или интерфейсом, в который существует допустимое преобразование.

Сравнение с другими ключевыми словами CType преобразования типов см. в разделе «Оператор DirectCast » и «Оператор TryCast».

Пример CBool

В следующем примере функция используется CBool для преобразования выражений в Boolean значения. Если выражение принимает ненулевое значение, CBool возвращается True ; в противном случае возвращается False .

Пример CByte

В следующем примере функция используется CByte для преобразования выражения в . Byte

Пример CChar

В следующем примере функция используется CChar для преобразования первого символа String выражения в Char тип.

Входной аргумент CChar должен иметь тип Char данных или String . Нельзя использовать для CChar преобразования числа в символ, так как CChar не удается принять числовой тип данных. В следующем примере получается число, представляющее кодовую точку (код символа) и преобразует ее в соответствующий символ. Она использует InputBox функцию для получения строки цифр, CInt преобразования строки в тип Integer и ChrW преобразования числа в тип Char .

Пример CDate

В следующем примере функция используется CDate для преобразования строк в Date значения. Как правило, не рекомендуется жестко кодировать даты и время в виде строк (как показано в этом примере). Используйте литералы даты и временные литералы, например #Feb 12, 1969# и #4:45:23 PM#.

Пример CDbl

Пример CDec

В следующем примере функция используется CDec для преобразования числового значения в Decimal .

Пример CInt

В следующем примере функция используется CInt для преобразования значения Integer в .

Пример CLng

В следующем примере функция используется CLng для преобразования значений в Long .

Пример CObj

В следующем примере функция используется CObj для преобразования числового значения в Object . Сама Object переменная содержит только четырехбайтовый указатель, указывающий на значение, назначенное Double ему.

Пример CSByte

В следующем примере функция используется CSByte для преобразования числового значения в SByte .

Пример CShort

В следующем примере функция используется CShort для преобразования числового значения в Short .

Пример CSng

В следующем примере функция используется CSng для преобразования значений в Single .

Пример CStr

В следующем примере функция используется CStr для преобразования числового значения в String .

В следующем примере функция используется CStr для преобразования Date значений в String значения.

CStr всегда отображает Date значение в стандартном коротком формате для текущего языкового стандарта, например «6.15.2003 4:35:47 PM». CStr Однако подавляет нейтральные значения 1/1/0001 для даты и 00:00:00 за время.

Дополнительные сведения о значениях, возвращаемых функцией CStr CStr, см. в разделе «Возвращаемые значения».

Пример CUInt

В следующем примере функция используется CUInt для преобразования числового значения в UInteger .

Пример CULng

В следующем примере функция используется CULng для преобразования числового значения в ULong .

Пример CUShort

В следующем примере функция используется CUShort для преобразования числового значения в UShort .

Источник

You may be required to convert numbers stored as text to actual numbers in your VBA code. In this tutorial, we are going to go over the functions that you need to use to convert a string to an integer, long, double, decimal or currency data type (Click here to learn about converting numbers to strings)

Convert String to Integer

You can use the CInt or CLng function to convert a string to an integer. If the fraction is less than .5 the function will round down, if the fraction is greater than or equal to .5 the function will round up. The following code will convert a string to an integer:

MsgBox CInt("7.55")

The result is:

The following code uses the CLng function to convert a string to an integer:

MsgBox CLng("13.5")

The result is:

Note: You can use the CInt or CLng function to convert a string to an integer or long (respectively) data types. The Long Data type is the same as an integer data type except larger numbers are allowed. In the past, the distinction was required because of memory constraints. In modern programming, there’s no reason not to use the long data type since memory is no longer an issue. So it’s always better to use a long data type instead of an integer.

You can use the Immediate Window to see how the value would be processed if not converted to an integer:

Debug.Print "13.5" + "13.5"

Usually, the text will be stored as a variable and this variable will need to be converted to a number data type as shown in the code below:

Sub Using_Variables()

Dim valueOne As String
valueOne = 5
MsgBox CLng(valueOne) + CLng(valueOne)

End Sub

Convert String to Decimal

You can use the CDbl or CDec function to convert a string to a decimal. The following code would convert a string to a double data type:

MsgBox CDbl("9.1819")

The result is:

The following code would convert a string to a decimal data type:

MsgBox CDec("13.57") + CDec("13.4")

The result is:

You can use the Immediate Window to see how the value would be processed if not converted to a double or decimal data type:

Debug.Print "13.57" + "13.4"

The result is:

Note: The decimal data type can store larger numbers than the double data type, so it’s always advisable to use the decimal data type when you are uncertain.

Convert String to Currency

You can use the CCur function to convert a string to a currency. The following code would convert a string to a currency data type:

Range("A1").Value = CCur("18.5")

The result is: