Forum Discussion
XLM Macros no longer able to edit at all?
After a lengthy Microsoft update today, I am unable to update an old XLM macro which has been working quite happily once a month up until now. I followed the instructions on the help as best I cou...
Is that checkbox not there at all for you, or is it disabled?
At first you say you are not able to update the macro. But later in your message you say you cannot run it. What do you need to be able to do?
Can you post the macro steps? Perhaps it is easy enough to translate into a VBA macro.
At first you say you are not able to update the macro. But later in your message you say you cannot run it. What do you need to be able to do?
Can you post the macro steps? Perhaps it is easy enough to translate into a VBA macro.
JKPieterse The option doesn’t come up for me at all. The macro isn’t very elegant and requires me to edit the date and a cash amount before I run it. It appears to allow me to edit but then won’t run.
- I don’t actually know how I could post the macro steps into this forum.
NEWPAGE 040324 =OPEN("D:\LINDA\MDDMMYY1.XLS") 12 =SET.NAME("LAST",LASTMONTH) =SET.NAME("next","040424") =SET.NAME("DDCOL",DDCOLUMN+1) =SAVE.AS("D:\LINDA\M"&next&".XLS",1,"",FALSE,"",FALSE) =SELECT("R30C12") =FORMULA(MID(next,1,2)&"/"&MID(next,3,2)&"/"&MID(next,5,2)) =SELECT("R3C6") =FORMULA("3845.18") =SELECT("C6") =FORMAT.NUMBER("0.00") =SELECT("R5C6") =FORMULA("=[CASHBOOK.XLS]DIRECTDB.XLS!R21C"&DDCOL) =ACTIVATE("[CASHBOOK.XLS]DIRECTDB.XLS") =WORKBOOK.SELECT("[CASHBOOK.XLS]M"&LAST&".XLS","[CASHBOOK.XLS]M"&LAST&".XLS") =WORKBOOK.ACTIVATE("[CASHBOOK.XLS]M"&LAST&".XLS",FALSE) =SELECT("R33C8:R44C9") =COPY() =ACTIVATE("m"&next&".xls") =SELECT("R11C8") =PASTE() =ACTIVATE("m"&next&".xls") =PASTE() =SELECT("R6C6") =CANCEL.COPY() =FORMULA("=SUM(R[5]C[3]:R[10]C[3])") =SELECT("R10C6") =FORMULA("=SUM(R[7]C[3]:R[21]C[3])") =HLINE(1) =SELECT("R11C10") =FORMULA("'*") =SELECT("R11C10:R12C10") =FORMULA("'*") =SELECT("R11C10") =FILL.AUTO("RC:R[5]C",FALSE) =SELECT("R19C4") =ACTIVATE("[CASHBOOK.XLS]M"&LAST&".XLS") =SELECT("R19C4:R22C5") =COPY() =ACTIVATE("m"&next&".xls") =PASTE() =SELECT("R1:R16384") =ACTIVATE("[CASHBOOK.XLS]M"&LAST&".XLS") =WORKBOOK.ADD("M"&next&".XLS","CASHBOOK.XLS",1) =WORKBOOK.SELECT("MDDMMYY","MDDMMYY") =WORKBOOK.NAME("MDDMMYY","M"&next&".XLS") =SET.VALUE(LASTMONTH,next) =SET.VALUE(DDCOLUMN,DDCOL) =SET.NAME("next") =SET.NAME("DDCOL") =RETURN()
- have posted the macro
