Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/Последовательное во времени выполнение команд - Мир MS Excel

Регистрация · Логин: · Пароль: · · Забыли пароль?
  • Страница 1 из 1
  • 1
Модератор форума: _Boroda_, Manyasha, SLAVICK, китин  
Мир MS Excel » Вопросы и решения » Вопросы по Excel » Последовательное во времени выполнение команд (Формулы/Formulas)
Последовательное во времени выполнение команд
GAPAGAPA Дата: Среда, 14.11.2018, 16:35 | Сообщение № 1
Группа: Пользователи
Ранг: Новичок
Сообщений: 13
Репутация: 0 ±
Замечаний: 0% ±

Excel 2010
Добрый день. Не получается решить задачку. Я так понимаю мне может помочь макрос, к сожалению не владею им. Прошу посмотрите, возможно это легкая задача: последовательное во времени выполнение команд.
Например (файл во вложении):
1 этап: в ячейке A1 поставить 1-цу, в ячейке B1 поставить 0. Через 5-10 секунд копировать значение, вычисленное по формуле из ячейки F1 и записать в ячейку H1;
2 этап: в ячейке A1 поставить 0, в ячейке B1 поставить 1-цу. Через 5-10 секунд копировать значение, вычисленное по формуле из ячейки F1 и записать в ячейку H2.

Спасибо.
К сообщению приложен файл: primer.xlsx(10.3 Kb)


Сообщение отредактировал GAPAGAPA - Среда, 14.11.2018, 21:44
 
Ответить
СообщениеДобрый день. Не получается решить задачку. Я так понимаю мне может помочь макрос, к сожалению не владею им. Прошу посмотрите, возможно это легкая задача: последовательное во времени выполнение команд.
Например (файл во вложении):
1 этап: в ячейке A1 поставить 1-цу, в ячейке B1 поставить 0. Через 5-10 секунд копировать значение, вычисленное по формуле из ячейки F1 и записать в ячейку H1;
2 этап: в ячейке A1 поставить 0, в ячейке B1 поставить 1-цу. Через 5-10 секунд копировать значение, вычисленное по формуле из ячейки F1 и записать в ячейку H2.

Спасибо.

Автор - GAPAGAPA
Дата добавления - 14.11.2018 в 16:35
Pelena Дата: Среда, 14.11.2018, 20:43 | Сообщение № 2
Группа: Админы
Ранг: Местный житель
Сообщений: 13311
Репутация: 2931 ±
Замечаний: ±

Excel 2010, 2016 & Mac Excel
Файл не приложился


"Черт возьми, Холмс! Но как??!!"
ЯД 41001765434816
 
Ответить
СообщениеФайл не приложился

Автор - Pelena
Дата добавления - 14.11.2018 в 20:43
GAPAGAPA Дата: Среда, 14.11.2018, 21:45 | Сообщение № 3
Группа: Пользователи
Ранг: Новичок
Сообщений: 13
Репутация: 0 ±
Замечаний: 0% ±

Excel 2010
Файл не приложился

Извините, сейчас приложил. Спасибо
 
Ответить
Сообщение
Файл не приложился

Извините, сейчас приложил. Спасибо

Автор - GAPAGAPA
Дата добавления - 14.11.2018 в 21:45
bmv98rus Дата: Четверг, 15.11.2018, 10:09 | Сообщение № 4
Группа: Проверенные
Ранг: Старожил
Сообщений: 1417
Репутация: 238 ±
Замечаний: 0% ±

Excel 2013/2016
кросс появился

Зачем ждать эти 5-10 секунд? Или это анимация?


Сообщение отредактировал bmv98rus - Четверг, 15.11.2018, 10:12
 
Ответить
Сообщениекросс появился

Зачем ждать эти 5-10 секунд? Или это анимация?

Автор - bmv98rus
Дата добавления - 15.11.2018 в 10:09
bmv98rus Дата: Четверг, 15.11.2018, 10:28 | Сообщение № 5
Группа: Проверенные
Ранг: Старожил
Сообщений: 1417
Репутация: 238 ±
Замечаний: 0% ±

Excel 2013/2016
[vba]
Код
Sub step1()
With Sheet1
.Range("a1") = 1
.Range("b1") = 0
Application.ScreenUpdating = True
Application.Wait Now + CDate("00:00:05")
.Range("h1").Value = .Range("f1").Value
End With
End Sub

Sub step2()
With Sheet1
.Range("a1") = 0
.Range("b1") = 1
Application.ScreenUpdating = True
Application.Wait Now + CDate("00:00:05")
.Range("h2").Value = .Range("f1").Value
End With
End Sub
[/vba]
 
Ответить
Сообщение[vba]
Код
Sub step1()
With Sheet1
.Range("a1") = 1
.Range("b1") = 0
Application.ScreenUpdating = True
Application.Wait Now + CDate("00:00:05")
.Range("h1").Value = .Range("f1").Value
End With
End Sub

Sub step2()
With Sheet1
.Range("a1") = 0
.Range("b1") = 1
Application.ScreenUpdating = True
Application.Wait Now + CDate("00:00:05")
.Range("h2").Value = .Range("f1").Value
End With
End Sub
[/vba]

Автор - bmv98rus
Дата добавления - 15.11.2018 в 10:28
Мир MS Excel » Вопросы и решения » Вопросы по Excel » Последовательное во времени выполнение команд (Формулы/Formulas)
  • Страница 1 из 1
  • 1
Поиск:

Яндекс цитирования
© 2010-2018 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!