View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
Corey Corey is offline
external usenet poster
 
Posts: 276
Default Help with MAX code

Can anyone help me with this code:

Sub Macro10()
' Macro recorded 7/07/2006 by Corey
Range("R59").Select
ActiveCell.FormulaR1C1 = "=MAX('1:" & _
Worksheets(Worksheets.Count).Name & _
"'!R[-8]C[-10])" ' <============= I dont understand this bit here.... What
it does
Range("J59").Select

End Sub

When i place a value in Cell R59, then click a button to run the macro, the
value dissapears and the cell J59 is selected but nothing pasted there.

I want the MAX value of ALL sheets to be displayed in cell R59 regardless of
what worksheet is being viewed.

And this value (plus 1)placed in cell J59, if i run the macro.


EG.


R59 = 100150

Click button to run macro10

Copies R59 adds 1(100151)

Pastes it into J59

If the MAX value cannot be displayed unless a macro is run i don't mind, so
long as the final result is the MAX value+1=J59


Any help appreciated.

Corey