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

Вход

Регистрация

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

 

= Мир MS Excel/как записать макрос для повторения функции для всех строк? - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_  
как записать макрос для повторения функции для всех строк?
Ivanrgulin Дата: Вторник, 27.03.2012, 00:15 | Сообщение № 1
Группа: Пользователи
Ранг: Прохожий
Сообщений: 6
Репутация: 0 ±
Замечаний: 0% ±

мне дали задание: дана таблица с огромным числом строк. И к ним нужно применить логическую функцию "И". можете подсказать как с помощью макроса сделать это автоматически. строчек 300. заранее спасибо
 
Ответить
Сообщениемне дали задание: дана таблица с огромным числом строк. И к ним нужно применить логическую функцию "И". можете подсказать как с помощью макроса сделать это автоматически. строчек 300. заранее спасибо

Автор - Ivanrgulin
Дата добавления - 27.03.2012 в 00:15
Serge_007 Дата: Вторник, 27.03.2012, 09:21 | Сообщение № 2
Группа: Админы
Ранг: Местный житель
Сообщений: 16475
Репутация: 2749 ±
Замечаний: ±

Excel 2016
Quote (Ivanrgulin)
дана таблица...

И где она?

Quote (Ivanrgulin)
к ним нужно применить логическую функцию "И"

Какие условия должна эта функция выполнять?


ЮMoney:41001419691823 | WMR:126292472390
 
Ответить
Сообщение
Quote (Ivanrgulin)
дана таблица...

И где она?

Quote (Ivanrgulin)
к ним нужно применить логическую функцию "И"

Какие условия должна эта функция выполнять?

Автор - Serge_007
Дата добавления - 27.03.2012 в 09:21
RAN Дата: Вторник, 27.03.2012, 10:04 | Сообщение № 3
Группа: Друзья
Ранг: Экселист
Сообщений: 5660
Репутация: 1163 ±
Замечаний: 0% ±

2010
Quote (Serge_007)
Какие условия должна эта функция выполнять?

Да какая разница? Студенту макрос надо.
Включаем макрорекордер, вводим нужную формулу в нужное место, выключаем рекордер.
Входим в редактор, удаляем все лишнее.
Остаеться одна строка.
[vba]
Code
Sub Макрос4()
'
' Макрос4 Макрос
'

'
'    Range("C1:C3").Select
'    ActiveCell.FormulaR1C1 = "=AND(RC[-2]="""",RC[-1]="""")"
'    Range("C1").Select
'    Selection.AutoFill Destination:=Range("C1:C3"), Type:=xlFillDefault
'    Range("C1:C3").Select
      
         Range("C1:C3").FormulaR1C1 = "=AND(RC[-2]="""",RC[-1]="""")"

End Sub
[/vba]


Быть или не быть, вот в чем загвоздка!
 
Ответить
Сообщение
Quote (Serge_007)
Какие условия должна эта функция выполнять?

Да какая разница? Студенту макрос надо.
Включаем макрорекордер, вводим нужную формулу в нужное место, выключаем рекордер.
Входим в редактор, удаляем все лишнее.
Остаеться одна строка.
[vba]
Code
Sub Макрос4()
'
' Макрос4 Макрос
'

'
'    Range("C1:C3").Select
'    ActiveCell.FormulaR1C1 = "=AND(RC[-2]="""",RC[-1]="""")"
'    Range("C1").Select
'    Selection.AutoFill Destination:=Range("C1:C3"), Type:=xlFillDefault
'    Range("C1:C3").Select
      
         Range("C1:C3").FormulaR1C1 = "=AND(RC[-2]="""",RC[-1]="""")"

End Sub
[/vba]

Автор - RAN
Дата добавления - 27.03.2012 в 10:04
Ivanrgulin Дата: Вторник, 27.03.2012, 17:28 | Сообщение № 4
Группа: Пользователи
Ранг: Прохожий
Сообщений: 6
Репутация: 0 ±
Замечаний: 0% ±

Quote (RAN)
Студенту макрос надо.

сделал как говорили но он выдает ошибку "run-time error 424 object required"
 
Ответить
Сообщение
Quote (RAN)
Студенту макрос надо.

сделал как говорили но он выдает ошибку "run-time error 424 object required"

Автор - Ivanrgulin
Дата добавления - 27.03.2012 в 17:28
Ivanrgulin Дата: Вторник, 27.03.2012, 17:32 | Сообщение № 5
Группа: Пользователи
Ранг: Прохожий
Сообщений: 6
Репутация: 0 ±
Замечаний: 0% ±

Quote (RAN)
Студенту макрос надо.

Всё !!! спасибо огромное получилось!
 
Ответить
Сообщение
Quote (RAN)
Студенту макрос надо.

Всё !!! спасибо огромное получилось!

Автор - Ivanrgulin
Дата добавления - 27.03.2012 в 17:32
  • Страница 1 из 1
  • 1
Поиск:

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