There are hundreds of ways things "does not work" in a computer, please be
more specific. Maybe you are getting an error message, the content of it
should in theory tell what's wrong.

HTH. Best wishes Harald


"hurriance" skrev i
melding ...

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