ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Как избавиться от ошибки???
5 сообщений из 5, страница 1 из 1
Как избавиться от ошибки???
    #34590311
redsky
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
redsky
Участник
В БОЛЬШОЙ ТАБЛИЦЕ есть ячейки с числами, но на них стоит ошибка: "Число сохранено как текст".
Надо либо:
1. "преобразовать в число" ИМЕННО ТЕ ячейки, где выдаётся ошибка, либо
2. задать для страницы числовой формат - "общий" и ВСЁ пройти ДВОЙНЫМИ КЛИКАМИ.
Как это сделать кодом???
...
Рейтинг: 0 / 0
12.06.2007, 22:05
| Ответить | Цитировать | Написать  
Как избавиться от ошибки???
    #34590527
Фотография klen_
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
klen_
Участник
поиск по слову NumberFormat, поможет ответить на твой вопрос
...
Рейтинг: 0 / 0
13.06.2007, 07:40
| Ответить | Цитировать | Написать  
Как избавиться от ошибки???
    #34590891
redsky
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
redsky
Участник
Кроме NumberFormat:

Код: plaintext
1.
2.
3.
4.
Dim icell As Range
For Each icell In Selection
  icell.Formula = icell.Formula
Next icell

И всё работает :)
...
Рейтинг: 0 / 0
13.06.2007, 10:33
| Ответить | Цитировать | Написать  
Как избавиться от ошибки???
    #34591993
Фотография VladConn
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
VladConn
Участник
Нет, не работает.
...
Рейтинг: 0 / 0
13.06.2007, 15:04
| Ответить | Цитировать | Написать  
Как избавиться от ошибки???
    #34593183
redsky
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
redsky
Участник
Мне подсказали такой вот вариант:
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
' выделите нужный диапазон ячеек и запустите макрос
Sub NumFromText()
Dim icell As Range
Selection.NumberFormat = "General"
 For Each icell In Selection
  icell.Formula = icell.Formula
 Next icell
End Sub
У меня работает.
...
Рейтинг: 0 / 0
13.06.2007, 21:46
| Ответить | Цитировать | Написать  
5 сообщений из 5, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Как избавиться от ошибки???
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=60&msg=34590311&tid=2163869]:
 0ms
get settings:
 7ms
get forum list:
 20ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 178ms
get topic data:
 10ms
get forum data:
 3ms
get page messages:
 68ms
get tp. blocked users:
 2ms
others: 252ms
total:  548ms
созд. / загр.: 548ms
x
x
Закрыть


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