LinkBack Thread Tools Search this Thread Display Modes
Prev Previous Post   Next Post Next
  #1   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 1
Default convert lotus 123w macros to excel macros


Here is one of the lotus macros I'm looking to convert.

20 20 ! A1 - Add 1 each day: B1 - number of shipping days pe
month
July 30 - August 26, 1995 ! Change For each day

! CLEAR THE SPREADSHEET DATA
{GOTO}B:A2~ ! Go to B: spreadsheet DLYSLS
{ABS}B:A2..O51~ ! Setup to delete
{ALT}kd ! old data
~
{ALT}fo{ALT "n"} ! OPEN THE IMPORT DATA SPREADSHEET
c:\123w\work\slmout.wk3 ! open temp spreadsheet
{GOTO}A:A1~ ! and delete any data
{ABS}A:A1..A70~ ! that might be there
{ALT}kd
~
{GOTO}A:A1~
{ALT}fit{ALT "n"} ! bring in the data that came from RISC
c:\mtdslm.out !c:\mtdslm.out
~ ! Now process the B/M Salespeople Data
{GOTO}A:A1~ ! Position to
{ABS}A:A1..A51~ ! copy DLYSLM data for B/M salespeople
{ALT}ec~
~
{ALT}rg{ALT "a"} ! goto the dlyslm macro again
<<C:\123W\WORK\DLYSLM
~
{GOTO}B:A2~ ! Position to
{ALT}ep ! Paste DLYSLM data for B/M salespeople
~
{GOTO}B:A2~
{ABS}B:A2..B:e51~ ! Get ready to parse
{ALT}DP ! Parse the data
{ALT "i"}B:A2..B:E51
{ALT "o"}B:A2
{ALT "f"}
LVVVV VVVV VVVV VV
~
{GOTO}B:A49~ ! prepare to total columns
{ALT}ee~ ! clear out deadwood
{R}~
@sum(b2..b48)~ ! total columns
{ALT}ec{ANCHOR}B:B49..B:O49~ ! copy sum to other columns
{ALT}ep~ ! and paste
{GOTO}B:N2~ ! prepare to total rows
(B2)+(D2)+(F2)+(H2)+(J2)+(L2)~
{ALT}ec{ANCHOR}B:N2..B:O48~ ! copy sum to other rows
{ALT}ep~ ! and paste
{GOTO}B:P23~
@SUM(N2..N20)~ ! Do the group totals (b/m, mwk, bur)
{ALT}ec{ANCHOR}B:P23..B:Q23~ ! copy sum
{ALT}ep~ ! and paste
{GOTO}B:P38~
@SUM(N21..N34)~
{ALT}ec{ANCHOR}B:P38..B:Q38~
{ALT}ep~
{GOTO}B:P48~
@SUM(N35..N48)~
{ALT}ec{ANCHOR}B:P48..B:Q48~
{ALT}ep~
{ALT}fo{ALT "n"} ! Open B/M report file
c:\123w\work\dlyslm1.wk3
~
{ALT}fp ! Print the file
{ALT "a"}a21..n86~ ! Set the range
{ALT}fc{ALT "y"} ! Close and Save file
~
{ALT}fo{ALT "n"} ! Open Margin report file
c:\123w\work\dlymgn1.wk3
~
{ALT}fp ! Print the file
{ALT "a"}a21..Q86~ ! Set the range
{ALT}fc{ALT "y"} ! Close and Save file
~
{ALT}fo{ALT "n"} ! Open MWK report file
c:\123w\work\mwkslm2.wk3
~
{ALT}fp ! Print the file
{ALT "a"}a15..n46~ ! Set the range
{ALT}fc{ALT "y"} ! Close and Save file
~
{ALT}rg{ALT "a"}
<<C:\123W\WORK\SLMOUT
~
{GOTO}A:A1~ ! Close and save the
{ALT}fc{ALT "y"} ! Data file
~
{GOTO}A:A1~ ! Close and save this
{ALT}fc{ALT "y"} ! Macro file
~

This is just one of the Macros that I'm looking to convert. Help i
greatly appreciated

--
rpiesci
-----------------------------------------------------------------------
rpiescik's Profile: http://www.excelforum.com/member.php...fo&userid=1381
View this thread: http://www.excelforum.com/showthread.php?threadid=26124

 
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
Converting Macros from Lotus 123 to Excel Shayan Excel Discussion (Misc queries) 0 June 12th 08 03:30 PM
lotus uses {?} for input, what does excel use (macros) jmoore New Users to Excel 2 December 31st 07 11:48 PM
Lotus Macros do not convert to Excel becky Excel Discussion (Misc queries) 1 February 4th 05 02:43 PM
convert lotus 123w macros to excel macros rpiescik Excel Programming 1 September 18th 04 01:35 PM
Macros in Excel and Lotus Jamie[_4_] Excel Programming 1 September 15th 03 05:23 PM


All times are GMT +1. The time now is 04:40 PM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
Copyright ©2004-2025 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"