Тип одиночной переменной
VBA Одинокий тип данных используется для хранения чисел, требующих десятичных знаков. Он может хранить от -3,4028235E + 38 до -1,401298E-45 для отрицательных значений и от 1,401298E-45 до 3,4028235E + 38 для положительных значений.
Чтобы объявить переменную Single, вы используете оператор Dim (сокращение от Dimension):
1 | Dim sngA как Single |
Затем, чтобы присвоить значение переменной, просто используйте знак равенства:
1 | sngA = 3658,25 |
Ввод этого в процедуру выглядит так:
12345678 | Sub sngExample ()'объявить двойную переменнуюDim sngA как Single'заполнить двойную переменнуюsngA = 3658,25'показать окно сообщенияMsgBox sngAКонец подписки |
Если вы запустите приведенный выше код, появится следующее окно сообщения.
Двойной тип данных
Тип данных Double - это просто более длинная версия Одинокий тип данных. Из-за этого он может влиять на округление при использовании в процедуре в качестве Одинокий тип данных будет округлен до 4 знаков после запятой, а Двойной Тип данных округляется до 12 знаков после запятой. Если вам нужно более 4 десятичных знаков, вы можете использовать тип данных Double.
Типы данных Int или Long
Если десятичный разряд не нужен, можно использовать либо тип данных Int, либо тип данных Long.
1 | Dim intA как целое число |
1 | Dim lngB как Long |
Программирование на VBA | Генератор кода действительно работает для вас!
Объявление единственной переменной на модульном или глобальном уровне
В предыдущих примерах мы объявили Одинокий переменная внутри процедуры. Переменные, объявленные с помощью процедуры, могут использоваться только внутри этой процедуры.
Вместо этого вы можете объявить одиночные переменные на модульном или глобальном уровне.
Уровень модуля
Уровень модуля переменные объявляются в верхней части модулей кода с Тусклый утверждение.
Эти переменные можно использовать с любой процедурой в этом модуле кода.
Глобальный уровень
Глобальный уровень переменные также объявляются в верхней части модулей кода. Однако вместо использования Тусклый заявление, используйте Общественные заявление, чтобы указать, что Одинокий переменная доступна для использования в вашем проекте VBA.
1 | Public SngA как одиночный |
Если бы вы объявили Одинокий переменная на уровне модуля, а затем попытаться использовать ее в другом модуле, произойдет ошибка.
Однако, если вы использовали ключевое слово Public для объявления Одинокий переменной, ошибка не возникнет, и процедура будет работать безупречно.
Устали искать примеры кода VBA? Попробуйте AutoMacro!
Форматирование одиночного файла, сохраненного в виде строки
Может быть, в какой-то момент вы захотите преобразовать один тип данных в строку - например, вы можете отобразить символ валюты и округлить число до двух знаков после запятой.
Для этого вы используете функцию форматирования.
Следующая процедура
1234567891011 | Sub TestSingleToCurrencyString ()'объявить строковую переменнуюDim strMoney как строка'объявить сингл и заполнить значениеDim sngValue As SinglesngValue = 44055.256'преобразовать одиночный символ в строку с символом валюты с двумя десятичными знакамиstrMoney = Format (sngValue, "$ #, ## 0.00")'посмотреть результатMsgBox strMoneyКонец подписки |
вернет этот результат:
Точно так же вы можете отобразить номер как отформатированный номер телефона.
Эта процедура:
1234567891011 | Sub TestSingleToPhone ()'объявить строковую переменнуюDim strPhone As String'объявить сингл и заполнить значениеDim sglValue As singlesglValue = 555968541'преобразовать сингл в строку с символом валютыstrPhone = Format (sglValue, "(000) -000 0000")'посмотреть результатMsgBox strPhoneКонец подписки |
вернет этот результат: