Thread: Simplified Code
View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
NOPIK NOPIK is offline
external usenet poster
  
Posts: 50
Default Simplified Code

Private Sub OptionButton2_Click()
Union(Sheets("READY MIX - LF").Range("C13:C17"), Sheets("READY MIX -
LF").Range("F13:F17")).FormulaR1C1 = _
"='READY MIX'!RC+('READY MIX'!RC*(1-(LF!R23C3/100)))*(LF!
R17C3)/100"
End Sub
Reply With QuoteReply With Quote