Enviar 2 rangos en el cuerpo de un mail

[rhacko]

Buenas a todos, he estado buscando por el foro, y no encuentro o no se encontrar nada referente a lo que quiero hacer.

Mi idea es que al ejecutar el macro, me envíe un mail con 2 rangos de diferentes hojas en el cuerpo del mail, visualizando todos los elementos que hay dentro de esos rangos, por ejemplo fotos, colores, etc.

En un principio he encontrado la solución de un solo rango gracias a los códigos de "Ron de Bruin", pero no consigo que me mande 2 rangos en el cuerpo.

El código de " Ron de Bruin" es este:

Sub Send_Range_Or_Whole_Worksheet_with_MailEnvelope()

    Dim AWorksheet As Worksheet

    Dim Sendrng As Range

    Dim rng As Range

    On Error GoTo StopMacro

    With Application

        .ScreenUpdating = False

        .EnableEvents = False

    End With

    Set Sendrng = Worksheets("Sheet1").Range("A1:B15")

    Set AWorksheet = ActiveSheet

    With Sendrng

        .Parent.Select

        Set rng = ActiveCell

        .Select

        ActiveWorkbook.EnvelopeVisible = True

        With .Parent.MailEnvelope

            .Introduction = "This is test mail 2."

            With .Item

                .To = "mail"

                .CC = ""

                .BCC = ""

                .Subject = "My subject"

                .Send

            End With

        End With

        rng.Select

    End With

    AWorksheet.SelectStopMacro:

    With Application

        .ScreenUpdating = True

        .EnableEvents = True

    End With

    ActiveWorkbook.EnvelopeVisible = False

End Sub[/CODE]

Muchas gracias

[Antoni]

Júntalos en una hoja de trabajo y envíalos como uno solo.

[rhacko]

Muchas gracias por la rapidez, y perdonar por no haberme explicado mejor. Tengo en un Excel dos hojas con varias informaciones para visualizarlas mejor, pero de esas informaciones tengo que enviar varios mail con la información de un rango de la primera hoja y otro rango de la segunda hoja. Cada mail que envió son rangos diferentes por eso no los puedo juntar en rangos correlativos, porque cada uno de los mail necesito enviar una información diferente. Pido disculpas por no explicarlo bien en el primer mail. Muchas gracias