Гость
Войти | Профиль | Очистить
Действия ...
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Переменные. Что не так? / 15 сообщений из 15, страница 1 из 1
05.10.2012, 18:42
    #37985911
alexey_grigorov
alexey_grigorov
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Переменные. Что не так?
Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
Dim CompareRange As Variant, x As Variant, y As Variant
   
    Set CompareRange = Worksheets("Запрос из BestOra").Range("j2:j8000")
   Set x = 1
        For Each y In CompareRange
            If y > 300000 Then x = x + 1 And Worksheets("Лист1").Range("ax") = y.Offset(0, -1)
            
        Next y



Где ошибся? Должен брать значение и один за другим проставлять, если y>300000
Модератор: Учимся использовать тэги оформления кода - FAQ
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
05.10.2012, 18:51
    #37985924
Shocker.Pro
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Переменные. Что не так?
And - логический оператор - читаем учебник, а не выдумываем применение операторов из головы.
Код: vbnet
1.
2.
3.
4.
If y > 300000 Then
  x = x + 1
  Worksheets("Лист1").Range("ax") = y.Offset(0, -1)
End If
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
05.10.2012, 18:59
    #37985928
alexey_grigorov
alexey_grigorov
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Переменные. Что не так?
Shocker.Pro,
Так тоже не работает! (( Пишет: Object recuired и показывает на Set x = 1
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
05.10.2012, 19:03
    #37985934
Shocker.Pro
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Переменные. Что не так?
Читаем учебник дальше.
Не Set, а Let
Ведь не ставишь же почему-то Set перед x = x + 1
В общем, не надо выдумывать синтаксис ))

ЗЫ: оператор Let можно опустить
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
05.10.2012, 19:13
    #37985939
alexey_grigorov
alexey_grigorov
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Переменные. Что не так?
Shocker.Pro,

И так тож не работает, уже пробовал. Х меняется, если поставить ("А1") то все значения ставятся в одном поле, только ставалю ("АХ") выдает ошибку! ((
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
05.10.2012, 19:20
    #37985948
qwerty112
qwerty112
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Переменные. Что не так?
alexey_grigorovShocker.Pro,

И так тож не работает, уже пробовал. Х меняется, если поставить ("А1") то все значения ставятся в одном поле, только ставалю ("АХ") выдает ошибку! ((
так исправляй ошибку, чё ты тупиш-то ?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
05.10.2012, 19:24
    #37985952
Shocker.Pro
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Переменные. Что не так?
alexey_grigorovShocker.Pro,

И так тож не работает, уже пробовал. Х меняется, если поставить ("А1") то все значения ставятся в одном поле, только ставалю ("АХ") выдает ошибку! ((

мы в каждой строке будем ошибку теперь исправлять?
Код: vbnet
1.
Range("A"+CStr(x))


может начать с чего-то более простого?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
05.10.2012, 19:35
    #37985964
Казанский
Казанский
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Переменные. Что не так?
С минимальной правкой
Код: vbnet
1.
2.
3.
4.
5.
6.
7.
Dim CompareRange As Variant, x As Variant, y As Variant

Set CompareRange = Worksheets("Лист2").Range("j2:j8000")
x = 1
For Each y In CompareRange
    If y > 300000 Then x = x + 1: Worksheets("Лист1").Range("a" & x) = y.Offset(0, -1)
Next y
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
05.10.2012, 19:47
    #37985978
alexey_grigorov
alexey_grigorov
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Переменные. Что не так?
Спасибо большое! Все получилось. Куда же мне еще обращатся, как не на форум то?! )) Если в книги, то форумы то тогда зачем! )
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
05.10.2012, 19:56
    #37985996
qwerty112
qwerty112
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Переменные. Что не так?
alexey_grigorovКуда же мне еще обращатся, как не на форум то?! )) Если в книги, то форумы то тогда зачем! )
затем, что это не "центр реабилитации идиотов",
и уж как присваиваются значения переменным, - стоит знать ДО того как лезть с вопросами
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
05.10.2012, 20:42
    #37986033
Shocker.Pro
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Переменные. Что не так?
alexey_grigorovКуда же мне еще обращатся, как не на форум то?! )) Если в книги, то форумы то тогда зачем! )Да, в школе тоже можно не учиться. Есть же форум, где можно все спросить и телефон мамы на худой конец.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
05.10.2012, 20:57
    #37986046
катастрофа
катастрофа
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Переменные. Что не так?
Shocker.Pro, ну а вот еще есть категория людей, те тупо вообще стесняются спросить - хоть где наяву, в сети, по моему тоже не фонтан...
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
10.10.2012, 13:43
    #37991641
alexey_grigorov
alexey_grigorov
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Переменные. Что не так?
qwerty112alexey_grigorovКуда же мне еще обращатся, как не на форум то?! )) Если в книги, то форумы то тогда зачем! )
затем, что это не "центр реабилитации идиотов",
и уж как присваиваются значения переменным, - стоит знать ДО того как лезть с вопросами

Тогда сделайте закрытый форум, для гуру таких как вы, чтобы всякие чайники типа меня не задавали по вашему мнению глупых вопросов. Не хотите не отвечайте, а на счет "центр реабилитации идиотов" переборщили. Уважайте человека независимо от того, знает он ДО или нет!
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
10.10.2012, 14:59
    #37991812
Antonariy
Antonariy
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Переменные. Что не так?
alexey_grigorovУважайте человека независимо от того, знает он ДО или нет!Еще чего. Уважение это такая штука, которую зарабатывают, а не требуют.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
10.10.2012, 15:25
    #37991890
Shocker.Pro
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Переменные. Что не так?
Модератор: Вопрос перешел не в ту плоскость.
Согласен с ТС, что qwerty112 переборщил, приношу за него свои извинения
тема закрыта
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Переменные. Что не так? / 15 сообщений из 15, страница 1 из 1
Целевая тема:
Создать новую тему:
Автор:
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
созд. / загр.: 571ms
Закрыть
start [/forum/topic.php?fid=60&tablet=1&tid=2157404]:
 0ms
get settings:
 9ms
get forum list:
 13ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 184ms
get topic data:
 12ms
get forum data:
 2ms
get page messages:
 48ms
get tp. blocked users:
 1ms
others: 294ms
total:  571ms
x
x
Закрыть


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