Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Как избавиться от ошибки??? / 5 сообщений из 5, страница 1 из 1
12.06.2007, 22:05
    #34590311
redsky
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как избавиться от ошибки???
В БОЛЬШОЙ ТАБЛИЦЕ есть ячейки с числами, но на них стоит ошибка: "Число сохранено как текст".
Надо либо:
1. "преобразовать в число" ИМЕННО ТЕ ячейки, где выдаётся ошибка, либо
2. задать для страницы числовой формат - "общий" и ВСЁ пройти ДВОЙНЫМИ КЛИКАМИ.
Как это сделать кодом???
...
Рейтинг: 0 / 0
13.06.2007, 07:40
    #34590527
klen_
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как избавиться от ошибки???
...
Рейтинг: 0 / 0
13.06.2007, 10:33
    #34590891
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, 15:04
    #34591993
VladConn
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как избавиться от ошибки???
Нет, не работает.
...
Рейтинг: 0 / 0
13.06.2007, 21:46
    #34593183
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
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Как избавиться от ошибки??? / 5 сообщений из 5, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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