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

Вход

Регистрация

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

 

= Мир MS Excel/заполнения столбца по двойному условию - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_  
Мир MS Excel » Вопросы и решения » Вопросы по VBA » заполнения столбца по двойному условию (Макросы Sub)
заполнения столбца по двойному условию
kpk17 Дата: Пятница, 27.12.2013, 19:17 | Сообщение № 1
Группа: Пользователи
Ранг: Новичок
Сообщений: 20
Репутация: 0 ±
Замечаний: 40% ±

Excel 2007
подскажите пожалуйста куда копать:
хочу адаптировать этот код для работы в диапазоне ячеек

[vba]
Код
Private Sub CommandButton5_Click()

If Range("K46:K53").Value = "эрм" Then Range("F46:F53").Value = "анем"
If Range("K46:K53").Value = "псз" Then Range("F46:F53").Value = "зам"
End Sub
[/vba]

если для одной ячейки K 46 то работает, а для диапазона не представляю как сделать.
К представляет собой объединение двух ячеек в ряду (KL)


Сообщение отредактировал Serge_007 - Пятница, 27.12.2013, 20:54
 
Ответить
Сообщениеподскажите пожалуйста куда копать:
хочу адаптировать этот код для работы в диапазоне ячеек

[vba]
Код
Private Sub CommandButton5_Click()

If Range("K46:K53").Value = "эрм" Then Range("F46:F53").Value = "анем"
If Range("K46:K53").Value = "псз" Then Range("F46:F53").Value = "зам"
End Sub
[/vba]

если для одной ячейки K 46 то работает, а для диапазона не представляю как сделать.
К представляет собой объединение двух ячеек в ряду (KL)
Автор - kpk17
Дата добавления - 27.12.2013 в 19:17
Hugo Дата: Пятница, 27.12.2013, 19:20 | Сообщение № 2
Группа: Друзья
Ранг: Участник клуба
Сообщений: 3252
Репутация: 707 ±
Замечаний: 0% ±

2019
Диапазон - это массив значений.
Что Вы хотите сделать - трудно представить :)

excel@nxt.ru
webmoney: E265281470651 Z422237915069
 
Ответить
СообщениеДиапазон - это массив значений.
Что Вы хотите сделать - трудно представить :)
Автор - Hugo
Дата добавления - 27.12.2013 в 19:20
kpk17 Дата: Пятница, 27.12.2013, 19:26 | Сообщение № 3
Группа: Пользователи
Ранг: Новичок
Сообщений: 20
Репутация: 0 ±
Замечаний: 40% ±

Excel 2007
пытаюсь заполнить столбец, выделенный красным цветом.
надо значит массивы штудировать
К сообщению приложен файл: 2660136.xlsm (41.4 Kb)


Сообщение отредактировал kpk17 - Пятница, 27.12.2013, 19:28
 
Ответить
Сообщениепытаюсь заполнить столбец, выделенный красным цветом.
надо значит массивы штудировать
Автор - kpk17
Дата добавления - 27.12.2013 в 19:26
RAN Дата: Пятница, 27.12.2013, 20:06 | Сообщение № 4
Группа: Друзья
Ранг: Экселист
Сообщений: 5660
Репутация: 1163 ±
Замечаний: 0% ±

2010
[vba]
Код
Private Sub CommandButton5_Click()
     For i = 46 To 53
         If Range("K" & i).Value = "эрм" Then Range("F" & i).Value = "анем"
         If Range("K" & i).Value = "псз" Then Range("F" & i).Value = "зам"
     Next
End Sub
[/vba]

Быть или не быть, вот в чем загвоздка!
 
Ответить
Сообщение[vba]
Код
Private Sub CommandButton5_Click()
     For i = 46 To 53
         If Range("K" & i).Value = "эрм" Then Range("F" & i).Value = "анем"
         If Range("K" & i).Value = "псз" Then Range("F" & i).Value = "зам"
     Next
End Sub
[/vba]
Автор - RAN
Дата добавления - 27.12.2013 в 20:06
kpk17 Дата: Пятница, 27.12.2013, 20:44 | Сообщение № 5
Группа: Пользователи
Ранг: Новичок
Сообщений: 20
Репутация: 0 ±
Замечаний: 40% ±

Excel 2007
спасибо, все супер
 
Ответить
Сообщениеспасибо, все супер
Автор - kpk17
Дата добавления - 27.12.2013 в 20:44
Мир MS Excel » Вопросы и решения » Вопросы по VBA » заполнения столбца по двойному условию (Макросы Sub)
  • Страница 1 из 1
  • 1
Поиск:

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