He creado una macro donde rellenas una plantilla y esta la puedes copiar y enviar lo seleccionado por correo.
Me funciona perfectamente en Excel 2013, pero si lo quiero utilizar en otro ordenador que no tenga la misma versión esta me da un error:
"Error de compilación modulo oculto: correos, este error suele ocurrir cuando el código es incompatible con la versión"
También cuando salgo del Excel, este si lo vuelvo abrir se queda bloqueado. En Excel desarrollador->herramientas->referencias; tengo marcado, Adjunto imagen.
¿Cómo puedo realizar las macros en Excel 2010 para que sean compatibles en versiones distintas?
Adjunto el código para los envios de correo, me funciona bien. Lo que pasa que cuando cierro el Excel, este me deja como una hoja en blanco:
Sub correo()
Dim olApp As Outlook.Application
Set olApp = CreateObject("Outlook.Application")
Dim olMail As Outlook.MailItem
Set olMail = olApp.CreateItem(olMailItem)
Dim envio As String
Dim copia As String
Dim Asunto As String
'Subject
Asunto = Envío correo Plantilla
'ADJUNTO EN CUERPO DEL CORREO EL RANGO SELECIONADO.
Worksheets("datosplantilla").Range("A1:P12").Select
Selection.Copy
With olMail
.To = envio
.Subject = Asunto
.CC = copia
.Body = " PLANTILLA OBA"
' PARA PODER ADJUNTO LO SELECCIONADO, HAY QUE AÑADIR Display, SendKeys Y DoEvents, SI NO QUIERES LOS QUITAS.
.Display
SendKeys "^({v})", True
DoEvents
.Send
End With
End Sub