View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.misc
Jim Rech Jim Rech is offline
external usenet poster
 
Posts: 2,718
Default International Excel 4 Macro

Insert an International Excel 4 macro sheet into your workbook. Then copy
your code into it, recreate the sub names, etc., and test.

If the choice of an International macro sheet is not on your sheet Insert
menu you can run this code from the VBE's Immediate window:

Worksheets.Add , , , xlExcel4IntlMacroSheet

--
Jim
wrote in message
ups.com...
|I have a Excel 4 Macro sheet that looks like this:
|
| Auto_Open
| =ERROR(2;Recover)
| =WORKBOOK.SELECT("Sheet 1")
| =WINDOW.RESTORE()
| =WINDOW.SIZE(82.5;42.75)
| =WORKBOOK.HIDE("Macro1";TRUE)
| =EDIT.COLOR(1;0;0;0)
| =EDIT.COLOR(3;255;0;0)
| =EDIT.COLOR(4;212;212;212)
| =EDIT.COLOR(5;247;247;231)
| =EDIT.COLOR(2;255;255;255)
| =RUN("Macro5")
| =DELETE.NAME("Auto_Open")
| =WORKBOOK.SELECT("Sheet 1")
| =SELECT("R1:R65536")
| =COLUMN.WIDTH(;;;3)
| =ROW.HEIGHT(;;;3)
| =SELECT("R1C1")
| =WINDOW.MAXIMIZE()
| =RETURN()
|
| Macro5
| =WORKBOOK.SELECT("Sheet 1")
| =SELECT("R2C1:R4C2")
| =RUN("Macro1")
| =SELECT("R2C3:R4C3")
| =RUN("Macro2")
| =SELECT("R2C3:R4C3")
| =FORMAT.NUMBER("""$""###,###,##0.00")
| =SELECT("R2C2:R4C2")
| =FORMAT.NUMBER("dd-mmm-yyyy")
| =SELECT("R1C1:R1C2")
| =RUN("Macro3")
| =SELECT("R1C3")
| =RUN("Macro4")
| =RETURN()
|
| Macro1,Macro1,Macro3,Macro4 are formating macros...
|
| How can i convert these macros into a "Excel 4 International Macro"
| format
|
| Regards
| Arun
|