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

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

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

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

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

Ответ
 
Опции темы Поиск в этой теме
Старый 19.01.2010, 15:31   #11
EducatedFool
Программист VBA
СуперМодератор
 
Аватар для EducatedFool
 
Регистрация: 13.07.2008
Сообщений: 6,856
По умолчанию

Цитата:
В книге, опустим условие IF, зачем оно:
Валера, если написали - значит нужно...

К примеру, объясни, что означает эта строка кода?
Код:
Нажатие_Кнопки: [A22].Offset(dat * 44) = 0
EducatedFool вне форума Ответить с цитированием
Старый 19.01.2010, 15:38   #12
valerij
Старожил
 
Аватар для valerij
 
Регистрация: 12.05.2007
Сообщений: 2,339
По умолчанию

Цитата:
Сообщение от EducatedFool Посмотреть сообщение
Валера, если написали - значит нужно...
Игорь, зачем условие IF, разве само действие кнопки не есть условием?
Цитата:
К примеру, объясни, что означает эта строка кода?
Код:
Нажатие_Кнопки: [A22].Offset(dat * 44) = 0
Да вижу, оно и так не работает.
Вообщем я не знаю, как это сделать.
valerij вне форума Ответить с цитированием
Старый 19.01.2010, 16:18   #13
valerij
Старожил
 
Аватар для valerij
 
Регистрация: 12.05.2007
Сообщений: 2,339
По умолчанию

Эта тема продолжение ЭТОЙ, там решение очень простое, конечно не для меня, подсказали..., но для одного дня, вот я и пытаюсь, привязать ко всем, 31 -му дню, а не получается, вот код кнопки, которая сбрасывает в ноль яч. А22:
Код:
Private Sub Start()
    ThisWorkbook.Names("ИТОГО_ПРЕДЫДУЩ.").RefersTo = Me.Range("F34").Value
End Sub
В яч. А22 стоит именованная формула А22 = F34-ИТОГО_ПРЕДЫДУЩ., которую я хочу перенести в макрос книги [A22] = Evaluate("F34-ИТОГО_ПРЕДЫДУЩ.") и что было применимо ко всем, 31 дню.

Последний раз редактировалось valerij; 19.01.2010 в 16:21.
valerij вне форума Ответить с цитированием
Старый 19.01.2010, 16:26   #14
EducatedFool
Программист VBA
СуперМодератор
 
Аватар для EducatedFool
 
Регистрация: 13.07.2008
Сообщений: 6,856
По умолчанию

Цитата:
но для одного дня, вот я и пытаюсь, прпивязать ко всем, 31 -му дню, а не получается
Валера, ну не надоело тебе писать все эти макросы, а?
Уже который год их пишешь...

Тебе же, помнится, пару лет назад предлагали пересмотреть структуру хранения данных, и вместо макросов использовать простейшие формулы...
Может, пора воспользоваться тем советом?

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

И ты смог бы наконец заняться работой, вместо ежемесячного переписывания макросов.

Ты готов к этому?

Сейчас в твоем коде никто, кроме тебя, не разберется.
Мало того, что в коде есть логические ошибки, так ещё и больше половины кода - лишнее.
Сам подумай - нафига прогонять по листу огромные циклы при изменении на листе одной любой ячейки, когда достаточно простейшей формулы типа С2=B2-A2?
А ты, вместо того, чтобы упрощать себе работу, усложняешь её...
EducatedFool вне форума Ответить с цитированием
Старый 19.01.2010, 16:49   #15
valerij
Старожил
 
Аватар для valerij
 
Регистрация: 12.05.2007
Сообщений: 2,339
По умолчанию

Цитата:
Сообщение от EducatedFool Посмотреть сообщение
Ты готов к этому?.
Игорь, это просто тебе так кажется, что пара формул и все, ты полностью не знаешь же специфику моей работы, она, работа, каждый месяц преподносит сюрпризы, ну страна такая...., то из 4 -х заводов похеренно 3 -и, значит приходится, подстраиваться под них, то постоянно дурят, представь из под принтера на заводе выходят 3 -и экземпляра накладных под одним №, один мне, второй в бух., третий в охрану, так бух. выставляет мне счет, который не = моей накладной и только если я в бух. звоню и указываю на не соответствие накладных, они спокойно снимают разницу....
Теперь о формулах, не я ввожу данные, человек ошибся и нет формулы и начинается розыск меня, были в нач. пути формулы, не подходит.
Да и то, что делается макросами, формулы не сделают.
Мне эксель нужен только для моей программы, поэтому я и не углубляюсь в VBA, да и поздно уже, старый стал > 60 лет...

Последний раз редактировалось valerij; 19.01.2010 в 17:10.
valerij вне форума Ответить с цитированием
Ответ


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



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Форма-Добавить объект-Назначить слушатель события tolikman Microsoft Office Excel 6 10.09.2008 16:18
Как клавиши F, назначить макрос? valerij Microsoft Office Excel 7 06.06.2008 10:08
Как в Excele2007 назначить макрос на пункт пользовательского меню Suroejka Microsoft Office Excel 3 28.05.2008 14:02
Назначить макрос Nando Microsoft Office Excel 5 07.01.2008 14:33
Как программно назначить привилегию или писать в реестр через WinApi ? UnD)eaD)Snake Win Api 16 27.09.2007 20:20