Enter a price in column B and a formula is instantly entered in column C (Public)

PHOTO EMBED

Wed Aug 11 2021 00:41:47 GMT+0000 (Coordinated Universal Time)

Saved by @cnewnham #vba

Private Sub Worksheet_Change(ByVal Target As Range)
'These need to be added into the worksheet VBA section itself
'Enter a price in column B and a formula is instantly entered in column C.
' Formula in column c: Cell value in column B multiplied by 1.1

Dim lRow As Single
Dim AStr As String
Dim Value As Variant
If Not Intersect(Target, Range("B:B")) Is Nothing Then
    For Each Value In Target
        If Value <> "" Then
            Range("C" & Value.Row).Formula = "=" & Target.Address & "*1.1"
        End If
    Next Value
End If
End Sub
content_copyCOPY

'These need to be added into the worksheet VBA section itself 'Enter a price in column B and a formula is instantly entered in column C. ' Formula in column c: Cell value in column B multiplied by 1.1