Function GetColorindex()
Application.Dialogs(xlDialogPatterns).Show
End Function


--
HTH

Bob

(there's no email, no snail mail, but somewhere should be gmail in my addy)

"pwz" wrote in message
...
Any scripts can call out the Fill Color by a customized shortcut key? It
will be excellent if it can be popped up nearby the active cell. Thanks
in advance for any help!

Pat