powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Преобразовать из числа в текст
8 сообщений из 8, страница 1 из 1
Преобразовать из числа в текст
    #33664378
Михаил
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Привет,

Нашел код, чтобы текст в числа переводить, а мне надо наоборот, чтоб все стало текстом. (не формат представления, а тип хранящихся в ячейках данных)

Не подскажете как его изменить?
(чему присвоить rng.NumberFormat)

Dim cel As Range
Dim rng As Range

Set rng = Worksheets("Rates").Range("B9:B39")
rng.NumberFormat = "0"

For Each cel In rng
cel.Value = cel.Value
Next
...
Рейтинг: 0 / 0
Преобразовать из числа в текст
    #33664382
vkodor
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
@
...
Рейтинг: 0 / 0
Преобразовать из числа в текст
    #33664563
Михаил
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Вот такое ничего не дало...

rng.NumberFormat = "@"
...
Рейтинг: 0 / 0
Преобразовать из числа в текст
    #33664626
Михаил
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Мне нужен эффект того, как я отмечаю область руками, ставлю ей тестовый формат и потом прохожусь по всем ячейкам нажимая F2 и Enter.
...
Рейтинг: 0 / 0
Преобразовать из числа в текст
    #33665265
Михаил
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
В одном документе работает, а в другом нет.
Пытаюсь вытащить закономерность!
...
Рейтинг: 0 / 0
Преобразовать из числа в текст
    #33665408
Михаил
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Вот так заработало, только пробел впереди добавляет!

cel.Value = Str(cel.Value)
...
Рейтинг: 0 / 0
Преобразовать из числа в текст
    #33665482
White Owl
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
c.Value = "" & c.Text
...
Рейтинг: 0 / 0
Преобразовать из числа в текст
    #33665653
Михаил
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Спасибо!
Работает даже просто так:

= cel.Text
...
Рейтинг: 0 / 0
8 сообщений из 8, страница 1 из 1
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Преобразовать из числа в текст
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]