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.
 

Excel Facts

Can you AutoAverage in Excel?
There is a drop-down next to the AutoSum symbol. Open the drop-down to choose AVERAGE, COUNT, MAX, or MIN
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 :).
 
Upvote 0
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
 
Upvote 0
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
 
Upvote 0
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
 
Upvote 0

Forum statistics

Threads
1,214,946
Messages
6,122,401
Members
449,081
Latest member
JAMES KECULAH

We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.
Allow Ads at MrExcel

Which adblocker are you using?

Disable AdBlock

Follow these easy steps to disable AdBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

Disable AdBlock Plus

Follow these easy steps to disable AdBlock Plus

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back
Back
Top