I want to know
How match application.undo to cancel event
sub () Dim a(1 to 2) as double Application.enableEvents =False With [A1:D1] .unMerge .select .Fontsize =12 s(1)=.cells(1).columnWidth s(2)=.cells(1).RowHeight .cells(1).columnWidth=s(1) Application.undo 'i want undo events unMerge to Fontsize 'Its posibel use Undo 'I want only save s(1) and s(2) then i want 'undo all event before application.undo .rowHeight=s(2) End with Application.enableEvents =true End sub
Bookmarks