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

Вход

Регистрация

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

 

= Мир MS Excel/логическое продолжение столбца - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_  
Мир MS Excel » Вопросы и решения » Вопросы по VBA » логическое продолжение столбца (Макросы Sub)
логическое продолжение столбца
stargard Дата: Вторник, 14.01.2014, 16:39 | Сообщение № 1
Группа: Пользователи
Ранг: Новичок
Сообщений: 41
Репутация: 0 ±
Замечаний: 60% ±

Excel 2007
Есть пример столбца необходимо задать формулу продолжения распределения значений дальше. именно в таком порядке в каком они идут до значения 1459. Помогите пожалуйста
К сообщению приложен файл: 1236064.xlsx (8.7 Kb)
 
Ответить
СообщениеЕсть пример столбца необходимо задать формулу продолжения распределения значений дальше. именно в таком порядке в каком они идут до значения 1459. Помогите пожалуйста
Автор - stargard
Дата добавления - 14.01.2014 в 16:39
dadmarat Дата: Вторник, 14.01.2014, 17:39 | Сообщение № 2
Группа: Пользователи
Ранг: Новичок
Сообщений: 47
Репутация: 3 ±
Замечаний: 0% ±

Excel 2010
Если фоормулу, то
Код
=ЕСЛИ(A15=A14;A15+1,5;A15)
, но вручную тянуть нужно будет до определенного Вами значения.
Или VBA решение (ставите курсор в ячейку с которой начинать заполнение):

[vba]
Код
Dim i As Integer
i = Selection.Row
Do While Cells(i - 1, 1) + 1.5 <= 1459
If Cells(i - 2, 1) = Cells(i - 1, 1) Then
Cells(i, 1) = Cells(i - 1, 1) + 1.5
Else
Cells(i, 1) = Cells(i - 1, 1)
End If
i = i + 1
Loop
[/vba]

----------------
I can do it!
----------------
 
Ответить
СообщениеЕсли фоормулу, то
Код
=ЕСЛИ(A15=A14;A15+1,5;A15)
, но вручную тянуть нужно будет до определенного Вами значения.
Или VBA решение (ставите курсор в ячейку с которой начинать заполнение):

[vba]
Код
Dim i As Integer
i = Selection.Row
Do While Cells(i - 1, 1) + 1.5 <= 1459
If Cells(i - 2, 1) = Cells(i - 1, 1) Then
Cells(i, 1) = Cells(i - 1, 1) + 1.5
Else
Cells(i, 1) = Cells(i - 1, 1)
End If
i = i + 1
Loop
[/vba]
Автор - dadmarat
Дата добавления - 14.01.2014 в 17:39
stargard Дата: Вторник, 14.01.2014, 17:44 | Сообщение № 3
Группа: Пользователи
Ранг: Новичок
Сообщений: 41
Репутация: 0 ±
Замечаний: 60% ±

Excel 2007
Странно но формула не работает ((((
 
Ответить
СообщениеСтранно но формула не работает ((((
Автор - stargard
Дата добавления - 14.01.2014 в 17:44
dadmarat Дата: Вторник, 14.01.2014, 17:47 | Сообщение № 4
Группа: Пользователи
Ранг: Новичок
Сообщений: 47
Репутация: 3 ±
Замечаний: 0% ±

Excel 2010
Формула для ячейки А16, забыл указать!

----------------
I can do it!
----------------
 
Ответить
СообщениеФормула для ячейки А16, забыл указать!
Автор - dadmarat
Дата добавления - 14.01.2014 в 17:47
stargard Дата: Вторник, 14.01.2014, 17:48 | Сообщение № 5
Группа: Пользователи
Ранг: Новичок
Сообщений: 41
Репутация: 0 ±
Замечаний: 60% ±

Excel 2007
я ее туда именно туда и вставляю и появляются нули ((
 
Ответить
Сообщениея ее туда именно туда и вставляю и появляются нули ((
Автор - stargard
Дата добавления - 14.01.2014 в 17:48
dadmarat Дата: Вторник, 14.01.2014, 18:03 | Сообщение № 6
Группа: Пользователи
Ранг: Новичок
Сообщений: 47
Репутация: 3 ±
Замечаний: 0% ±

Excel 2010
В вложении файл с формулой.

-----
Извините, не то приложил.
К сообщению приложен файл: _1236064.xlsx (9.8 Kb)

----------------
I can do it!
----------------

Сообщение отредактировал dadmarat - Вторник, 14.01.2014, 18:10
 
Ответить
СообщениеВ вложении файл с формулой.

-----
Извините, не то приложил.
Автор - dadmarat
Дата добавления - 14.01.2014 в 18:03
stargard Дата: Вторник, 14.01.2014, 18:05 | Сообщение № 7
Группа: Пользователи
Ранг: Новичок
Сообщений: 41
Репутация: 0 ±
Замечаний: 60% ±

Excel 2007
Простите но там нет формулы ))
 
Ответить
СообщениеПростите но там нет формулы ))
Автор - stargard
Дата добавления - 14.01.2014 в 18:05
stargard Дата: Вторник, 14.01.2014, 19:09 | Сообщение № 8
Группа: Пользователи
Ранг: Новичок
Сообщений: 41
Репутация: 0 ±
Замечаний: 60% ±

Excel 2007
Спасибо Вам огромное ))) очень благодарен
 
Ответить
СообщениеСпасибо Вам огромное ))) очень благодарен
Автор - stargard
Дата добавления - 14.01.2014 в 19:09
Мир MS Excel » Вопросы и решения » Вопросы по VBA » логическое продолжение столбца (Макросы Sub)
  • Страница 1 из 1
  • 1
Поиск:

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