The selected cell will be formatted when the user makes a selection from the
dialog.

So you can read the color from the cell.

Or, better yet, how can I display the 'Format Cells' dialog in a macro?
application.CommandBars("Format").Controls(C&ells. ..").Execute




--
Regards,
Tom Ogilvy

"Mick" wrote in message
...
If I use the following in a macro, how can I get the selected color after
the
user clicks the OK button? Is there another way to display a color
selection
dialog?

Or, better yet, how can I display the 'Format Cells' dialog in a macro?


Dim bResult As Boolean
bResult = Application.Dialogs(xlDialogColorPalette).Show