Estimados, tengo este código para enviar por correo una hoja de excel. Worksheets("Hoja1").Activate With ActiveSheet.MailEnvelope .Introduction = "Te adjunto la información que me solicitaste." & vbCrLf .Item.To = "destinatario@hotmail.com" 'Destinatario .Item.Subject = "Asunto" .Item.Send 'Enviamos el e_mail End With ActiveWorkbook.Save Pero, quisiera saber 3 cosas: - El archivo que envía lo envía adjunto. - Que tiempo se demora en llegar, ya lo hice 3 y no me llega el correo. - Existe otro código más efectivo, o estoy haciendo algo mal. Gracias por sus opiniones!

Saludos, El archivo que adjunto contiene una tabla que deseo que se actualice automáticamente en cada producto que se le de entrada. En dicho archivo detallo de que se tratade manera más explícita. Agradezco cualquier ayuda. EJEMPLO ACTUALIZAR.rar

Tengo una hoja llamada Mat1 que ha sido generada por una macro, donde se crean filas con el contenido "Este estándar de aprendizaje no ha sido seleccionado para evaluar este trimestre" ....y quiero eliminar las filas con ese contenido. Ver enlace de las filas a eliminar. https://www.dropbox.com/s/5eihaca4cxwdrxq/eliminar_filas.jpg?dl=0 ¿Cómo puedo eliminar dichas filas?. Pueden poner el código entero, porque no acierto. El Archivo es este: https://dl.dropboxusercontent.com/u/106819383/apoyo1%C2%BA.xlsm Un saludo y gracias.

Buenas tardes a los miembros de este foro, en esta ocasión solicito vuestra colaboración y ayuda para mejorar la macro que estoy utilizando para remitir reporte de consolidados,para lo cual adjunto los archivos y el error radica esta parte Range("B8:AO17"). Copy., La AO17 (problema) debe ser la ultima fila de cada archivo y como es lógico son variables como por ejemplo una tiene 113, 36, 28, etc., para ellos necesito que a ejecutarse la macro solo permita leer la última fila (SIN INCLUIR LA SUMA TOTAL). A la espera de su respuesta quedo de uds. Agradecidos. UNION DE CONSOLIDADOS.part01.rar UNION DE CONSOLIDADOS.part02.rar UNION DE CONSOLIDADOS.part03.rar UNION DE C…

Hola Me gustaría que mi macro inserte o elimine celdas según la cantidad de datos que tenga en los rangos seleccionados de la hoja "Pendientes"al momento de copiar los datos en la celda A43 de la ultima hoja. Por ejemplo si en mi hoja "pendientes" hay 25 datos en la columna del rango C5:C29 entonces al momento de copiar los datos a la ultima hoja de la celda A43 tengo espacio para 15 datos me inserte las 10 que falten y pegue los datos. De la misma manera si en la hoja "Pendientes" Hubiesen 5 datos y en mi ultima hoja hay espacio para 15 datos me elimine las 10 celdas que quedan en blanco. Cuadre de Compras y TransferenciasMocache Macro.xls

He entrado y leido en varias WEBs buscando API o APIs solamente para poder abrir libros con macros creadas en Office x86 y quiero poder abrir los mismos en Office x64 sin recibir alguna advertencia o mensaje sobre (PtrSafe) la declaración de las APIs. En la pagina de Microsoft, aqui otra SOLO para ese fin, poder abrir libros sin mensage sobre el (PtrSafe) y que mensiona ademas de macros incompatibles con la aplicacion

Hola La duda que tengo, y por la que me gustaría recibir ayuda, es que quiero hacer una copia de seguridad de un libro, que me lo guarde en pdf y en la ruta que indica una celda. Por ejemplo, si en la celda B4 está escrito C:\Copias\Datos\ , cuando se guarde la copia del libro, en pdf, lo hará dentro de la subcarpeta Datos. Muy agradecido de antemano saludos ejemplo.zip

He estado buscando y no encuentro nada por el foro, o no he buscado bien. Utilizo una hoja Excel para el control horario de los trabajadores, y la tengo que utilizar todos los meses.. En el archivo se incluye una macro para imprimir las hojas, cuando van cambiando el código del trabajador con sus datos correspondientes, no sé si es la más ortodoxa, pero lo que he podido hacer. En un mes, aparecen los días laborales, los sábados y los domingos, y cuando es sábado la celda tiene un color, y cuando es domingo tiene otro. Quiero que cuando en la columna del día del mes, la celda que tenga color, por ejemplo A2, el rango de B2 a H2 tenga el mismo color. …

