Верните предыдущий повторяющийся номер в один столбец перед другим

Я пытаюсь определить точки покупки и продажи для анализа тренда в наборе данных. Вот пример данных: Первая колонка – покупка, вторая – продажа.

1 [0, 0] 2 [1, 0] 3 [0, 0] 4 [0, 0] 5 [1, 0] 6 [0, 0] 7 [0, 0] 8 [0, 1] 9 [0, 0] 10 [1, 0] 

Второй ряд говорит о покупке, поэтому для пятого ряда необязательно говорить о покупке, так как я хочу купить по самой низкой цене. Как я могу сделать 5-ю строку 0,0, так как я хочу, чтобы следующий 1 был строкой 8 (продавать).

Благодарю.

Если вы хотите изменить данные «на месте», вам понадобится VBA. Если вы хотите сгенерировать измененные индикаторы в двух новых столбцах, скажем, например, C и D, используйте следующие формулы CSE в C2 и D2 (введите каждый из них и нажмите Ctrl + Shift + Enter), затем заполните столбцы C и D :

 C2: =A2*IFERROR(MAX(ROW($A$1:$A1)*$A$1:$A1)<=MAX(ROW($A$1:$A1)*$B$1:$B1),1) ' Ctrl+Shift+Enter D2: =B2*IFERROR(MAX(ROW($A$1:$A1)*$A$1:$A1)>=MAX(ROW($A$1:$A1)*$B$1:$B1),1) ' Ctrl+Shift+Enter 

введите описание изображения здесь

Альтернативно, решение VBA:

 Sub analyzecells() Dim i As Integer Dim j As Integer For i = 1 To 100 If Not ActiveWorkbook.Sheets("Sheet1").Range("A" & i).Value = 0 And _ ActiveWorkbook.Sheets("Sheet1").Range("B" & i).Value = 0 Then If ActiveWorkbook.Sheets("Sheet1").Range("A" & i).Value = 1 Then For j = i + 1 To 100 If ActiveWorkbook.Sheets("Sheet1").Range("B" & j).Value <> 1 Then ActiveWorkbook.Sheets("Sheet1").Range("A" & j).Value = 0 ActiveWorkbook.Sheets("Sheet1").Range("B" & j).Value = 0 Else Exit For End If Next j End If End If Next i End Sub 
  • Обновление запроса мощности изменяет ссылки на формулы и не копирует формулы таблицы
  • Ошибка создания xml из Excel при создании реляционных таблиц
  • Найти отображение имени листа в Excel
  • Excel 2016 Преобразование повторяющихся строк в столбцы
  • power query - как перемещать строки вниз в определенном столбце
  • Невозможно объединить строки в excel count ИЛИ OR критерии
  • Динамически извлекать список уникальных значений из диапазона столбцов в Excel?
  • Резюме для раскрывающегося списка
  • Код условно для вывода информации из одной книги в другую
  • Workbooks.OpenText не правильно разбирает файлы csv Excel 2016
  • Как пользовательский столбец в одном PowerQuery ссылается на другой PowerQuery
  • Давайте будем гением компьютера.