How does an old XLW command / macro work?

AusSteelMan

Board Regular
Joined
Sep 4, 2009
Messages
208
Hi everyone,

I am currently running a children's Xmas tree in my workplace. the old Treasurer has resigned (in Jan 09) and has finally passed the Accounts spreadsheet over to me.

It is an sheet that appears to have been developed many years ago and has the following attributes (used loosely)

XLW file extension
Tabs:
- ACCOUNT.xls
- ACCOUNT.xlw
- Statement
Command button on the xls tab to add a new line item to the end of the list (used for entering new deposits/withdrawals)
The Command button seems to "call" a "procedure" of sorts from the xlw tab.
The procedure is written in cells B3 to B37 as shown below.
Code:
<TABLE style="WIDTH: 588pt; BORDER-COLLAPSE: collapse" cellSpacing=0 cellPadding=0 width=784 border=0 x:str><COLGROUP>[SIZE=2]<COL style="WIDTH: 588pt; mso-width-source: userset; mso-width-alt: 12544" width=784>[/SIZE]<TBODY><TR style="HEIGHT: 12.75pt" height=17><TD class=xl26 style="BORDER-RIGHT: #d4d0c8; BORDER-TOP: #d4d0c8; BORDER-LEFT: #d4d0c8; WIDTH: 588pt; BORDER-BOTTOM: #d4d0c8; HEIGHT: 12.75pt; BACKGROUND-COLOR: transparent" width=784 height=17>[SIZE=2]Transaction[/SIZE]</TD></TR><TR style="HEIGHT: 12.75pt" height=17><TD class=xl25 style="BORDER-RIGHT: #d4d0c8; BORDER-TOP: #d4d0c8; BORDER-LEFT: #d4d0c8; BORDER-BOTTOM: #d4d0c8; HEIGHT: 12.75pt; BACKGROUND-COLOR: transparent" height=17 x:fmla='=FORMULA.GOTO("Print_Area")' x:bool="TRUE">[SIZE=2]=FORMULA.GOTO("Print_Area")[/SIZE]</TD></TR><TR style="HEIGHT: 12.75pt" height=17><TD class=xl25 style="BORDER-RIGHT: #d4d0c8; BORDER-TOP: #d4d0c8; BORDER-LEFT: #d4d0c8; BORDER-BOTTOM: #d4d0c8; HEIGHT: 12.75pt; BACKGROUND-COLOR: transparent" height=17 x:fmla="=SELECT.END(4)" x:bool="TRUE">[SIZE=2]=SELECT.END(4)[/SIZE]</TD></TR><TR style="HEIGHT: 12.75pt" height=17><TD class=xl25 style="BORDER-RIGHT: #d4d0c8; BORDER-TOP: #d4d0c8; BORDER-LEFT: #d4d0c8; BORDER-BOTTOM: #d4d0c8; HEIGHT: 12.75pt; BACKGROUND-COLOR: transparent" height=17 x:fmla='=SELECT("R[1]C")' x:bool="TRUE">[SIZE=2]=SELECT("R[1]C")[/SIZE]</TD></TR><TR style="HEIGHT: 12.75pt" height=17><TD class=xl25 style="BORDER-RIGHT: #d4d0c8; BORDER-TOP: #d4d0c8; BORDER-LEFT: #d4d0c8; BORDER-BOTTOM: #d4d0c8; HEIGHT: 12.75pt; BACKGROUND-COLOR: transparent" height=17 x:fmla='=FORMULA(INPUT("Enter the DATE in dd/mm/yy format.",1,,,,165))' x:bool="TRUE">[SIZE=2]=FORMULA(INPUT("Enter the DATE in dd/mm/yy format.",1,,,,165))[/SIZE]</TD></TR><TR style="HEIGHT: 12.75pt" height=17><TD class=xl25 style="BORDER-RIGHT: #d4d0c8; BORDER-TOP: #d4d0c8; BORDER-LEFT: #d4d0c8; BORDER-BOTTOM: #d4d0c8; HEIGHT: 12.75pt; BACKGROUND-COLOR: transparent" height=17 x:fmla='=FORMAT.NUMBER("d-mmm-yy")' x:bool="TRUE">[SIZE=2]=FORMAT.NUMBER("d-mmm-yy")[/SIZE]</TD></TR><TR style="HEIGHT: 12.75pt" height=17><TD class=xl25 style="BORDER-RIGHT: #d4d0c8; BORDER-TOP: #d4d0c8; BORDER-LEFT: #d4d0c8; BORDER-BOTTOM: #d4d0c8; HEIGHT: 12.75pt; BACKGROUND-COLOR: transparent" height=17 x:bool="FALSE">[SIZE=2]= IF(ACTIVE.CELL()=FALSE,GOTO(Remove))[/SIZE]</TD></TR><TR style="HEIGHT: 12.75pt" height=17><TD class=xl25 style="BORDER-RIGHT: #d4d0c8; BORDER-TOP: #d4d0c8; BORDER-LEFT: #d4d0c8; BORDER-BOTTOM: #d4d0c8; HEIGHT: 12.75pt; BACKGROUND-COLOR: transparent" height=17 x:fmla='=SELECT("RC[1]")' x:bool="TRUE">[SIZE=2]=SELECT("RC[1]")[/SIZE]</TD></TR><TR style="HEIGHT: 12.75pt" height=17><TD class=xl25 style="BORDER-RIGHT: #d4d0c8; BORDER-TOP: #d4d0c8; BORDER-LEFT: #d4d0c8; BORDER-BOTTOM: #d4d0c8; HEIGHT: 12.75pt; BACKGROUND-COLOR: transparent" height=17 x:fmla='=FORMULA(INPUT("Enter the amount DEPOSITED. If no Deposit was made select OK.",1,,0,,165))' x:bool="TRUE">[SIZE=2]=FORMULA(INPUT("Enter the amount DEPOSITED. If no Deposit was made select OK.",1,,0,,165))[/SIZE]</TD></TR><TR style="HEIGHT: 12.75pt" height=17><TD class=xl25 style="BORDER-RIGHT: #d4d0c8; BORDER-TOP: #d4d0c8; BORDER-LEFT: #d4d0c8; BORDER-BOTTOM: #d4d0c8; HEIGHT: 12.75pt; BACKGROUND-COLOR: transparent" height=17 x:fmla='=FORMAT.NUMBER("$#,##0.00_);($#,##0.00)")' x:bool="TRUE">[SIZE=2]=FORMAT.NUMBER("$#,##0.00_);($#,##0.00)")[/SIZE]</TD></TR><TR style="HEIGHT: 12.75pt" height=17><TD class=xl25 style="BORDER-RIGHT: #d4d0c8; BORDER-TOP: #d4d0c8; BORDER-LEFT: #d4d0c8; BORDER-BOTTOM: #d4d0c8; HEIGHT: 12.75pt; BACKGROUND-COLOR: transparent" height=17 x:bool="FALSE">[SIZE=2]= IF(ACTIVE.CELL()=FALSE,GOTO(Remove))[/SIZE]</TD></TR><TR style="HEIGHT: 12.75pt" height=17><TD class=xl25 style="BORDER-RIGHT: #d4d0c8; BORDER-TOP: #d4d0c8; BORDER-LEFT: #d4d0c8; BORDER-BOTTOM: #d4d0c8; HEIGHT: 12.75pt; BACKGROUND-COLOR: transparent" height=17 x:fmla='=SELECT("RC[1]")' x:bool="TRUE">[SIZE=2]=SELECT("RC[1]")[/SIZE]</TD></TR><TR style="HEIGHT: 12.75pt" height=17><TD class=xl25 style="BORDER-RIGHT: #d4d0c8; BORDER-TOP: #d4d0c8; BORDER-LEFT: #d4d0c8; BORDER-BOTTOM: #d4d0c8; HEIGHT: 12.75pt; BACKGROUND-COLOR: transparent" height=17 x:fmla='=FORMULA(INPUT("Enter the amount WITHDRAWN. If no Withdrawal was made select OK.",1,,0,,165))' x:bool="TRUE">[SIZE=2]=FORMULA(INPUT("Enter the amount WITHDRAWN. If no Withdrawal was made select OK.",1,,0,,165))[/SIZE]</TD></TR><TR style="HEIGHT: 12.75pt" height=17><TD class=xl25 style="BORDER-RIGHT: #d4d0c8; BORDER-TOP: #d4d0c8; BORDER-LEFT: #d4d0c8; BORDER-BOTTOM: #d4d0c8; HEIGHT: 12.75pt; BACKGROUND-COLOR: transparent" height=17 x:fmla='=FORMAT.NUMBER("$#,##0.00_);($#,##0.00)")' x:bool="TRUE">[SIZE=2]=FORMAT.NUMBER("$#,##0.00_);($#,##0.00)")[/SIZE]</TD></TR><TR style="HEIGHT: 12.75pt" height=17><TD class=xl25 style="BORDER-RIGHT: #d4d0c8; BORDER-TOP: #d4d0c8; BORDER-LEFT: #d4d0c8; BORDER-BOTTOM: #d4d0c8; HEIGHT: 12.75pt; BACKGROUND-COLOR: transparent" height=17 x:bool="FALSE">[SIZE=2]= IF(ACTIVE.CELL()=FALSE,GOTO(Remove))[/SIZE]</TD></TR><TR style="HEIGHT: 12.75pt" height=17><TD class=xl25 style="BORDER-RIGHT: #d4d0c8; BORDER-TOP: #d4d0c8; BORDER-LEFT: #d4d0c8; BORDER-BOTTOM: #d4d0c8; HEIGHT: 12.75pt; BACKGROUND-COLOR: transparent" height=17 x:fmla='=SELECT("RC[1]")' x:bool="TRUE">[SIZE=2]=SELECT("RC[1]")[/SIZE]</TD></TR><TR style="HEIGHT: 12.75pt" height=17><TD class=xl25 style="BORDER-RIGHT: #d4d0c8; BORDER-TOP: #d4d0c8; BORDER-LEFT: #d4d0c8; BORDER-BOTTOM: #d4d0c8; HEIGHT: 12.75pt; BACKGROUND-COLOR: transparent" height=17 x:fmla='=FORMULA(INPUT("Enter the PAYEE. If no Payee select OK.",2,,"Nil",,165))' x:bool="TRUE">[SIZE=2]=FORMULA(INPUT("Enter the PAYEE. If no Payee select OK.",2,,"Nil",,165))[/SIZE]</TD></TR><TR style="HEIGHT: 12.75pt" height=17><TD class=xl25 style="BORDER-RIGHT: #d4d0c8; BORDER-TOP: #d4d0c8; BORDER-LEFT: #d4d0c8; BORDER-BOTTOM: #d4d0c8; HEIGHT: 12.75pt; BACKGROUND-COLOR: transparent" height=17 x:bool="FALSE">[SIZE=2]= IF(ACTIVE.CELL()=FALSE,GOTO(Remove))[/SIZE]</TD></TR><TR style="HEIGHT: 12.75pt" height=17><TD class=xl25 style="BORDER-RIGHT: #d4d0c8; BORDER-TOP: #d4d0c8; BORDER-LEFT: #d4d0c8; BORDER-BOTTOM: #d4d0c8; HEIGHT: 12.75pt; BACKGROUND-COLOR: transparent" height=17 x:fmla='=SELECT("RC[1]")' x:bool="TRUE">[SIZE=2]=SELECT("RC[1]")[/SIZE]</TD></TR><TR style="HEIGHT: 12.75pt" height=17><TD class=xl25 style="BORDER-RIGHT: #d4d0c8; BORDER-TOP: #d4d0c8; BORDER-LEFT: #d4d0c8; BORDER-BOTTOM: #d4d0c8; HEIGHT: 12.75pt; BACKGROUND-COLOR: transparent" height=17 x:fmla='=FORMULA(INPUT("Enter the REASON for the deposit/withdrawal.",2,,,,165))' x:bool="TRUE">[SIZE=2]=FORMULA(INPUT("Enter the REASON for the deposit/withdrawal.",2,,,,165))[/SIZE]</TD></TR><TR style="HEIGHT: 12.75pt" height=17><TD class=xl25 style="BORDER-RIGHT: #d4d0c8; BORDER-TOP: #d4d0c8; BORDER-LEFT: #d4d0c8; BORDER-BOTTOM: #d4d0c8; HEIGHT: 12.75pt; BACKGROUND-COLOR: transparent" height=17 x:bool="FALSE">[SIZE=2]= IF(ACTIVE.CELL()=FALSE,GOTO(Remove))[/SIZE]</TD></TR><TR style="HEIGHT: 12.75pt" height=17><TD class=xl25 style="BORDER-RIGHT: #d4d0c8; BORDER-TOP: #d4d0c8; BORDER-LEFT: #d4d0c8; BORDER-BOTTOM: #d4d0c8; HEIGHT: 12.75pt; BACKGROUND-COLOR: transparent" height=17 x:fmla='=SELECT("R[-1]C[1]")' x:bool="TRUE">[SIZE=2]=SELECT("R[-1]C[1]")[/SIZE]</TD></TR><TR style="HEIGHT: 12.75pt" height=17><TD class=xl25 style="BORDER-RIGHT: #d4d0c8; BORDER-TOP: #d4d0c8; BORDER-LEFT: #d4d0c8; BORDER-BOTTOM: #d4d0c8; HEIGHT: 12.75pt; BACKGROUND-COLOR: transparent" height=17 x:fmla="=COPY()" x:bool="TRUE">[SIZE=2]=COPY()[/SIZE]</TD></TR><TR style="HEIGHT: 12.75pt" height=17><TD class=xl25 style="BORDER-RIGHT: #d4d0c8; BORDER-TOP: #d4d0c8; BORDER-LEFT: #d4d0c8; BORDER-BOTTOM: #d4d0c8; HEIGHT: 12.75pt; BACKGROUND-COLOR: transparent" height=17 x:fmla='=SELECT("R[1]C")' x:bool="TRUE">[SIZE=2]=SELECT("R[1]C")[/SIZE]</TD></TR><TR style="HEIGHT: 12.75pt" height=17><TD class=xl25 style="BORDER-RIGHT: #d4d0c8; BORDER-TOP: #d4d0c8; BORDER-LEFT: #d4d0c8; BORDER-BOTTOM: #d4d0c8; HEIGHT: 12.75pt; BACKGROUND-COLOR: transparent" height=17 x:fmla="=PASTE()" x:bool="TRUE">[SIZE=2]=PASTE()[/SIZE]</TD></TR><TR style="HEIGHT: 12.75pt" height=17><TD class=xl25 style="BORDER-RIGHT: #d4d0c8; BORDER-TOP: #d4d0c8; BORDER-LEFT: #d4d0c8; BORDER-BOTTOM: #d4d0c8; HEIGHT: 12.75pt; BACKGROUND-COLOR: transparent" height=17 x:fmla="=CANCEL.COPY()" x:bool="TRUE">[SIZE=2]=CANCEL.COPY()[/SIZE]</TD></TR><TR style="HEIGHT: 12.75pt" height=17><TD class=xl25 style="BORDER-RIGHT: #d4d0c8; BORDER-TOP: #d4d0c8; BORDER-LEFT: #d4d0c8; BORDER-BOTTOM: #d4d0c8; HEIGHT: 12.75pt; BACKGROUND-COLOR: transparent" height=17 x:bool="FALSE">[SIZE=2]= IF(ACTIVE.CELL()=0,GOTO(Checksum))[/SIZE]</TD></TR><TR style="HEIGHT: 12.75pt" height=17><TD class=xl25 style="BORDER-RIGHT: #d4d0c8; BORDER-TOP: #d4d0c8; BORDER-LEFT: #d4d0c8; BORDER-BOTTOM: #d4d0c8; HEIGHT: 12.75pt; BACKGROUND-COLOR: transparent" height=17 x:fmla="=SELECT.SPECIAL(5)" x:bool="TRUE">[SIZE=2]=SELECT.SPECIAL(5)[/SIZE]</TD></TR><TR style="HEIGHT: 12.75pt" height=17><TD class=xl25 style="BORDER-RIGHT: #d4d0c8; BORDER-TOP: #d4d0c8; BORDER-LEFT: #d4d0c8; BORDER-BOTTOM: #d4d0c8; HEIGHT: 12.75pt; BACKGROUND-COLOR: transparent" height=17 x:fmla="=BORDER(6,0,7,0,7,,0,,0,,0)" x:bool="TRUE">[SIZE=2]=BORDER(6,0,7,0,7,,0,,0,,0)[/SIZE]</TD></TR><TR style="HEIGHT: 12.75pt" height=17><TD class=xl25 style="BORDER-RIGHT: #d4d0c8; BORDER-TOP: #d4d0c8; BORDER-LEFT: #d4d0c8; BORDER-BOTTOM: #d4d0c8; HEIGHT: 12.75pt; BACKGROUND-COLOR: transparent" height=17 x:fmla="=SET.PRINT.AREA()" x:bool="TRUE">[SIZE=2]=SET.PRINT.AREA()[/SIZE]</TD></TR><TR style="HEIGHT: 12.75pt" height=17><TD class=xl25 style="BORDER-RIGHT: #d4d0c8; BORDER-TOP: #d4d0c8; BORDER-LEFT: #d4d0c8; BORDER-BOTTOM: #d4d0c8; HEIGHT: 12.75pt; BACKGROUND-COLOR: transparent" height=17 x:fmla="=SELECT.END(4)" x:bool="TRUE">[SIZE=2]=SELECT.END(4)[/SIZE]</TD></TR><TR style="HEIGHT: 12.75pt" height=17><TD class=xl25 style="BORDER-RIGHT: #d4d0c8; BORDER-TOP: #d4d0c8; BORDER-LEFT: #d4d0c8; BORDER-BOTTOM: #d4d0c8; HEIGHT: 12.75pt; BACKGROUND-COLOR: transparent" height=17 x:fmla='=SELECT("Button 6")' x:bool="TRUE">[SIZE=2]=SELECT("Button 6")[/SIZE]</TD></TR><TR style="HEIGHT: 12.75pt" height=17><TD class=xl25 style="BORDER-RIGHT: #d4d0c8; BORDER-TOP: #d4d0c8; BORDER-LEFT: #d4d0c8; BORDER-BOTTOM: #d4d0c8; HEIGHT: 12.75pt; BACKGROUND-COLOR: transparent" height=17 x:fmla='=FORMAT.MOVE(10,20,"R[1]C")' x:bool="TRUE">[SIZE=2]=FORMAT.MOVE(10,20,"R[1]C")[/SIZE]</TD></TR><TR style="HEIGHT: 12.75pt" height=17><TD class=xl25 style="BORDER-RIGHT: #d4d0c8; BORDER-TOP: #d4d0c8; BORDER-LEFT: #d4d0c8; BORDER-BOTTOM: #d4d0c8; HEIGHT: 12.75pt; BACKGROUND-COLOR: transparent" height=17 x:fmla="=SELECT()" x:bool="TRUE">[SIZE=2]=SELECT()[/SIZE]</TD></TR><TR style="HEIGHT: 12.75pt" height=17><TD class=xl25 style="BORDER-RIGHT: #d4d0c8; BORDER-TOP: #d4d0c8; BORDER-LEFT: #d4d0c8; BORDER-BOTTOM: #d4d0c8; HEIGHT: 12.75pt; BACKGROUND-COLOR: transparent" height=17 x:fmla="=RETURN()" x:bool="TRUE">[SIZE=2]=RETURN()[/SIZE]</TD></TR></TBODY></TABLE>
As you can see, the procedure calls on 2 others as shown here

