How to run Excel 4 macros

[bearcub]

How do you run and Excel 4 macro? I've used the Get.Cell function before in the name box but I haven't used any of the others. Are these used on the old Excel macro worksheets? I think I exposed to the macro sheets years ago when I was using Excel 95 and 97 years ago in the early 2000 but I've forgotten how they were normally used.

Like, what would I have to do to display the results for the following Excel 4 macros?

workbook.name
Workbook.move
workbook.next

I know that VBA would do this but I'm just curious how I use these in file view?

Thank you for your help,

Michael

 

[Kenneth Hobson]

Right click a sheet tab, and insert an Excel4 Macro Sheet.

=WORKBOOK.NAME("Sheet1","ken")
=HALT()

Right click the one in A1, and Run.

https://www.mrexcel.com/forum/excel-questions/393868-excel4macro-functions-lists-descriptions.html
For command list and syntax, here are some hyperlinked Word files in the ZIP file. http://www.44lbs.net/ilia/Excel4macro.zip

 

[bearcub]

Thank you, this is help.

I just downloaded the file and copied the following macro in cell A4 followed by the Half macro in A5 on the Macro sheet.


A1.R1C1(ALERT("Click OK for A1 style; Cancel for R1C1", 1))
=HALT()

Here is the explanation associated with the macro. I was expecting a dialog box to appear but nothing happens. Am I doing something wrong?

"The following macro formula displays an alert box asking you to select either A1 or R1C1 reference style. This is useful in an Autpen macro if several persons who prefer different reference styles must maintain the same workbook.?

I right clicked and selected run but I didn't get anything tho the description states that an option button will appear.

Michael

 

[Kenneth Hobson]

The first is just text since you did not add the equals sign.
=A1.R1C1(ALERT("Click OK for A1 style; Cancel for R1C1", 1))
=HALT()

VBA in ThisWorkbook might be:

Private Sub Workbook_Open()
  If vbYes = MsgBox("Use ReferenceStyle xlA1?", vbYesNo + vbQuestion) Then
    Application.ReferenceStyle = xlA1
    Else: Application.ReferenceStyle = xlR1C1
  End If
End Sub

 

[Kenneth Hobson]

This is document what I did to create the MacroFun.chm file for those that might view this thread sometime.

The MrExcel link in post #2 shows where to get MacroFun.exe, that extracts MacroFun.hlp. Of course Win10 can not open that file. I made it into a chm file. It is a fairly involved process but 3rd party software can help. I would share it but HelpScribble try for free version does not allow that. https://www.helpscribble.com/helpcompiler.html

The site explains how to decompile the hlp file. One has to install some decompile/compile applications too. Some are there but I had to install some others as well. Microsoft HTML Help Workshop installs some that I used. HelpScribble can search for what it needs in its Project > Options.

The nice thing about the chm file is that it is searchable and hyperlinked well. That is until Microsoft sunsets chm files too. The Word files document the commands well enough for most though. Decompiling MacroFun.hlp is fairly easy as HelpScibble link explains. The hlp file decompiled creates a rtf file that is somewhat similar to the Word files though the links are not active.

 

[bearcub]

Great stuff Ken, thank you for the links and the info. I'm sure this will help me understand how to use the Excel 4 macros better.

Michael

 

[pgt00]

Hi Guys,

You can download the Excel 4 Macro help/reference file as a PDF from here

https://www.myonlinetraininghub.com/excel-4-macro-functions

 

[bearcub]

thank you, I got this in the email as well but I couldn't quite figure out how to run them all.

 

[Mabocat]

I an having "great fun" with VBA trying to understand what each VBA macro line means.
At least with the old language

[TABLE="width: 629"]
<tbody>[TR]
[TD]Reset.Meal[/TD]
[TD]Reset current meal components[/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD]=ECHO(FALSE)[/TD]
[TD]Disable echo on screen[/TD]
[/TR]
[TR]
[TD]=REFTEXT(ABSREF("R[1]C[4]",!Database))[/TD]
[TD]Get start of quantity column[/TD]
[/TR]
[TR]
[TD]=REFTEXT(!Database)[/TD]
[TD]Get entire database range[/TD]
[/TR]
[TR]
[TD]=FIND(":",A18)[/TD]
[TD]Extract end of range cell[/TD]
[/TR]
[TR]
[TD]=MID(A18,A19,999)[/TD]
[TD]Get cell at bottom right of database[/TD]
[/TR]
[TR]
[TD]=A17&LEFT(A20,FIND("C",A20))&5[/TD]
[TD]Form reference to quantity column[/TD]
[/TR]
[TR]
[TD]=SELECT(TEXTREF(A21))[/TD]
[TD]Select it[/TD]
[/TR]
[TR]
[TD]=CLEAR(3)[/TD]
[TD]Clear all quantities enter by user[/TD]
[/TR]
[TR]
[TD]=SELECT("RC:RC")[/TD]
[TD]Clear selection[/TD]
[/TR]
[TR]
[TD]=RETURN()[/TD]
[TD]Return to caller[/TD]
[/TR]
</tbody>[/TABLE]

it was clear what was happening and having a paper manual made life easier than trying to read on-line and create VBA macros.
As far as I can see Excel 2010 will read the old language but while one maybe able to write the language, try to save the file !!!