Как выбрать в массив только ячейки содержащие числа? / Visual Basic

ReSQL.ru

Мобильная версия Контакт Правила FAQ Помощь

Гость

Войти | Регистрация | Профиль | Очистить

Новые сообщения | Избранное

Форумы | Пользователи | Статистика | Мод. лог | Поиск

Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр

Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Как выбрать в массив только ячейки содержащие числа?

6 сообщений из 6, страница 1 из 1

Как выбрать в массив только ячейки содержащие числа?

#39049439

kos20

Участник

Сообщения: 531

Рейтинг: 0 / 0

Всем привет! есть табличка, из которой нужно выбрать ячейки содержащие только цифры (ячейки с цифрами и текстом расположены в перемешку).
Пытаюсь все засунуть в такой код, но почемуто массив наполянется и нудевыми ячейками и ячейками, которые содержат "-" или пробел. Как испровить, подскажите пож-ста

Сам код здесь:

Код: vbnet

1.
2.
3.
4.
5.
6.
7.
8.

 If Sheets("Лист1").Cells(i, j) = "Код" Then
      End If
       If dd = 1 And IsNumeric(Sheets("Лист1").Cells(i, j)) = True _
                 And IsEmpty(Sheets("Лист1").Cells(i, j)) = False _
                 And IsNull(Sheets("Лист1").Cells(i, j)) = False _
                 Then
          arr(i, j) = Sheets("Лист1").Cells(i, j)
.......

...

Рейтинг:

0 / 0

11.09.2015, 16:44

| Ответить | Цитировать | Написать

Как выбрать в массив только ячейки содержащие числа?

#39049444

Shocker.Pro

Участник

Откуда: ->|<- :адуктО

Сообщения: 23 134

Рейтинг: 0 / 0

Цифры? Или числа? Или ячейки, имеющие числовой тип?

Тестовый файл приложите

...

Рейтинг:

0 / 0

11.09.2015, 16:48

| Ответить | Цитировать | Написать

Как выбрать в массив только ячейки содержащие числа?

#39049467

Казанский

Гость

kos20,
если по F5 - выделить - константы, числа - выбирается то, что нужно, то запишите это действие макрорекордером и потом перебирайте ячейки полученного диапазона циклом For Each.

...

Рейтинг:

0 / 0

11.09.2015, 17:03

| Ответить | Цитировать | Написать

Как выбрать в массив только ячейки содержащие числа?

#39061809

i45

Участник

Сообщения: 8 244

Рейтинг: 0 / 0

kos20,

Код: vbnet

1.
2.
3.
4.
5.
6.
7.

Sub JustDigits()
   Dim oCell As Range

    For Each oCell In Range("A1:B10")
        If Not oCell.Text Like String(Len(oCell.Text), "#") Then MsgBox "Bingo: " & oCell.Address
    Next oCell
End Sub

...

Рейтинг:

0 / 0

26.09.2015, 07:48

| Ответить | Цитировать | Написать

Как выбрать в массив только ячейки содержащие числа?

#39062000

Казанский

Гость

i45, а как же отрицательные числа, дробные числа?
И Not по логике не нужен.

...

Рейтинг:

0 / 0

26.09.2015, 17:18

| Ответить | Цитировать | Написать

Как выбрать в массив только ячейки содержащие числа?

#39062317

i45

Участник

Сообщения: 8 244

Рейтинг: 0 / 0

Казанскийi45, а как же отрицательные числа, дробные числа?
И Not по логике не нужен.

Отсуствие и присутствие NOT есть суть одной ипостаси.
Точки-запятые, минусы-плюсы цифрами не бывают.

...

Рейтинг:

0 / 0

27.09.2015, 12:22

| Ответить | Цитировать | Написать

6 сообщений из 6, страница 1 из 1

Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Как выбрать в массив только ячейки содержащие числа?

Цитировать

Написать

Автор*:

Ввести пароль для входа

Тема*:

Сообщение

Данное сообщение тематическое

Сообщение содержит картинки или видео 18+

Автор:

ВНИМАНИЕ! На данном подфоруме действуют строгие правила. Удостоверьтесь, что ваше сообщение соответствует им!

Форум или тема закрыты для гостей. Необходима авторизация!

Загрузить последнюю сохраненную версию

Вложение:

Вставить как галерею

Максимальный размер вложений: 4,0 МБ, аудио/видео: 8,0 МБ. Картинки большего размера ужимаются, если возможно.

Введите код, изображенный на картинке. Если код нечитаемый, кликните картинку, чтобы загрузить другой вариант.

Отправляя сообщение, я выражаю свое согласие с правилами форума и принимаю пользовательское соглашение.

Читали тему (0):

Читали форум (0):

Пользователи онлайн (0):

start [/forum/topic.php?fid=60&gotonew=1&tid=2155787]:	0ms
get settings:	8ms
get forum list:	13ms
check forum access:	3ms
check topic access:	3ms
track hit:	70ms
get topic data:	12ms
get first new msg:	9ms
get forum data:	3ms
get page messages:	45ms
get tp. blocked users:	1ms
others:	16ms

total:	183ms