Change code to include other targeted cells

[Av8tordude]

I have the code below that multiplies the number entered in row 42 by 3.65 (starting from column B). I would like the code to be able to do the same for each cell that I'm currently targeted in row 42. It should not multiply the entire row 42. Only the targeted cell in row 42

    If Intersect(Target, Range("B42:IV42")) Is Nothing Then Application.EnableEvents = True: Exit Sub
    If Target.Offset(0, -1) = "IBQ Credit Card" Then
        Target.Value = Round(Target.Value * 3.65, 2)
    End If

 

[JustynaMK]

Hey Av8tordude,
Just to clarify - how exactly would you like your code to work? For example, would you like to select a cell (range of cells), hit a keyboard shortcut, and have these cells multiplied by 3.65?

 

[svendiamond]

^^ what he said. Or do you want to utilize the double-click event?

 

[Av8tordude]

solve my own puzzle....thanks

Private Sub Worksheet_Change(ByVal Target As Range)
    Application.EnableEvents = False
    If Intersect(Target, Range("B42:IV42")) Is Nothing Then Application.EnableEvents = True: Exit Sub
    Target.Value = Round(Target.Value * 3.65, 2)
    Application.EnableEvents = True
End Sub