Greetings! Macro Question (Emailing).

[Madakushka]

Hello All!

I have been searching these forums and my friend Google for any indication as to why I am having the issue at hand (user error most likely).

I have created a Macro to email a range of cells to a mailing list of my choosing. However when I email said range, which includes grouped rows that are collapsed, the recipients do not receive the email with those grouped rows collapsed. For some reason the email defaults the expanded view of the grouped rows (which is upwards of 300 rows) and is rough to view on a smart phone/etc.

The Macro I am using is the quick and easy one supplied from Microsoft's website. Thanks for reading and for any ideas as I am new to this!

ActiveSheet.Range("A2:O109").Select

ActiveWorkbook.EnvelopeVisible = True

With ActiveSheet.MailEnvelope
.Introduction = ""
.Item.to = "EmailAddress"
.Item.Subject = "Subject" & Time
.Item.Display
End With

 

[trunten]

the recipients do not receive the email with those grouped rows collapsed

do you want them to receive those values at all? Or is it OK to strip them completely before sending?

 

[AlphaFrog]

This unhides all the collapsed rows before emailing.

    ActiveSheet.Range("A2:O109").Select
    [COLOR="Red"]Selection.EntireRow.Hidden = False[/COLOR]
    
    ActiveWorkbook.EnvelopeVisible = True
    
    With ActiveSheet.MailEnvelope
    .Introduction = ""
    .Item.to = "EmailAddress"
    .Item.Subject = "Subject" & Time
    .Item.Display
    End With