Данный макрос при активации задействует только выделенные ранее ячейки: F855, G855, G856 и G857. Мне же нужно что бы вместе "F855" была "выбранная ячейка. Вместо "G855", соответственно "выбранная ячейка со сдвигом в правый столбец". "G856" - поменять на "на 1 ячейку ниже задействованной предыдущим действием". И вместо "G857" - "свод суммы верхней ячейки и левой"...Как это поменять, какие символы использовать?
Sub ПОРАБЫ()
'
' ПОРАБЫ Макрос
'
' Сочетание клавиш: Ctrl+h
'
Range("F855").Select
ActiveCell.FormulaR1C1 = "=RC[-1]/R854C5*100"
Range("F855").Select
Selection.Copy
Range("G855").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Range("G856").Select
Application.CutCopyMode = False
ActiveCell.FormulaR1C1 = "=R[-1]C+RC[-1]"
Range("G857").Select
End Sub
Sub ПОРАБЫ()
'
' ПОРАБЫ Макрос
'
' Сочетание клавиш: Ctrl+h
'
Range("F855").Select
ActiveCell.FormulaR1C1 = "=RC[-1]/R854C5*100"
Range("F855").Select
Selection.Copy
Range("G855").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Range("G856").Select
Application.CutCopyMode = False
ActiveCell.FormulaR1C1 = "=R[-1]C+RC[-1]"
Range("G857").Select
End Sub