Code:
<TABLE style="WIDTH: 588pt; BORDER-COLLAPSE: collapse" cellSpacing=0 cellPadding=0 width=784 border=0 x:str><COLGROUP>[SIZE=2]<COL style="WIDTH: 588pt; mso-width-source: userset; mso-width-alt: 12544" width=784>[/SIZE]<TBODY><TR style="HEIGHT: 12.75pt" height=17><TD class=xl26 style="BORDER-RIGHT: #d4d0c8; BORDER-TOP: #d4d0c8; BORDER-LEFT: #d4d0c8; WIDTH: 588pt; BORDER-BOTTOM: #d4d0c8; HEIGHT: 12.75pt; BACKGROUND-COLOR: transparent" width=784 height=17>[SIZE=2]Remove[/SIZE]</TD></TR><TR style="HEIGHT: 12.75pt" height=17><TD class=xl25 style="BORDER-RIGHT: #d4d0c8; BORDER-TOP: #d4d0c8; BORDER-LEFT: #d4d0c8; BORDER-BOTTOM: #d4d0c8; HEIGHT: 12.75pt; BACKGROUND-COLOR: transparent" height=17 x:fmla='=ALERT("This operation has been cancelled or an incorrect entry has been made. Select OK to remove this transaction.",3)' x:bool="TRUE">[SIZE=2]=ALERT("This operation has been cancelled or an incorrect entry has been made. Select OK to remove this transaction.",3)[/SIZE]</TD></TR><TR style="HEIGHT: 12.75pt" height=17><TD class=xl25 style="BORDER-RIGHT: #d4d0c8; BORDER-TOP: #d4d0c8; BORDER-LEFT: #d4d0c8; BORDER-BOTTOM: #d4d0c8; HEIGHT: 12.75pt; BACKGROUND-COLOR: transparent" height=17 x:fmla='=FORMULA.GOTO("Print_Area")' x:bool="TRUE">[SIZE=2]=FORMULA.GOTO("Print_Area")[/SIZE]</TD></TR><TR style="HEIGHT: 12.75pt" height=17><TD class=xl25 style="BORDER-RIGHT: #d4d0c8; BORDER-TOP: #d4d0c8; BORDER-LEFT: #d4d0c8; BORDER-BOTTOM: #d4d0c8; HEIGHT: 12.75pt; BACKGROUND-COLOR: transparent" height=17 x:fmla="=SELECT.END(4)" x:bool="TRUE">[SIZE=2]=SELECT.END(4)[/SIZE]</TD></TR><TR style="HEIGHT: 12.75pt" height=17><TD class=xl25 style="BORDER-RIGHT: #d4d0c8; BORDER-TOP: #d4d0c8; BORDER-LEFT: #d4d0c8; BORDER-BOTTOM: #d4d0c8; HEIGHT: 12.75pt; BACKGROUND-COLOR: transparent" height=17 x:fmla='=SELECT("RC:RC[5]")' x:bool="TRUE">[SIZE=2]=SELECT("RC:RC[5]")[/SIZE]</TD></TR><TR style="HEIGHT: 12.75pt" height=17><TD class=xl25 style="BORDER-RIGHT: #d4d0c8; BORDER-TOP: #d4d0c8; BORDER-LEFT: #d4d0c8; BORDER-BOTTOM: #d4d0c8; HEIGHT: 12.75pt; BACKGROUND-COLOR: transparent" height=17 x:fmla="=CLEAR(3)" x:bool="TRUE">[SIZE=2]=CLEAR(3)[/SIZE]</TD></TR><TR style="HEIGHT: 12.75pt" height=17><TD class=xl25 style="BORDER-RIGHT: #d4d0c8; BORDER-TOP: #d4d0c8; BORDER-LEFT: #d4d0c8; BORDER-BOTTOM: #d4d0c8; HEIGHT: 12.75pt; BACKGROUND-COLOR: transparent" height=17 x:fmla='=SELECT("R[1]C")' x:bool="TRUE">[SIZE=2]=SELECT("R[1]C")[/SIZE]</TD></TR><TR style="HEIGHT: 12.75pt" height=17><TD class=xl25 style="BORDER-RIGHT: #d4d0c8; BORDER-TOP: #d4d0c8; BORDER-LEFT: #d4d0c8; BORDER-BOTTOM: #d4d0c8; HEIGHT: 12.75pt; BACKGROUND-COLOR: transparent" height=17 x:fmla='=SELECT("R[-2]C")' x:bool="TRUE">[SIZE=2]=SELECT("R[-2]C")[/SIZE]</TD></TR><TR style="HEIGHT: 12.75pt" height=17><TD class=xl25 style="BORDER-RIGHT: #d4d0c8; BORDER-TOP: #d4d0c8; BORDER-LEFT: #d4d0c8; BORDER-BOTTOM: #d4d0c8; HEIGHT: 12.75pt; BACKGROUND-COLOR: transparent" height=17 x:fmla="=RETURN()" x:bool="TRUE">[SIZE=2]=RETURN()[/SIZE]</TD></TR><TR style="HEIGHT: 12.75pt" height=17><TD class=xl25 style="BORDER-RIGHT: #d4d0c8; BORDER-TOP: #d4d0c8; BORDER-LEFT: #d4d0c8; BORDER-BOTTOM: #d4d0c8; HEIGHT: 12.75pt; BACKGROUND-COLOR: transparent" height=17></TD></TR><TR style="HEIGHT: 12.75pt" height=17><TD class=xl26 style="BORDER-RIGHT: #d4d0c8; BORDER-TOP: #d4d0c8; BORDER-LEFT: #d4d0c8; BORDER-BOTTOM: #d4d0c8; HEIGHT: 12.75pt; BACKGROUND-COLOR: transparent" height=17>[SIZE=2]Checksum[/SIZE]</TD></TR><TR style="HEIGHT: 12.75pt" height=17><TD class=xl25 style="BORDER-RIGHT: #d4d0c8; BORDER-TOP: #d4d0c8; BORDER-LEFT: #d4d0c8; BORDER-BOTTOM: #d4d0c8; HEIGHT: 12.75pt; BACKGROUND-COLOR: transparent" height=17 x:fmla='=ALERT("Your Balance is $0.00. Both the deposit and withdrawal were entered as $0.00. Select OK to remove this transaction.",3)' x:bool="TRUE">[SIZE=2]=ALERT("Your Balance is $0.00. Both the deposit and withdrawal were entered as $0.00. Select OK to remove this transaction.",3)[/SIZE]</TD></TR><TR style="HEIGHT: 12.75pt" height=17><TD class=xl25 style="BORDER-RIGHT: #d4d0c8; BORDER-TOP: #d4d0c8; BORDER-LEFT: #d4d0c8; BORDER-BOTTOM: #d4d0c8; HEIGHT: 12.75pt; BACKGROUND-COLOR: transparent" height=17 x:fmla='=FORMULA.GOTO("Print_Area")' x:bool="TRUE">[SIZE=2]=FORMULA.GOTO("Print_Area")[/SIZE]</TD></TR><TR style="HEIGHT: 12.75pt" height=17><TD class=xl25 style="BORDER-RIGHT: #d4d0c8; BORDER-TOP: #d4d0c8; BORDER-LEFT: #d4d0c8; BORDER-BOTTOM: #d4d0c8; HEIGHT: 12.75pt; BACKGROUND-COLOR: transparent" height=17 x:fmla="=SELECT.END(4)" x:bool="TRUE">[SIZE=2]=SELECT.END(4)[/SIZE]</TD></TR><TR style="HEIGHT: 12.75pt" height=17><TD class=xl25 style="BORDER-RIGHT: #d4d0c8; BORDER-TOP: #d4d0c8; BORDER-LEFT: #d4d0c8; BORDER-BOTTOM: #d4d0c8; HEIGHT: 12.75pt; BACKGROUND-COLOR: transparent" height=17 x:fmla='=SELECT("RC:RC[6]")' x:bool="TRUE">[SIZE=2]=SELECT("RC:RC[6]")[/SIZE]</TD></TR><TR style="HEIGHT: 12.75pt" height=17><TD class=xl25 style="BORDER-RIGHT: #d4d0c8; BORDER-TOP: #d4d0c8; BORDER-LEFT: #d4d0c8; BORDER-BOTTOM: #d4d0c8; HEIGHT: 12.75pt; BACKGROUND-COLOR: transparent" height=17 x:fmla="=CLEAR(1)" x:bool="TRUE">[SIZE=2]=CLEAR(1)[/SIZE]</TD></TR><TR style="HEIGHT: 12.75pt" height=17><TD class=xl25 style="BORDER-RIGHT: #d4d0c8; BORDER-TOP: #d4d0c8; BORDER-LEFT: #d4d0c8; BORDER-BOTTOM: #d4d0c8; HEIGHT: 12.75pt; BACKGROUND-COLOR: transparent" height=17 x:fmla='=FORMAT.FONT("Arial",8,FALSE,FALSE,FALSE,FALSE,0)' x:bool="TRUE">[SIZE=2]=FORMAT.FONT("Arial",8,FALSE,FALSE,FALSE,FALSE,0)[/SIZE]</TD></TR><TR style="HEIGHT: 12.75pt" height=17><TD class=xl25 style="BORDER-RIGHT: #d4d0c8; BORDER-TOP: #d4d0c8; BORDER-LEFT: #d4d0c8; BORDER-BOTTOM: #d4d0c8; HEIGHT: 12.75pt; BACKGROUND-COLOR: transparent" height=17 x:fmla='=SELECT("R[1]C")' x:bool="TRUE">[SIZE=2]=SELECT("R[1]C")[/SIZE]</TD></TR><TR style="HEIGHT: 12.75pt" height=17><TD class=xl25 style="BORDER-RIGHT: #d4d0c8; BORDER-TOP: #d4d0c8; BORDER-LEFT: #d4d0c8; BORDER-BOTTOM: #d4d0c8; HEIGHT: 12.75pt; BACKGROUND-COLOR: transparent" height=17 x:fmla='=SELECT("R[-2]C")' x:bool="TRUE">[SIZE=2]=SELECT("R[-2]C")[/SIZE]</TD></TR><TR style="HEIGHT: 12.75pt" height=17><TD class=xl25 style="BORDER-RIGHT: #d4d0c8; BORDER-TOP: #d4d0c8; BORDER-LEFT: #d4d0c8; BORDER-BOTTOM: #d4d0c8; HEIGHT: 12.75pt; BACKGROUND-COLOR: transparent" height=17 x:fmla="=RETURN()" x:bool="TRUE">[SIZE=2]=RETURN()[/SIZE]</TD></TR></TBODY></TABLE>
I would like to make some alterations to the functionality of the workbook, but with this code am unsure where to start.