Necesito una fórmula que me coja una serie de valores que hay en una hoja2 y me los muestre en forma de gráficas en una hoja1. Tiene que ser mediante rangos y tal para que cada vez que actualize la hoja2 con nueva información, las gráficas sigan saliendo. Adjunto archivo comprimido en un winrar. Gracias de antemano. graficas.rar

Estimados Expertos. Tengo unos datos que extraigo de una tabla dinamica, necesito pasar estos datos a varias tablas por separado según el valor de la columna llamada ABREVIADO, en el archivo adjunto se encuentra una muestra de lo que necesitaría. Agradecere su apoyo al respecto. Yeagob Ayuda excel.zip

Buenos Dias, Ayer no obtuve respuestay probare hoy de nuevo, Gracias a la ayuda del forista y amigo "pajuma" tngo esta macro que me hace que en una lista de codigo de cuentas con su nombre de cta, me elimine unas cuentas que tengo en otra lista. Ahora bien, la macro funciona casi perfecta solo que me elimina el formato de las celdas de abajo y unas formulas ocultas que se encuentran en ellas (las celdas de abajo). En el archivo adjunto, la primera pestaña llamada "Gastos estimados por el áre (2" es el archivo antes de activar la macro, el la pestaña siguiente llamada "Gastos estimados por el área" es como me deja la macro el archivo (visualicen desde las fila 63 para a…

Buenos días, me preguntaba si existe alguna manera de ordenar las filas de datos según los numeros de la columna C de la hoja 2 (de mayor a menor) . he intentado hacerlo de varias maneras pero no me sale ni a tiros, más o menos he localizado donde lo tengo que hacerlo pero... no hay manera Aquí os dejo el archivo Gracias a todos Cálculo.zip

hola amigos de excel buen dia, he tenido un inconveniente con la siguiente macro que me ayudaron hacer en este foro, lo que se necesita que haga la macro es que cuando le realize el pago en el formulario, vaya a la hoja de base de datos y me resalte la celda que tenga la fecha de hoy, pero solo las personas que estan clikqueadas en el listbox que simbolizan que pagaron la cuota, y segundo que cuando se haya paga el total de las prestamo sea eliminado y de la base de datos y se guarde en un historico de prestamos y me relacione la informacion que esta en esa hoja, saludos espero me pueden colaborar fecha.rar

Saludos a todos. Soy nuevo en este tema de programación VBA en Excel y solicito de su ayuda para resolver un pequeño problema. Desde una hoja hecha en Excel tengo un listado en la columna "A" que tiene diferentes valores que necesito se envíen a un programa en MSDOS y tomar algunos datos de esa consulta para ponerlos en las Columnas B, C, etc. Espero haberme explicado bien. De antemano muchas gracias.

Buenas tardes a todos los miembro del Foro, en esta ocasión necesito su ayuda en una macro que tengo la cual me permite inserta filas automáticamente a presionar en el botón INSERTAR FILAS, pero a la vez tengo una la formula en el texto donde indica TOTAL GENERAL "=SUMA(L8:L9)" y lo que necesito es que si inserto 5 mas 2 que tengo por defecto mi formula suma debería incrementar a =SUMA(L8:L14), pero no permite hacer este cambio. Desde ya agradezco su apoyo y colaboración. AYUDA CON FORMULA PLANTILLA ELECTRONICA.part1.rar AYUDA CON FORMULA PLANTILLA ELECTRONICA.part2.rar

buenas noches, quisiera saber si puedo mejorar mi macros que se encuentra en el evento change de la hoja de calculo de Excel, son códigos de cálculos básicos, además si me pudieran ayudar a reducir el código o darme algún tip para reducirlo yo mismo estaría muy agradecido. de ante mano muchas gracias Private Sub Worksheet_Change(ByVal Target As Range) Application.ScreenUpdating = False Application.Calculation = xlManual Application.EnableEvents = False If Not Intersect(Target, Range("$L$5:$Y$9")) Is Nothing Then Sub todo() Range("E22") = WorksheetFunction.Sum(Range("E4:E21")) Range("E23") = Wo…

Estimados del foro, Hace un tiempo cree una CommandBar usando el editor xml UI. El caso es que existen opciones de esta CommandBar que deseo se desactiven en un momento dado. He bajado alguno ejemplo desde el sitio del creador, pero no hacen el efecto dado. La idea: Sub EnableControlsWithCertainTag2() 'Enable only the controls with a Tag that start with "Group2" Call RefreshRibbon(Tag:="Group1Button1*") End Sub [/CODE] [CODE] Sub RefreshRibbon(Tag As String) MyTag = Tag If Rib Is Nothing Then MsgBox "Error, Save/Restart your workbook" & vbNewLine & _ "Visit this page for a solution: http://www.rondebruin.nl/rib…

Buenas tardes, me pueden ayudar no me pone el Si y la Hora en el codigo ELECCIONES1.xlsm

Estoy pasando datos de un TextBox con formato de fecha dd/mm/yyyy en VBA, para posterior guadar los datos en una tabla en una hoja de excel, el detalle es que al guardar el formato cambia a mm/dd/yyyy y no puedo encontrar donde se esta generando

Me gustaría que me ayuden tengo un form de un gran experto(Gerson Pineda) pero como el dijo que podemos readucuarle para nuestro uso y eso estoy haciendo pero en el columna "Legajo" me gustaria ingresar fechas y que claro en textbox de "Legajo" filtre fecha asi mismo la columna "Categoría" ingresar datos alfanuméricos para poder filtrar estos igual por dicho textbox "Categoría", no se si es mucho pedir. Yo se que sería lo lógico que el Experto dueño de la aplicación lo haga pero creo que hay otros expertos que pueden modificar este código. Gracias al experto Gerson por compartir esta aplicación y de antemano gracias a quien lo pueda modificar y darnos una mano yo se que m…

Buen día, tengo un problema con el cuadro de listbox en un formulario de vb, el cual cuando esta en ejecución funciona, luego de agregar un registro, presiono el botón cerrar del formulario y lo cierra todo el libro de trabajo y sin grabar por favor si me pueden ayudar. El código que estoy usando para cargar el listbox del formulario con 5 columnas de datos es esta, el problema surge cuando cierro el formulario y se sale sin grabar; pasa lo mismo cuando uso el Me. list... Sub cargar_lista() Dim fila As Long fila = Hoja1.Range("A" & Rows.Count).End(xlUp).Row frm_proveedores.lis_proveedores.RowSource = Hoja1.Range("A2:E" & fila).A…

Hola, buenos días a todos: Les externo mi duda: como hago para que mi macro que utiliza arreglos, defina tamaño en base a según vayan llenándose éstos? (pues se van llenando con datos de registros en base a ciertas condiciones). Pues me manda un error si no le pongo tamaño desde un inicio que los tenía declarados de esta forma: Dim id() As Integer

Estimados, necesitaría que me ayudaran a resolver algunos problemitas que tengo con un formulario. Les adjunto el archivo y las explicaciones están dentro del mismo. Desde ya muchas gracias. Ejemplo Formulario.rar

Hola a todos y gracias de antemano por su tiempo en mi siguiente consulta. Se necesita que en la columna "J" (encabezado 555 NO) se haga la combinación de celda por cada borde. Ejemplo en la "J11:J17" realizar la combinación, "J4:J6" también hacer la combinación de celda. El archivo es un ejemplo, el original tiene como 12000 bordes. Gracias nuevamente por su atención. Saludos. Combinar celda.xls

Buenas, Estoy realizando una presentación para un trabajo de la universidad y tengo una duda respecto a la utilización de las macros y los botones de opción. He utilizado un cuadro combinado para tener una lista despegable con los distintos nombres de las cuentas a presentar y he vinculado el valor en una celda según el orden secuencial de la cuenta en mi base de datos. Quisiera saber como podría presentar la información por años y trimestres para cada cuenta y que cambien los valores al seleccionar las diferentes opciones, cambiando la cuenta en el cuadro de lista posteriormente el año y que aparezcan los valores. He estado pensando sobre si volver a escribir la inf…