Poner firma personal de outlook en macro de excel

Hice una macro para envío de correo en excel, la macro si hace todo bien excepto que no incluye la firma del usuario y no encuentro como incluir la firma personal que el usuario se haya creado en outlook en el body del correo como normalmente lo hace outlook si se enviara el correo desde ahí... ¿hay alguna manera de hacerlo? ¿Alguna propiedad etc? ..

1 Respuesta

Respuesta
1
'Tienes que agregar la referencia a tu proyecto:
'Microsoft Scripting Runtime
sub abrirarchivodefirma()
Dim Fso As New FileSystemObject
Dim ts As TextStream
Dim renglon As String
Dim firma As String
'tienes que buscar el archivo que contiene tu firma
'por ejemplo la firma que yo cree se guardo en:
'C:\WINDOWS\Application Data\Microsoft\Signatures\Firma.txt
'entonces decimos que
firma = "C:\WINDOWS\Application Data\Microsoft\Signatures\Firma.txt"
'abres archivo firma
Set ts = Fso.OpenTextFile(firma, ForReading, False)
'recorres el archivo firma, agregandola al cuerpo del mensaje
Do Until ts.AtEndOfStream
renglon = ts.ReadLine
tuvariablebody = tuvariablebody & renglon
loop
'cierras archivo firma
ts.Close
end sub
'PD: me gustaria que me compartieras ese archivo para enviar correos desde excel.
'
Finaliza la pregunta
Gracias por el apopyo.. solo tuve duda respectop a utilizar la version html o la txt.. elegí la segunda y ya encaminado busque y encontré como usar la version html..

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas

Añadir attach para enviar mail desde Excel

Tengo esta macro que conseguí en la red. Desde Excel lanza Outlook con la información que incluyo en el código, envía un email a varios destinatarios, me personaliza y formatea el titulo, me deja escribir varias líneas en el mensaje... Etc, pero lo...
1 respuesta

Ejecutar macro solo en una hoja del libro

Tengo un excel con una macro que consiste en darle a un boton, y se envía el texto de esa página en un mail (a unos destinatarios y un asunto concreto, que tu previamente has configurado en la macro). El problema es que yo copio esa hoja, con ese...
1 respuesta

Archivos de Texto

Tengo un archivo plano txt, el cual contiene una serie de registros, y sus campos se encuentran separados por ";" (punto y coma). Necesito modificar ese archivo de modo que cada campo est'he separado por tabuladores; es decir, hacer de forma...
1 respuesta

Obtener la MAC del pc cuando pincha un link

Tengo una db donde se van insertando las ip´s de los equipos que clican un link, como son empresas las que acceden a dicho link, se suele repetir a menudo la misma ip (IP publica) ya que no me hace diferencia de los equipos de una misma empresa. Yo...
2 respuestas

Macro para enviar archivo Excel por Correo Predetermin

Tengo diseñada una Macro que me envia una solo hoja de un libro de excel en forma automatica a una direccion de correo preestablecido a traves del Outlook. Pero ahora estoy nesecitando que la macro me reconosca no el Outloolk sino el programa de...
1 respuesta

Tengo una macro que envía correos, pero no envía la firma, ¿Cómo adjunto una firma?

Sub SendMail() Dim strReportName As String Dim strReportName2 As String 'Declaración de variables Dim objOutlook As Object Dim objMail As Object Dim objOutlookAttach As Object Dim Dan As String Dim Rafa As String P = 2 For F = P To 50 L = Cells(P,...
1 respuesta

Exportar de Excel a un archivo de texto

Necesito exportar un rango de datos de Excel de longitud variable a un archivo de txt en una ruta fija 'el rango lo selecciono Range("E1").Select Range(Selection, Selection.End(xlDown)).Select en las celdas de la hoja hay otros datos que no necesito...
1 respuesta

Remote_ADDR

Tengo una db donde se van insertando las ip´s de los equipos que clican un link, como son empresas las que acceden a dicho link, se suele repetir a menudo la misma ip (IP publica) ya que no me hace diferencia de los equipos de una misma empresa. Yo...
2 respuestas

Exportar informe de Access a un archivo TXT sin saltos de líneas

Intento exportar un informe diseñado en Access a un archivo .TXT, el cual tiene campos con máscaras muy específicas y debe ser continuo, pero se insertan líneas en blanco de manera automática. ¿Cómo exportar el mencionado informe sin saltos de líneas?
1 respuesta

Importar archivos de texto en Access

Intento importar 100 o más archivos de texto a una simple tabla para access con dos campos, el primer campo para el nombre del archivo y el segundo campo (memo) para el texto que contiene el archivo *.txt. ¿Es esto posible con alguna macro o con...
1 respuesta