If i can get Formula Sytanx right for summing then why not for....

[NimishK]

Anyone who can help me to correct
If i can get Formula Sytanx right for summing

Sheet4.Cells(TotRow, 8).Formula = "=Sum(C" & fRow & ":C" & lRow & ")" as =SUM(C2:C5) in a Cell

then why not for the following

Sheet4.Cells(TotRow, 10).Formula = "=" & Sheet4.Cells(TotRow, 8).Value * Sheet4.Cells(TotRow, 3) / 100)
I am getting as =Figure and not as =H5*H3/100 in the cell

Thanks
NimishK

 

[Michael M]

Untested, but I thiunk you need

"

=Sheet4!H" & TotRow & "*Sheet4!H" & TotRow & " / 100)"

but that doesn't equate to H5*H3/100....I'm guessing you will be able to mdify as required

 

[Michael M]

ooops, sorry

.Formula = "=Sheet4!H" & totrow & "*Sheet4!H" & totrow & " / 100"

 

[NimishK]

will let you know after testing

 

[NimishK]

Sorry Michael It did not work. Hope you had tried too

By the way if i defined

wS as Worksheet then how would the syntax be for Following

Dim wS as Worksheet
Set wS = Sheets("Sheet4")
ws.Cells(TotRow, 10).Formula = "=" & ws.Cells(TotRow, 8).Value * ws.Cells(TotRow, 3) / 100)

 

[Rick Rothstein]

By the way if i defined

wS as Worksheet then how would the syntax be for Following

Dim wS as Worksheet
Set wS = Sheets("Sheet4")
ws.Cells(TotRow, 10).Formula = "=" & ws.Cells(TotRow, 8).Value * ws.Cells(TotRow, 3) / 100)

Try it like this...

[table="width: 500"]
[tr]
	[td]  Dim wS As Worksheet
  Dim TotRow As Long
  Set wS = Sheets("Sheet4")
  TotRow = 9
  wS.Cells(TotRow, 10).Formula = "=" & wS.Cells(TotRow, 8).Address(0, 0) & "*" & wS.Cells(TotRow, 3).Address(0, 0) & "/100"[/td]
[/tr]
[/table]

 

[NimishK]

Thank you so much Rick. just perfect