Hi all,

Is it possible to provide default values for a user when usin
"Application.Dialogs(xlDialogSortSpecial).Show " on a "user interfac
only" protected sheet?

I'd like to use the following recorded code* to provide default value
in the "SortSheet" macro.

*Selection.Sort Key1:=Range("B12"), Order1:=xlDescending, Key2:=Range
_
"D12"), Order2:=xlDescending, Key3:=Range("E12")
Order3:=xlAscending, Header:=xlYes, OrderCustom:=1, MatchCase:=False
Orientation:= xlTopToBottom, DataOption1:=xlSortNormal
DataOption2:=xlSortNormal, DataOption3:=xlSortNormal

Sub SortSheet()
'to allow sheet sorting on the "user interface only" protected sheet
requires use of a _
named range "Sort_Area"
Range("'" & ActiveWorkbook.Name & "'!Sort_Area").Select
Application.Dialogs(xlDialogSortSpecial).Show
'optional MsgBox "Page is sorted as requested."
End Sub

btw, I have offered the above macro as a suggestion i
http://www.excelforum.com/showthread.php?t=501367.


thanks in advance,
Rob Brockett
NZ
Always learning & the best way to learn is to experience..

--
broro18
-----------------------------------------------------------------------
broro183's Profile: http://www.excelforum.com/member.php...fo&userid=3006
View this thread: http://www.excelforum.com/showthread.php?threadid=50142