Code to Undo and Redo

[ABabeNChrist]

I tried to record undo and redo using Excel 2007 with no such luck.
I'm trying to find these codes so that I can attch to a custom tool bar i'm designing

[HansV]

There is no point in using Undo and Redo from code - running VBA code clears the undo/redo stack. But Excel has built-in undo and redo buttons; they have ID 128 and 129, respectively. So you could use code like this:

Dim cbb As CommandBarControl
Set cbb = CommandBars("Test").Controls.Add(msoControlSplitDropdown, 128, , , True)

[ABabeNChrist]

Hi HansV
I tried 128 and 129 and recieved the same error

No. 5 Error.JPG

[HansV]

Obviously, the code I posted was just an example. You should replace CommandBars("Test") with a reference to the custom toolbar that you're creating.

But why do you need this at all? Undo and Redo are already available on the Standard toolbar in Excel 2003 and before, and on the Quick Access Toolbar in Excel 2007 and later.

[ABabeNChrist]

Thank you HansV
I will make the changes you suggested.
I’m designing a single tool bar that will have all the needed and basic tools in a single location.
It makes it more user friendly for a beginner.
Here is how it looks so far.

Tool Bar.JPG

[rory]

Why not just add the actual Undo and Redo galleries to your tab?

[ABabeNChrist]

Hi rory
Are you referring to the Quick Access Toolbar?

[rory]

No, to your tab. Since you are using XML anyway, you might as well.

[ABabeNChrist]

Hi rory
That is what I was hoping for; all I needed was to get the code. HansV provided that I just haven’t tried it yet.

[rory]

My point is that if you use the built-in controls, you don't need any code at all - they just work! :)
All you need in your CustomUI is:
<control idMso="Undo" size="large" />
<control idMso="Redo" size="large" />

[ABabeNChrist]

Hi rory
Very cool I didnt know I could add controls to ribbon this way.
let me give it a try
Thank you

[ABabeNChrist]

Hi rory
It worked perfect, thank you

ToolBar new.JPG