Enviar mail desde Excel VBA

Preguntas y respuestas relacionadas

Macro Worksheet_Change no funciona más de una vez

Espero me puedan ayudar con lo siguiente: Esta macro me ejecuta otra macro al cambiar el valor de la celda especificada. 1 Sub Worksheet_Change(ByVal Target As Range) 2 Dim rng As Range 3 Set rng = Range("A7") 4 If Intersect(Target, rng) Is Nothing...
1 respuesta

¿Cómo meto datos en un datagrid de uno por uno?

Este es mi código y quiero que me ayudes en la ultima parte tengo 1 datagrid 2textbox 2 botones Lo que quiero es que al dar clic en un botón se agregue el nombre de un alumno y de su calificación hasta ahora solo se agregan 5 de golpe y quiero que se...
1 respuesta

Seleccionar todos los correos de un formulario de Clientes

A tod@s a ver si podéis darme alguna ayuda. Tengo un formulario desde el cual quiero mandar el mismo correo a todos los Clientes relacionados en el mismo Form. Nombre de la Tabla: MAESTROCLIENTES Campo Email: CORREO Necesito que a través de un botón...
1 respuesta

Marcar automáticamente datos iguales en celdas excel y contar datos iguales por línea

Pregunta dirigida a Dante Amor, Tras el uso de la macro que me facilitaste: ( la cual copio y pego). Private Sub Worksheet_Change(ByVal Target As Range) 'Por.Dante Amor If Not Intersect(Target, Range("A:E")) Is Nothing Then...
1 respuesta

Cómo Configurar PHPMailer con Hostalia

Estoy intentando configurar un formulario web mediante la librería de PHPMailer en un hosting de Hostalia. Con un fichero como este ¿<?php use PHPMailer\PHPMailer\PHPMailer; use PHPMailer\PHPMailer\Exception; require...
1 respuesta

Volcado de txt a listbox

A ver si puedes echarme una mano en una cosa que tengo encasquillada. Tengo un documento .dat (un bloc de notas), y quiero volcarlo en un listbox, es decir que todo lo que me sale en el bloc de notas volcarlo en un listbox o si piensas que puede ser...
3 respuestas

Filtrar tabla dinámica por valor de celda

Tengo la siguiente macro, que la vi en otro blog; Private Sub Worksheet_Change(ByVal Target As Range) If Not Intersect(Target, Range("F1")) Is Nothing Then Dim hoja As Worksheet Dim td As PivotTable 'Recorrer todas las hojas del libro For Each hoja...
1 respuesta

Problema con servicio de Windows hecho en VB.NET

Hice un servicio de Windows que es un conversor de archivos pero cuando lo ejecuto me tira el siguiente error: No se puede iniciar el servicio ... En equipo local. Error 1053: El servicio no ha respondido a la petición o inicio del control en un...
3 respuestas

Envío de formulario por email usando cdonts

He querido aprender como enviar un formulario por email usando asp, conseguí este código que me parece sencillo, usa cdonts, anteriormente probé con aspmail pero me dio problemas porque mis pruebas las hago en una pc win xp pro pero el aspmail me...
6 respuestas

ERROR 3021 en tiempo de ejecución. Intentando realizar una búsqueda en base de datos.

Aquí un nuevo error en el programa que estoy tratando de ejecutar, el programa es sencillo, llenar una base de datos de unos productos, pero que al intentar ingresar me revise primero si ya existe uno con el CODIGOPRODUCTO que se esta introduciendo,...
2 respuestas
¿No es la pregunta que estabas buscando?
Puedes explorar otras preguntas de los temas