Cell = Formula issue

**VBA Noob** · 01-05-2007, 05:54 PM

See attached. Change C26

VBA Noob

**EFGMan** · 01-09-2007, 12:31 PM

TY - That is exactly what I want to happen, but I am a true nub at this.

I don't even know what to look for to to see how you did it.

I viewed the code and nothing was there.

Doesn't look like there is any formatting or conditions.

What am I missing?

EFGMan

**VBA Noob** · 01-09-2007, 01:07 PM

Hi,

It done with code. It is called by a Change Event and the code is on the actual sheet.

Right click the sheet tab and select view code.

When the target is cell C26 and you add a figure it multiplies by 15

These link might help with change events and adding the code

http://www.cpearson.com/excel/events.htm

http://www.contextures.com/xlvba01.html#Worksheet

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Not Intersect(Target(1), Range("C26")) Is Nothing Then
    Application.EnableEvents = False
    With Target(1)
         'Assuming your Constant/Multiplier is 15:
        .Value = .Value * 15
    End With
    Application.EnableEvents = True
End If
End Sub

VBA Noob