Гость
Войти | Профиль | Очистить
Действия ...
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / преобразование / 5 сообщений из 5, страница 1 из 1
27.05.2016, 22:06
    #39245334
Ekael
Ekael
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
преобразование
Добрый вечер, такой вопрос.
Имеется ячейка с числовым форматом, в которой записано число.Надо через vba число, которое находиться в этой ячейке в числовом формате преобразовать в текстовой формат.
Код: vbnet
1.
2.
3.
4.
dim a as integer ' a - переменная
dim b as string
a = worksheets(1).cells(1,1) 'cells(1,1) в этой ячейке находиться число
a.value = b.string 'выбивает ошибку
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
27.05.2016, 22:25
    #39245336
Shocker.Pro
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
преобразование
Ekael
Код: vbnet
1.
a.value = b.string 'выбивает ошибку

где вы взяли такой синтаксис и что вообще вы хотели этим сказать?

Да и в целом непонятно, что нужно сделать с числом после преобразования в текстовый формат.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
27.05.2016, 22:30
    #39245339
Ekael
Ekael
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
преобразование
Shocker.Pro,
С числом после преобразования ничего делать не надо, к примеру в ячейке с числовым форматом была цифра 1, а после преобразования в ней остаётся единица но только формат ячейки уже текстовый
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
27.05.2016, 22:38
    #39245340
Shocker.Pro
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
преобразование
1) включить запись макроса
2) поменять формат ячейки
3) остановить запись макроса
4) посмотреть, что записалось
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
28.05.2016, 10:29
    #39245393
The_Prist
The_Prist
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
преобразование
Вроде бы простым изменением формата не поправить - после изменения формата надо же и само значение еще изменить. И то, насколько помню, если это делать макросом, то ничего не получится.

А вот так(даже без изменения формата ячейки - только изменяя формат самого значения) будет нормально работать:
Код: vbnet
1.
2.
3.
4.
5.
6.
7.
dim a as Long ' лучше Long, т.к. число может быть и больше 32767
a = worksheets(1).cells(1,1).Value 'запоминаем число в ячейке
'эта строка вообще по всем параметрам неправильная
'a.value = b.string
'записываем в ячейку Cells(1,1) значение переменной а, преобразованное в текст
'при помощи встроенной функции преобразования CStr()
worksheets(1).cells(1,1).Value = CStr(a)


а можно еще проще:
Код: vbnet
1.
worksheets(1).cells(1,1).Value = CStr(worksheets(1).cells(1,1).Value)


или
Код: vbnet
1.
worksheets(1).cells(1,1).Value = "'" & worksheets(1).cells(1,1).Value
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / преобразование / 5 сообщений из 5, страница 1 из 1
Целевая тема:
Создать новую тему:
Автор:
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
созд. / загр.: 166ms
Закрыть
start [/forum/topic.php?fid=60&tablet=1&tid=2155527]:
 0ms
get settings:
 9ms
get forum list:
 12ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 65ms
get topic data:
 11ms
get forum data:
 3ms
get page messages:
 45ms
get tp. blocked users:
 2ms
others: 13ms
total:  166ms
x
x
Закрыть


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