Функция формата VBA

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

Форматирование Функция

Форматирование чисел с помощью предопределенных форматов

Функция форматирования может преобразовывать число в строку, отформатированную с помощью предопределенных именованных числовых форматов. Эти предопределенные форматы: Валюта, Фиксированный, Стандартный, Процентный, Научный, Да / Нет, Истина / Ложь и Вкл / Выкл.

12345678910111213141516171819202122232425262728293031 Sub FormatExample_1 ()MsgBox Format (1234567.8) 'Результат: 1234567,8'Формат просто оставляет число как естьMsgBox Format (1234567.8, «Валюта») »Результат: 1 234 567,80 долларов США.'Валюта использует настройки валюты системыMsgBox Format (1234567.8, "Fixed") 'Результат: 1234567.80'Исправлено: минимум одна цифра перед десятичной точкой и'использует системные настройки для десятичной частиMsgBox Format (1234567.8, "Стандартный") 'Результат: 1 234 567,80'Стандарт: разделители тысяч и стандартная системаMsgBox Format (1234567.8, "Percent") 'Результат: 123456780.00%'Процент, умноженный на 100 с% и стандартной системой.MsgBox Format (1234567.8, "Scientific") 'Результат: 1.23E + 06'Научная нотацияФормат MsgBox (1234567.8, «Да / Нет») »Результат: Да'Нет, если число равно нулюMsgBox Format (1234567.8, "True / False") 'Результат: True'False, если число равно нулюMsgBox Format (1234567.8, «Вкл. / Выкл.») »Результат: Вкл.'Выкл, если число равно нулюКонец подписки

Форматирование чисел с помощью форматов, определяемых пользователем

Функция форматирования может преобразовывать число в строку, отформатированную в определяемых пользователем числовых форматах. 0 - это цифра-заполнитель, которая отображает цифру или ноль. # - это заполнитель цифры, который отображает цифру или ничего. Точка (.) - это десятичный заполнитель,% - процентный заполнитель, а запятая (,) - разделитель тысяч. Текст можно добавить в формате, используя двойные кавычки («»), и можно добавить один символ, если он используется после обратной косой черты (\).

1234567891011 Подформат Пример_2 ()MsgBox Format (7.8, "000.00") 'Результат: 007.80MsgBox Format (12347.8356, "000.00") 'Результат: 12347.84MsgBox Format (7.8, "###. ##") 'Результат: 7.8MsgBox Format (12347.8356, "###. ##") 'Результат: 12347.84MsgBox Format (7.8, "\ $. 00") 'Результат: $ 7.80MsgBox Format (1237.835, "ABA0.00") 'Результат: ABA1237.84MsgBox Format (12347.8356, "000.00%") 'Результат: 1234783.56%MsgBox Format (12347.8356, "% 000.00") 'Результат:% 12347.84Конец подписки

Форматирование чисел в зависимости от значений

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

1234567 Дополнительный форматExample_3 ()MsgBox Format (7.8, "000.00; (000.00); \ z \ e \ r \ o; ничего") 'Результат: 007.80MsgBox Format (-7.8, "000.00; (000.00); \ z \ e \ r \ o; ничего") 'Результат: (007.80)MsgBox Format (0, "000.00; (000.00); \ z \ e \ r \ o; ничего") 'Результат: нольMsgBox Format (Null, "000.00; (000.00); \ z \ e \ r \ o; ничего") 'Результат: ничегоКонец подписки

Форматирование дат с предварительно заданными форматами

Функция форматирования может форматировать даты в различных предопределенных форматах. Это длинные, средние и короткие даты, а также длинные, средние и короткие сроки.

1234567891011121314 Дополнительный форматExample_4 ()Dim DateEx как датаDateEx = # 18.04.2020 19:35:56 #MsgBox Format (DateEx, "General Date") 'Результат: 18.04.2020 19:35:56 PMMsgBox Format (DateEx, "Long Date") 'Результат: суббота, 18 апреля 2022 г.MsgBox Format (DateEx, "Medium Date") 'Результат: 18-апр-20MsgBox Format (DateEx, "Short Date") 'Результат: 18.04.2020MsgBox Format (DateEx, "Long Time") 'Результат: 19:35:56 PMMsgBox Format (DateEx, "Среднее время") 'Результат: 19:35MsgBox Format (DateEx, "Short Time") 'Результат: 19:35Конец подписки

Форматирование дат с помощью пользовательских форматов

Функция форматирования может форматировать даты с помощью пользовательских форматов. Такие символы, как d, m, y, w, q, можно использовать для создания пользовательских форматов даты.

