I had finished a macro, it works well in my computer. However,
when i try it in other computer, it does not work.

and the code cannot work is the following :

Range("I1").Select
ActiveCell.FormulaR1C1 = "Month"
ActiveCell.Offset(0, 1) = "=mid(sheet1!g2,4,2)"
ActiveCell.Offset(0, 1).Copy
ActiveCell.Offset(0, 1).PasteSpecial Paste:=xlPasteValues,
Operation:=xlNone, SkipBlanks :=False, Transpose:=False

why did this situation occur? and How to sovle it?


--
hurriance
------------------------------------------------------------------------
hurriance's Profile: http://www.excelforum.com/member.php...o&userid=30882
View this thread: http://www.excelforum.com/showthread...hreadid=552885