Excel VBA: Форматирование ячейки как текста (3 метода)

  • Поделись Этим
Hugh West

В этой статье показано, как формат a ячейка в качестве текст используя VBA код в Excel с помощью 3 различных методов. С помощью Текст и Функции форматирования , и Диапазон . NumberFormat собственность Мы можем установить код формата числа, чтобы легко преобразовать значение ячейки в текст. Давайте погрузимся в примеры и применим эти техники.

Скачать Рабочую тетрадь для практических занятий

Скачайте эту рабочую тетрадь для тренировок, чтобы заниматься во время чтения этой статьи.

Формат ячейки как текст.xlsm

3 подходящих метода форматирования ячеек как текста с помощью VBA в Excel

В этом разделе мы покажем, как можно отформатировать ячейку как текст с помощью VBA в Excel. Но сначала нам нужно знать, как открыть окно редактора visual basic в excel.

Написать код в редакторе Visual Basic

Следуйте за шаги на открыть сайт редактор визуального базового языка и написать там код.

  • Перейти к Разработчик на вкладке Лента Excel .
  • Нажмите сайт Опция Visual Basic.

  • В Visual Basic для приложений окно, нажмите кнопку Вставка выпадающего списка на выберите сайт Новый модуль

Теперь, когда новый модуль это открыт , напишите там код и нажмите F5 на бежать.

1. Использование свойства Range.NumberFormat для форматирования ячейки как текста

В этом примере мы будем использовать Свойство Range.NumberFormat в нашем код VBA на формат a ячейка в качестве текст На скриншоте ниже, в ячейке C5 у нас есть короткая дата что мы собираемся изменить в качестве текст .

Теперь в редакторе visual basic копия и паста следующий код .

 Sub FormatCellAsText() Range("C5").NumberFormat = "@" End Sub 

Теперь нажмите F5 на запустить код.

Здесь мы видим короткая дата отформатированная ячейка изменен к текстовое значение .

Код Объяснение:

  • Мы использовали Объект диапазона на выберите сайт ячейка в рабочем листе, которые содержат вход
  • На формат сайт входное значение в качестве текст нам нужно поставить NumberFormat значение в качестве "@".

Аналогично, применив тот же самый фрагмент кода, мы можем изменить различные форматы чисел на текст .

Читать далее: Как форматировать ячейки и центрировать текст с помощью Excel VBA (5 способов)

Похожие чтения

  • Как изменить размер шрифта всего листа с помощью Excel VBA
  • Как написать 001 в Excel (11 эффективных методов)
  • Выравнивание текста с помощью командной кнопки VBA в Excel (5 методов)
  • Как добавить текст после числа с помощью пользовательского формата в Excel (4 способа)
  • Как написать первую букву каждого слова в Excel (4 способа)

2. Использование функции TEXT в коде VBA для форматирования ячейки как текста

Сайт T EXT функция в Excel является функция рабочего листа что преобразует a числовое значение или строка к заданный формат . Хотя это не a функция VBA мы можем использовать его, ссылаясь на Объект функции рабочего листа на формат a ячейка на текст Допустим, у нас есть Длительная дата в клетка B6 что мы хотим формат в качестве текст .

Положите следующий код в редактор визуального базового языка для достижения этой цели.

 Sub FormatCellAsText() Range("C6") = WorksheetFunction.Text(Range("B6"), "'0") End Sub 

На сайте работает код с помощью F5 преобразованный сайт длительная дата в текст Аналогично мы можем отформатировать ячейку, содержащую значение различные форматы чисел на текст .

Код Объяснение:

  • Мы использовали Объект диапазона на выберите сайт клетки в рабочем листе, которые содержат вход и выходные значения.
  • Сайт Объект WorksheetFunction позволило нам использовать функция ТЕКСТ в код VBA .
  • Сайт функция ТЕКСТ нуждается в 2 аргумента.

значение - тот ссылка на ячейку ввода (в данном примере B6 ).

формат_текста мы использовали " ' 0 " на конвертировать сайт значение на текстовый формат.

Читать далее: Как отформатировать текст в ячейке Excel (10 подходов)

3. Использование функции форматирования VBA для форматирования ячейки как текста в Excel

Сайт Функция форматирования является одним из функции преобразования в VBA Excel. Это возвращает форматированное выражение на основе формат то есть указанный как второй аргумент из функция В данном примере, используя следующий код мы заветный a Длительная дата в камере C5 к текст .

 Sub FormatCellAsText() Range("C6").Value = Format(Range("B6").Value, "'0") End Sub 

Код Объяснение:

  • Мы использовали Объект диапазона на выберите сайт клетки в рабочем листе, которые содержат вход и выходные значения.
  • Сайт Функция форматирования нуждается в 2 аргумента.

выражение - тот ссылка на ячейку ввода (в данном примере B6 ).

формат - мы использовали " ' 0 " на конвертировать сайт значение на текстовый формат.

Альтернативный код:

 Sub FormatCellAsText() Range("C6").Value = " ' " & Format(Range("B6").Value, "0") End Sub 

Читать далее: Как отформатировать текст так, чтобы первая буква была заглавной в Excel (10 способов)

Примечания

  • Мы добавили одинарная кавычка ( ' ) до ноль чтобы войти в код формата номера в качестве " ' 0 " в Текст и Аргумент функции форматирования на формат a ячейка к текстовое значение.
  • На просмотреть сайт код связанных с 3 различными методами, нажмите сайт правая кнопка на название листа и выберите сайт Опция "Просмотр кода".

Заключение

Теперь мы знаем, как отформатировать ячейку как текст с помощью кода VBA в Excel на 3 различных примерах. Надеемся, что это поможет вам более уверенно использовать эти методы. Любые вопросы или предложения не забудьте оставить в поле для комментариев ниже.

Хью Уэст — опытный тренер и аналитик Excel с более чем 10-летним опытом работы в отрасли. Он имеет степень бакалавра в области бухгалтерского учета и финансов и степень магистра делового администрирования. Хью страстно любит преподавать и разработал уникальный подход к обучению, которому легко следовать и который легко понять. Его экспертные знания Excel помогли тысячам студентов и специалистов по всему миру улучшить свои навыки и преуспеть в своей карьере. В своем блоге Хью делится своими знаниями со всем миром, предлагая бесплатные учебные пособия по Excel и онлайн-обучение, чтобы помочь отдельным лицам и компаниям полностью раскрыть свой потенциал.