|
How can i write TSR code
Hi,
How should I write my codes that can be getting executed automatically, like the way that excel formulas are getting executed at the back ground? Thanks, Afshin |
How can i write TSR code
Afshin
Event code? http://www.cpearson.com/excel/events.htm http://www.mvps.org/dmcritchie/excel/event.htm Write your code as a User Defined Function instead of a Sub()? http://www.mvps.org/dmcritchie/excel/install.htm Gord Dibben Excel MVP On Mon, 27 Sep 2004 22:42:42 -0700, "A-Design" wrote: Hi, How should I write my codes that can be getting executed automatically, like the way that excel formulas are getting executed at the back ground? Thanks, Afshin |
How can i write TSR code
Could you please tell me what do I need to add or remove to the following
codes in order to make them like a (Event code) ? Thanks ==================================== Sub check the number() Worksheets("Sheet1").Activate Dim X(1 To 20) As Integer X3 = 3 X4 = 3 For X4 = 3 To 18 If Cells(17, 13) = Cells(X4, 1) Then Cells(17, 14) = Cells(X4, 3) End If 'If 18 < Cells(17, 13) < 4 Then 'Cells(17, 14) = "OUT OF RANGE" 'End If Next X4 End Sub ================================================== ========================== = "Gord Dibben" <gorddibbATshawDOTca wrote in message ... Afshin Event code? http://www.cpearson.com/excel/events.htm http://www.mvps.org/dmcritchie/excel/event.htm Write your code as a User Defined Function instead of a Sub()? http://www.mvps.org/dmcritchie/excel/install.htm Gord Dibben Excel MVP On Mon, 27 Sep 2004 22:42:42 -0700, "A-Design" wrote: Hi, How should I write my codes that can be getting executed automatically, like the way that excel formulas are getting executed at the back ground? Thanks, Afshin |
How can i write TSR code
It's not what the code does, but where you put it. Event macros go in the
modules named ThisWorkbook, Sheet1, Sheet2, etc. VBA will generate the appropriate SUB/END SUB pair depending on what you select from the list of supported events. On Tue, 28 Sep 2004 15:04:45 -0700, "A-Design" wrote: Could you please tell me what do I need to add or remove to the following codes in order to make them like a (Event code) ? Thanks ==================================== Sub check the number() Worksheets("Sheet1").Activate Dim X(1 To 20) As Integer X3 = 3 X4 = 3 For X4 = 3 To 18 If Cells(17, 13) = Cells(X4, 1) Then Cells(17, 14) = Cells(X4, 3) End If 'If 18 < Cells(17, 13) < 4 Then 'Cells(17, 14) = "OUT OF RANGE" 'End If Next X4 End Sub ================================================= =========================== = "Gord Dibben" <gorddibbATshawDOTca wrote in message .. . Afshin Event code? http://www.cpearson.com/excel/events.htm http://www.mvps.org/dmcritchie/excel/event.htm Write your code as a User Defined Function instead of a Sub()? http://www.mvps.org/dmcritchie/excel/install.htm Gord Dibben Excel MVP On Mon, 27 Sep 2004 22:42:42 -0700, "A-Design" wrote: Hi, How should I write my codes that can be getting executed automatically, like the way that excel formulas are getting executed at the back ground? Thanks, Afshin |
How can i write TSR code
Ok, I have changed my codes as you can see below but it doesn't work ... ,I
am so new in VBA could you please tell me how I should write the codes ? Thanks, Afshin ======================================== Private Sub Worksheet_Calculate() Dim X(1 To 20) As Integer X3 = 3 X4 = 3 For X4 = 3 To 18 If Cells(17, 13) = Cells(X4, 1) Then Cells(17, 14) = Cells(X4, 3) End If Next X4 End Sub ========================================= "Myrna Larson" wrote in message ... It's not what the code does, but where you put it. Event macros go in the modules named ThisWorkbook, Sheet1, Sheet2, etc. VBA will generate the appropriate SUB/END SUB pair depending on what you select from the list of supported events. On Tue, 28 Sep 2004 15:04:45 -0700, "A-Design" wrote: Could you please tell me what do I need to add or remove to the following codes in order to make them like a (Event code) ? Thanks ==================================== Sub check the number() Worksheets("Sheet1").Activate Dim X(1 To 20) As Integer X3 = 3 X4 = 3 For X4 = 3 To 18 If Cells(17, 13) = Cells(X4, 1) Then Cells(17, 14) = Cells(X4, 3) End If 'If 18 < Cells(17, 13) < 4 Then 'Cells(17, 14) = "OUT OF RANGE" 'End If Next X4 End Sub ================================================= ========================== = = "Gord Dibben" <gorddibbATshawDOTca wrote in message .. . Afshin Event code? http://www.cpearson.com/excel/events.htm http://www.mvps.org/dmcritchie/excel/event.htm Write your code as a User Defined Function instead of a Sub()? http://www.mvps.org/dmcritchie/excel/install.htm Gord Dibben Excel MVP On Mon, 27 Sep 2004 22:42:42 -0700, "A-Design" wrote: Hi, How should I write my codes that can be getting executed automatically, like the way that excel formulas are getting executed at the back ground? Thanks, Afshin |
How can i write TSR code
I figured it out,Thank you.
"A-Design" wrote in message ... Ok, I have changed my codes as you can see below but it doesn't work ... ,I am so new in VBA could you please tell me how I should write the codes ? Thanks, Afshin ======================================== Private Sub Worksheet_Calculate() Dim X(1 To 20) As Integer X3 = 3 X4 = 3 For X4 = 3 To 18 If Cells(17, 13) = Cells(X4, 1) Then Cells(17, 14) = Cells(X4, 3) End If Next X4 End Sub ========================================= "Myrna Larson" wrote in message ... It's not what the code does, but where you put it. Event macros go in the modules named ThisWorkbook, Sheet1, Sheet2, etc. VBA will generate the appropriate SUB/END SUB pair depending on what you select from the list of supported events. On Tue, 28 Sep 2004 15:04:45 -0700, "A-Design" wrote: Could you please tell me what do I need to add or remove to the following codes in order to make them like a (Event code) ? Thanks ==================================== Sub check the number() Worksheets("Sheet1").Activate Dim X(1 To 20) As Integer X3 = 3 X4 = 3 For X4 = 3 To 18 If Cells(17, 13) = Cells(X4, 1) Then Cells(17, 14) = Cells(X4, 3) End If 'If 18 < Cells(17, 13) < 4 Then 'Cells(17, 14) = "OUT OF RANGE" 'End If Next X4 End Sub ================================================= ========================== = = "Gord Dibben" <gorddibbATshawDOTca wrote in message .. . Afshin Event code? http://www.cpearson.com/excel/events.htm http://www.mvps.org/dmcritchie/excel/event.htm Write your code as a User Defined Function instead of a Sub()? http://www.mvps.org/dmcritchie/excel/install.htm Gord Dibben Excel MVP On Mon, 27 Sep 2004 22:42:42 -0700, "A-Design" wrote: Hi, How should I write my codes that can be getting executed automatically, like the way that excel formulas are getting executed at the back ground? Thanks, Afshin |
| All times are GMT +1. The time now is 11:37 PM. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com