Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Microsoft Office и VBA программирование > Microsoft Office Excel
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 08.04.2020, 16:02   #1
akula3107
 
Регистрация: 05.02.2017
Сообщений: 9
По умолчанию помогите перебрать числа от 0 до 100

Доброго времени суток. имеется таблица: в колонках A B C D нужно перебрать числа-диапазон от 1 до 100. прибавляя 1 (или ячейку М1, она может меняться, она как размер шага... 2 5 10 )


если колонка А>100 ,то B=B+1, A=0, и опять по новой. так же и с "C" и "D" как в часах или счетчик какой нибудь))


при вводе числа в одну из колонок A B C D меняются значения в строке 6.


не могу сообразить как перебрать эти числа??? а каждое изменение в строке сохранить в файле блокнота подряд без пробелов в строчку.
Изображения
Тип файла: jpg таблица.jpg (82.3 Кб, 2 просмотров)
akula3107 вне форума Ответить с цитированием
Старый 08.04.2020, 16:25   #2
IgorGO
Новичок
СтарожилДжуниор
 
Аватар для IgorGO
 
Регистрация: 05.02.2008
Сообщений: 9,487
По умолчанию

0
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете
IgorGO вне форума Ответить с цитированием
Старый 08.04.2020, 23:12   #3
Elixi
Форумчанин
 
Регистрация: 10.05.2019
Сообщений: 163
По умолчанию

или, возможно, так?
Вложения
Тип файла: xls перебор.xls (39.0 Кб, 6 просмотров)
Elixi вне форума Ответить с цитированием
Старый 08.04.2020, 23:45   #4
Aleksandr H.
2 the Nation Glory
Старожил
 
Аватар для Aleksandr H.
 
Регистрация: 27.05.2014
Сообщений: 3,289
По умолчанию

Код:
x = 100
For i = 0 To 4 * x
    CellA.Offset(, i \ 100) = CellA.Offset(, i \ 100) + 1
    Sleep 20
Next i
Кто умер, но не забыт, тот бессмертен.
Лао-Цзы.
Aleksandr H. вне форума Ответить с цитированием
Старый 09.04.2020, 01:41   #5
Elixi
Форумчанин
 
Регистрация: 10.05.2019
Сообщений: 163
По умолчанию

Aleksandr H., красота
всё-таки буду иметь дерзость немножко поправить строку
Код:
For i = 0 To 4 * x - 1
Elixi вне форума Ответить с цитированием
Старый 09.04.2020, 12:16   #6
akula3107
 
Регистрация: 05.02.2017
Сообщений: 9
По умолчанию

спасибо кто откликнулся. В предложенном примере чуть чуть не так. там счет второй колонки начинается когда первая досчитала до 100 и т.д. нужно как в счетчике. первая колонка досчитала до 100, вторая прибавила +1, первая обнулилась и заново считать до ста, потом опять +1 и т.д. Я уже разобрался сам, пример поздно увидел)
akula3107 вне форума Ответить с цитированием
Старый 09.04.2020, 13:16   #7
Aleksandr H.
2 the Nation Glory
Старожил
 
Аватар для Aleksandr H.
 
Регистрация: 27.05.2014
Сообщений: 3,289
По умолчанию

Брутфорс какой-то дерзкий.
Цитата:
Сообщение от akula3107 Посмотреть сообщение
Я уже разобрался сам, пример поздно увидел)
и сколько итераций делаете всего? 100^4
Кто умер, но не забыт, тот бессмертен.
Лао-Цзы.
Aleksandr H. вне форума Ответить с цитированием
Старый 09.04.2020, 13:46   #8
akula3107
 
Регистрация: 05.02.2017
Сообщений: 9
По умолчанию

пока попробовал с шагом в 10
akula3107 вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Перебрать комбинации цифр Patlyuk Microsoft Office Excel 2 15.09.2014 13:53
Как перебрать записи в DBGrid Peter1 C++ Builder 1 19.07.2012 10:20
перебрать все CheckBox Aleksandr Microsoft Office Excel 21 03.03.2011 17:01
Перебрать циклом формы R Dmitry Microsoft Office Access 3 11.11.2010 19:54
Как перебрать все числа из заданных цифр, чтобы цифры в числах не повторялись? TwiX Общие вопросы Delphi 7 17.08.2009 16:56