You can create a button and assign the code to it like that

With Selection
.SpecialCells(xlCellTypeVisible).Select
.Copy
End With

Regards.

"Shawn" wrote:

There is an odd quirk between Excel and Outlook in that if you copy a range
of filtered data and past the table in an Outlook e-mail and send it out, in
the e-mail sent all of the hidden rows are invisible, but when the recipient
replies or forwards the e-mail, all of the hidden cells are exposed,
defeating the puprose of filtering and only included a small subset of data.

I know there is a button to copy only visible cells, but is there a way
through excel settings or VBA to completely disable this functionality and
AWAYS only select visible rows?