123456789101112131415161718192021222324 Дополнительный форматExample_5 ()Dim DateEx как датаDateEx = # 18.04.2020 19:35:56 #MsgBox Format (DateEx, «м / д / гг») »Результат: 18.04.2020Формат MsgBox (DateEx, "мм-дд-гг") 'Результат: 18.04.2020Формат MsgBox (DateEx, "ммм-дд-гг") 'Результат: 18 апреля 2020 г.MsgBox Format (DateEx, "мммм-дд-гг") 'Результат: 18 апреля 2020 г.MsgBox Format (DateEx, "мм-ддд-гг") 'Результат: 04-сб-2020MsgBox Format (DateEx, "мм-дддд-гг") 'Результат: 04-суббота-2020Формат MsgBox (DateEx, "y")Результат: 109'количество дней в году 1-366Формат MsgBox (DateEx, "ww")Результат: 16'номер недели в году 1-52Формат MsgBox (DateEx, "q")Результат: 2'квартал в году 1-4Конец подписки

Для создания пользовательских форматов времени можно использовать такие символы, как h, n, s и am, pm.

123456789101112 Дополнительный форматExample_6 ()Dim DateEx как датаDateEx = # 18.04.2020 19:06:05 #MsgBox Format (DateEx, "h: n: s") 'Результат: 19: 6: 5MsgBox Format (DateEx, "hh: nn: ss") 'Результат: 19:06:05MsgBox Format (DateEx, "чч: nn: ss am / pm") 'Результат: 19:06:05 pmMsgBox Format (DateEx, "чч: nn: ss AM / PM") 'Результат: 19:06:05 PMMsgBox Format (DateEx, "hh: nn: ss a / p") 'Результат: 07:06:05 pMsgBox Format (DateEx, "hh: nn: ss A / P") 'Результат: 07:06:05 PКонец подписки

Формат для лучшей читаемости

Функция форматирования может форматировать строки или числа для лучшей читаемости. @ - это символ-заполнитель, используемый для отображения символа или пробела. & - это символ-заполнитель, используемый для отображения символа или ничего. ! может использоваться для использования заполнителей символов слева направо и может использоваться для принудительного использования нижнего или верхнего регистра. Может быть полезно при форматировании телефонных номеров или других больших чисел без изменения исходного значения.

12345678910111213141516171819202122 Дополнительный форматExample_7 ()Dim StrEx как строкаStrEx = "ABCdef"Формат MsgBox (StrEx, "- @@@ - @@ - @@") 'Результат: - AB-Cd-efMsgBox Format (StrEx, "- &&& - && - &&") 'Результат: -AB-Cd-ef'Начинается справа налево.Формат MsgBox (StrEx, "- @@@ - @@ - @@ - @@") 'Результат: - -AB-Cd-efMsgBox Format (StrEx, "- &&& - && - && - &&") 'Результат: --AB-Cd-ef'Начинается справа налево. Когда символов нет, @ добавляет пробелы, а & ничего не добавляетФормат MsgBox (StrEx, "! - @@@ - @@ - @@ - @@") 'Результат: -ABC-de-f -MsgBox Format (StrEx, "! - &&& - && - && - &&") 'Результат: -ABC-de-f'Начинается слева направо из-за!MsgBox Format (StrEx, ">") 'Результат: ABCDEFMsgBox Format (StrEx, "<") 'Результат: abcdefФормат MsgBox (1234567890, «@@@ - @@@ - @@@@») »Результат: 123-456-7890Формат MsgBox (1234567890, "@@@@ - @@@ - @@@") 'Результат: 1234-567-890Конец подписки

Шаблоны форматирования в ячейках рабочего листа

Функцию форматирования можно использовать в коде VBA, а также в ячейках листов. Выделите ячейку или диапазон ячеек и следуйте пункту меню «Формат ячеек»> «Пользовательский». Существует множество форматов, определяемых пользователем, а также пользователь может создавать свои собственные форматы.

Шаблоны форматирования с текстовой формулой

Функция форматирования может напрямую изменять формат значения внутри кода VBA. Мы также можем использовать формулу Excel Text, чтобы получить тот же результат, используя WorksheetFunction.Text.

1234567891011 Дополнительный форматExample_8 ()Формат MsgBox (7,8, "000.00")Результат: 007.80MsgBox WorksheetFunction.Text (7,8, "000.00")Результат: 007.80Формат MsgBox (7.8, «###. ##»)Результат: 7,8MsgBox WorksheetFunction.Text (7.8, «###. ##»)Результат: 7,8Конец подписки

Вы поможете развитию сайта, поделившись страницей с друзьями

wave wave wave wave wave