Help with Excel to Outlook E-mail

[Ingenium]

Hello!

I need some desperate help with a spreadsheet and Visual Basic.

Users fill in some fields on the spreadsheet, then tick some boxes and hit a "send e-mail" button. Visual Basic then copies a selection of the spreadsheet into the body of on Outlook e-mail and populates the recipients based on what tick boxes were selected in the spreadsheet. Unfortunately, when clicking "send e-mail", I get an error saying "unable to get the SpecialCells property of the Range class".

I've changed real e-mail addresses in the code to addresshere for obvious reasons.

This is in VBAProject > Microsoft Excel Objects > Sheet1

Please Login or Register  to view this content.

This is in VBAProject > Modules > Module1

Please Login or Register  to view this content.

Any ideas why it's failing at the "For Each cell In Columns("P").Cells.SpecialCells(xlCellTypeVisible)" line?

[dangelor]

It usually means there were no visible cells in the range. Try rewriting your code without using Activesheet or Activecell. Be aware that select and active are not necessarily the same thing.