hmm... I shouldve looked at your code more...
u are passing in variables to be set?

u should be using a function to return values...

really for what u are doing.. I would do this

VB Code:
  1. Dim N As Integer, M As Integer
  2. Sub CopyInteger()
  3.      XLRead
  4.      XLPrint
  5. End Sub
  6. Sub XLRead()
  7.      N = Cells(1, 2).Value
  8.      M = Cells(2, 2).Value
  9. End Sub
  10. Sub XLPrint()
  11.      Cells(1, 3).Value = N
  12.      Cells(2, 3).Value = M
  13. End Sub
since you are declaring N & M in the gen dec section.. you dont need to pass them in at all....