Страницы: 1
RSS
Наглядно показать изменение данных за разные периоды, курса валют: красным – падение акции, зеленым – рост цены
 
Всем привет!
Есть 2 столбца – Цена за 1 период и Цена за 2 период.
В столбце Изменения нужно показать дельту. Но не просто числом, а как на скриншоте.
Как это можно сделать? С помощью формулы, или формата данных, или как-то иначе?
 
Так?
 
Добрый день!

Удалось реализовать используя 2 ячейки
 

Добрый день. Вот макрос. Но спецсимволы вроде стрелочек вверх, вниз, влево и вправо я не понял как вставлять.

Код
Sub sum()
Dim b&
Dim lastrow As Long
lastrow = ActiveSheet.UsedRange.Row + ActiveSheet.UsedRange.Rows.Count - 1
For b = 3 To lastrow
  If Cells(b, 4) > Cells(b, 3) Then
  Cells(b, 5).value = "^" & " " & "(" & Cells(b, 4) - Cells(b, 3) & ")" & " " & Cells(b, 3) & "->" & Cells(b, 4)
  Cells(b, 5).Font.ColorIndex = 3
  Else: Cells(b, 5).value = "v" & " " & "(" & Cells(b, 4) - Cells(b, 3) & ")" & " " & Cells(b, 3) & "->" & Cells(b, 4)
  Cells(b, 5).Font.ColorIndex = 10
  End If
Next
End Sub
Изменено: Hellmaster - 14.08.2019 12:18:35
Страницы: 1
Наверх