Hello ; How are you today ? and thank you for your help

as you know we can put our order under
Sub Worksheet_Calculate ()
###
End Sub

and our Order will happen when Calculation in any cell update
in our Excel worksheet .

But I want add a specific action ...

So, When Calculation is updated in cell " A1 "
program makes response ... like order or statement

But When Calculation is updated in Cel " A2"
Porgram makes another response ... like order or statement

Can I do that and How ?

thank you

Jake Anderson

Why can't you try the following ?

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

Dim sAdd

  sAdd = Target.Address

 If sAdd = "$A$1" Then

    ' Some stuff

 ElseIf sAdd = "$A$2" Then

    ' Some other stuff

 End If

End Sub


Hope it comes good

Cheers
Shasur

http://www.dotnetdud.blogspot.com

thank you

But this code works only with
SelectionChage and Change

I want code that can work with calculate :

EXAMPLE :

If A1 = A2 + A3
and B1 = B1 + B2

when the value of A2 , A3 , the value of A1 will update
so, this will active the calculation of excel sheet .

I want code that can determine the excel cell that is calculated
and enter the new value of A1 to my data base :

Code EX :

If ## Cell "A1" Calculate Update ## then
## Enter A1 Value to DataBase ##
ElseIf ## Cell "B1" Calculate Update ## Then
## Enter B1 Value to DataBase
End IF


Can I do that Shasur ?

thank you fot your great help




Jake Anderson

Can you try out something using the Workbook_SheetCalculate event.

This event fires every time for calculation in any of the sheet

Try if You can use the Sh object in this event to get the cell. I will also let you know once I get it

Cheers
Shasur



http://www.dotnetdud.blogspot.com