ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   VBA Help (https://www.excelbanter.com/excel-programming/373458-vba-help.html)

Jay

VBA Help
 
hi

I have a excel sheet

Column K Column L Column M

A or B or C
drop down list

there will be values on Column K,

Column L is a drop down list which ever i select either A ,B or C i
have a Formula like this on Column M

=IF((L9="A"),-1*K9,IF((L9=""),"",IF((L9="B"),K9*F9,IF((L9="C"),0 *K9))))

I have more than 400 Rows this is taking a lot of time to calculate the
formula ...is there any best way to do this ? any VBA code ?

Thanx in advance

Regards
Jay


tplourde

VBA Help
 
You might consider simplifiying the formula to speed calculation. If the
difference between a blank cell and zero is not relevant consider
=IF((L12="A"),-K12,IF((L12="B"),K12*F12,0))

Or you could put the formula options in your validation list and eliminate
the ABC thing altogether. Validation options would be 0,-K15,=F15*K15,

Good Luck

"Jay" wrote:

hi

I have a excel sheet

Column K Column L Column M

A or B or C
drop down list

there will be values on Column K,

Column L is a drop down list which ever i select either A ,B or C i
have a Formula like this on Column M

=IF((L9="A"),-1*K9,IF((L9=""),"",IF((L9="B"),K9*F9,IF((L9="C"),0 *K9))))

I have more than 400 Rows this is taking a lot of time to calculate the
formula ...is there any best way to do this ? any VBA code ?

Thanx in advance

Regards
Jay



Jay

VBA Help
 
i have same problem its taking ages to calculate all the cells
connected to it , is thre any macro to do this ?


tplourde wrote:
You might consider simplifiying the formula to speed calculation. If the
difference between a blank cell and zero is not relevant consider
=IF((L12="A"),-K12,IF((L12="B"),K12*F12,0))

Or you could put the formula options in your validation list and eliminate
the ABC thing altogether. Validation options would be 0,-K15,=F15*K15,

Good Luck

"Jay" wrote:

hi

I have a excel sheet

Column K Column L Column M

A or B or C
drop down list

there will be values on Column K,

Column L is a drop down list which ever i select either A ,B or C i
have a Formula like this on Column M

=IF((L9="A"),-1*K9,IF((L9=""),"",IF((L9="B"),K9*F9,IF((L9="C"),0 *K9))))

I have more than 400 Rows this is taking a lot of time to calculate the
formula ...is there any best way to do this ? any VBA code ?

Thanx in advance

Regards
Jay




tplourde

VBA Help
 
This macro assumes that you select the cells you want it applied to before
running the macro. Careful, select only cells in column K or it will create a
mess.

Tom

Sub CalcNow()

Dim cellK As Range

For Each cellK In ActiveWindow.RangeSelection
If cellK = "A" Then
cellK.Offset(0, 1) = -cellK.Offset(0, -1)
ElseIf cellK = "B" Then
cellK.Offset(0, 1) = cellK.Offset(0, -5) * cellK.Offset(0, -1)
ElseIf cellK = "C" Then
cellK.Offset(0, 1) = 0
Else
cellK.Offset(0, 1) = ""
End If
Next cellK

End Sub




"Jay" wrote:

i have same problem its taking ages to calculate all the cells
connected to it , is thre any macro to do this ?


tplourde wrote:
You might consider simplifiying the formula to speed calculation. If the
difference between a blank cell and zero is not relevant consider
=IF((L12="A"),-K12,IF((L12="B"),K12*F12,0))

Or you could put the formula options in your validation list and eliminate
the ABC thing altogether. Validation options would be 0,-K15,=F15*K15,

Good Luck

"Jay" wrote:

hi

I have a excel sheet

Column K Column L Column M

A or B or C
drop down list

there will be values on Column K,

Column L is a drop down list which ever i select either A ,B or C i
have a Formula like this on Column M

=IF((L9="A"),-1*K9,IF((L9=""),"",IF((L9="B"),K9*F9,IF((L9="C"),0 *K9))))

I have more than 400 Rows this is taking a lot of time to calculate the
formula ...is there any best way to do this ? any VBA code ?

Thanx in advance

Regards
Jay






All times are GMT +1. The time now is 01:32 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com