I figure that I may be just better off starting a new workbook and developing code equivalents.

So, my questions are:

  • What do I have, where did it come from (Excel 4????)?
  • Is it easier to start again, or is this type of coding easy to modify once you understand it?
Any thoughts or advice appreciated.

Note: If it is useful, I can Excel Jeanie it tonight from home (still trying to get it installed at work:mad:)


ASM

p.s. Don't know why my CODE boxes are so small :eek:(there are in preview at least). Sorry if I did something wrong.
 

Blade Hunter

Well-known Member
Joined
Mar 13, 2008
Messages
3,147
Hmmmmmm, I "think" if you record a macro then run that XLW one it may actually record the VBA commands for it all. Once converted it would be easy to edit and make whatever changes you want :).

Like I said though I "think" I may well be wrong :).
 

AusSteelMan

Board Regular
Joined
Sep 4, 2009
Messages
208
Thanks Blade.

Thanks for the suggestion, unfortunately the resultant macro code is as follows.

Code:
Sub test_convert_xlw_code_to_macro()
    Application.Run Range( _
        "'Account 01.09 January 2009_TestingCopy_20091029.XLW'!Transaction")
End Sub
where Transaction is the "macro" name.

Thanks anyway.
ASM
 

Blade Hunter

Well-known Member
Joined
Mar 13, 2008
Messages
3,147
I have converted the bulk of it to the best of my abilities by putting the XL4 macro statements in a workbook on column A and the corosponding VBA code in column B.

Hopefully some other kind soul will download this and finish it off for you.

There will be a little bit of debugging as I have not used XL4 macros in about 14 years and even then I was just starting to get into coding.

The only stuff I couldn't get was the selecting.

http://www.yousendit.com/download/TzY1UXVoSU85RmJIRGc9PQ

Let me know if I can help further.

Once it's completely converted and running, post back and we can clean it up for you and add what you want.

Dan
 

AusSteelMan

Board Regular
Joined
Sep 4, 2009
Messages
208
Wow. Thanks for your time and effort Dan.

I will have a go at putting it all together - and hope that others can help point me in the right direction too.

Thanks again,
Darren
 

Forum statistics

Threads
1,082,638
Messages
5,366,699
Members
400,914
Latest member
anandkb

Some videos you may like

This Week's Hot Topics

Top