En el documento zip adjuntado he conseguido poner en el commandbutton ENVIAR un código para enviar un mail desde mi cuenta de gmail pero no sé bien como incorporar la transaccion adjuntar archivos y si debería añadir algún cuadro de texto en el formulario para adjuntar la ruta del archivo o si puede aparecer como opcion ¿Pueden ayudarme? enviar email.zip

Estimados, junto con saludarles, quisiera pedirles ayuda con respecto a un código el cual he estado trabajando. Se me produce el siguiente error 1004 al momento de ejecutar sin valores una macro, la cual he intentado agregarle un If Rango = 0 Exit Sub, o tambien he intentado If Rango is Nothing GoTo label, y ninguno me ha solucionado el problema. Les dejo el video que explicará mejor que mis palabras. El error se me produce en el Userform 3, en el código de Initialize, al parecer se genera cuando la macro intenta crear el rango "MiRango". 1004.mp4 Se les ocurre como podría solucionarlos? Agradecido por vuestro tiempo. Felipe,

Buenos días, Les comento que hace unos meses un usuario me realizo una macro, la cual hasta ahora me ha funcionado de maravilla. El problema que presento ahora es el siguiente, descubrí que si no hay datos en la Columna M la macro no realiza el proceso. Hoy utilizare esta misma planilla, pero en la columna M no existirán datos. Alguien puede revisar la formula y ver la forma de modificar eso, las otras columnas seguirán intactas, solo la M es la que ya no tendrá datos. Concatenar valores Vba_GP.xlsm

Estimados Amigos: Necesito de su gran ayuda para lo siguiente: Tengo una lista grande con datos del trabajador, y quiero que cuando se ingrese el nombre en el Textbox, la macro debe mostrar nombres similares, es decir, se aplique un motor de búsqueda. Después de elegir el nombre correcto, debo colocar en forma manual un código de ubicación en la columna del costado. Subo el archivo, espero me hayan entendido y si conocen otra alternativa para mejorar el proceso de codificación, seria super…, acepto todos los comentarios y sugerencias. Saludos cordiales, Luchito. RPT15.xls

Estimados, Adjunto archivo (sacado de este portal), pero lo que no logró es generar nºfactura automático, es decir, cuando lanzo el form, me pide ingresar nº factura, esto no puedo hacerlo sin necesidad de digitarlo, que me figure un nº correlativo por defecto, cada vez que ingreso los datos?. Quedo atento a toda ayuda. Gracias. registro FIN (1).part01.rar registro FIN (1).part02.rar

Hola a todos; -¿Es posible trabajar con símbolos usando formularios? En la macro que adjunto cargo el símbolo en un TextBox al pulsar un botón, esto sucede porque previamente lo he insertado. Lo que quiero conseguir es que al pulsar ese mismo botón yo inserte dicho símbolo que tenga almacenado en una "variable o Label" sin necesidad de tener que cargarlo de dicha hoja. Adjunto macro con detalles. Saludos a todos MCaracteres.xlsm

Buenas Tardes amigos: De nuevo aqui con mis dudas, requiero de sus ayudas nuevamente. Tengo un formulario en el cual en el userform3, hay un botón, que indica "Insertar RUC", cuando le doy click me manda a otra pantalla que dice "Buscar RUC" e "Ingresar Manualmente". Cuando le doy a Buscar RUC, quiero que me ayude a hacer un buscarv de la hoja "Base de Datos", o sea cuando escriba el RUC, que en los label43 y label53: RUC y Razón Social, en el userform3, me aparezca el RUC que se ingresó y la respectiva razón social, encontrada con el buscarv. Y viceversa o sea que cuando escriba la razón social, me busque el RUC y lo mande a los label43 y 53 del Userform3. Cuando …

Buenos días, He creado un encabezado en un libro de excel, y de ahí tengo que copiar las columnas de otro libro de excel y pegarlas en la correspondiente columna de mi encabezado Ejemplo: Mi encabezado Servicio -Ruta-Horario y del otro libro tengo Hora-inicio-Vehiculo-Conductor Lo que tengo que hacer es pegar ese hora en Horario, Vehiculo en Ruta y Conductor en Servicio. Muchas gracias si me pueden colaborar

Buen dia, Normalmente uso este codigo en un archivo que utilizo en el trabajo donde marco con una "x " celdas a lo largo de toda la columna B:B, hoy intente agregar otras y creo que no lo estoy haciendo correctamente porque no me aparecen, que necesito hacer para incluirlas correctanebte? adjunto el codigo Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Intersect(Target, Columns("B:B"), ("D:D"), ("F:F"), ("H:H"), ("J:J"), ("M:M"), ("O:O"), ("Q:Q"), ("S:S"), ("U:U")) Is Nothing Then Exit Sub If Target.Row < 5 Then Exit Sub If ActiveCell = "x" Then ActiveCell = "" Else ActiveCell = "x" End If En…

Buenas tardes Tengo un listbox donde recojo dos tiempos distintos. Uno es el tiempo estimado y el otro es el tiempo real dichos datos estan en la celda en formato [hh]:mm el problema está cuando cargo en un listbox dichos datos. Si es menor a 24h se muestra sin problemas con cdate Me.ListBox.List(Me.ListBox.ListCount - 1, 19) = CDate(HojaBase.Cells(i, "AA").Offset(0, 0)) 'TIEMPO REAL Me.ListBox.List(Me.ListBox.ListCount - 1, 20) = CDate(HojaBase.Cells(i, "AB").Offset(0, 0)) 'TIEMPO ESTIMADO pero si los valoren superan las 24h no muestra el tiempo y si una fecha (ADJUNTO IMAGEN). Que tengo que hacer para que …

Hola a todos: Hoy soy yo al que le toca recurrir a vosotros para ver si alguno se ha visto en la misma situación En el adjunto, al introducir cualquier valor en una celda y por medio del evento Worksheet_Change(), se muestra un formulario donde se van registrando los valores introducidos. El formulario se muestra como No Modal, de forma que puedo volver a la hoja e introducir otro valor en otra celda. El problema consiste en que, al mostrar el formulario este queda activado y no me permite volver a la hoja de forma automática, o sea, tengo que seleccionar de nuevo la celda donde quiero introducir la información. A ver si alguien conoce, algún méto…

Buenos días Foro, Necesito vuestra ayuda y conocimiento para un error con VBA. Hace un mes que lleva dándome problema una línea de código (no había pasado en más de un año) y tras mirar en mil páginas no encuentro solución, por si pudierais echarme una mano. Os adjunto la línea de código: El error se encuentra en el "end if" del final. No sabéis lo importante que me es solucionarlo y no encuentro la solución... Mil gracias Sub ImportarModelos() Dim strSource As String Dim dbs As DAO.Database Dim rst As DAO.Recordset Dim consulta As String Dim archivoAbrir As Excel.Workbook Dim RUTAExcel As String Dim strRespu…

Buenas a todos, luego de haber googleado mucho me he rendido y vengo a molestarlos pidiendo ayuda de sus conocimientos. Viendo videos y adaptando lo visto a mi trabajo he logrado crear el formulario tal como lo deseo, pero en los videos que he visto se les ha pasado programar que los botones de siguiente y anterior funcionen luego de usar el boton buscar. Me explico, si se esta en el primer registro y le da al boton siguiente no hay problema, o en el ultimo yluego darle hacia atrás, el problema esta cuando uno busca una referencia y luego quiere usar estos botones, ahí no funcionan y el de siguiente tira el 2do registro y el anterior igual, no continuan de la f…

Buen día expertos, por favor tengo dos libros una de ella llamado KOREA y la otra BASE, dentro del libro korea tengo dos hojas una de ella llamado data y otra también korea, lo que necesito hacer es desde el libro korea y la hoja korea al pulsar el botón actualizar me actualice a la hoja data del mismo libro y también a la hoja2 de libro base. Dentro del libro korea la hoja data esta oculto la cual me sirve para mostrar los datos a la hoja korea a través de una validación de datos, muchas gracias por sus aportes a cada una de ustedes. Archivos.rar

Hola tengo este formulario que les dejo anexo, para las dos primeras columnas diseñe una macro que me carga un formulario para seleccionar la fecha ---- al final de la hoja en la ultima columna hay otra macro que al introducir la palabra "si" me bloquea la fila que acabo de editar y me lanza a la primera celda de la misma fila ---- al hacer esta acción hace que de nuevo se me cargue el formulario de fecha puesto que esa celda queda activa y hay una macro en ella para que muestre ese formulario cuando se selecciona (cuando esta activa) ----- entonces me toca cerrarlo y ahora si queda bloqueada la fila que acabo de editar, ... esto es un gran problema, puesto que al ca…

Hola de nuevo a todos tengo una pregunta de lo mas tonta, pero no eh dado con la respuesta. Tengo una macro dentro de la cual me hace la resta de una celda y de ahi divide ese resultado entre 10, el resultado es mostrado en %(porcentaje) si hago esta operacion manualmente cuando me posiciono en la celda donde tengo la formula me muestra en la barra de formulas asi =4/10 siendo que la celda me muestra 40%, la macro me hace la operacion automaticamente pero al posicionarme en esta celda solo me aparece en la barra de formulas el 40%, existe alguna forma de hacer que me aparezca como algo asi =4/10, ya copie el formato y lo grabe en la macro pero nada no resulta. Gracias. …

Hola a todos. Siempre he importado datos desde web y siempre ha sido en páginas planas pero ahora me he encontrado con una página que tiene las tablas metidas en un contenedor javascript. ¿Se puede importar web que tengan alguna tabla con javascript con vba? LLevo dias mirando y mirando pero no hay manera de sacar nada en claro. Alguien podría ponerme un ejemplo Esta es la web, hay 3 tablas insertadas en 3 pestañas. La Liga - under over, total goals, top scores Gracias

Buenas a tod@s, Os adjunto un calendario al que quiero hacer lo siguiente: como veis tengo una celda que es la E22 en color rojo que usaré para los dias festivos. Justamente debajo incluiré los dias festivos (1 de enero, 6 de enero, etc) estos dias al incluirlo en el listado querria que cambiaran el color segun el relleno de la Celda E22. Tambien busco la forma de que si cambio el año estos dias se actualicen Luego tengo la celda I18 que tiene el color amarillo y querria que al incluir los dias del calendario me cambiaran al color de relleno de dicha celda. Es posible? 2021.xlsm

El Código que adjunto no funciona Código suma no funciona.rar Código suma no funciona.rar

Todos los excels tienen la misma estructura. Y estan en una misma carpeta. Se trata de facturas, y en la celda C5 hay un campo que quiero cambiar. en todos los excells se trata de la misma celda, la c5. Y la quiero cambiar por distindos datos. Es decir: Celda c5 del libro excel "casame"--> cambiar "casa" por "Madrid" Celda c5 del libro excel "divorcio"--> cambiar "sofa" por "Tolomeo" Celda c5 del libro excel "amante"--> cambiar "dormitorio" por "Zalameo" Esta correspondencia la tengo en una hoja de excel. Alguien me puede ayudar? Gracias

Hola Buen día He visto que es posible mediante un código evitar hacer copias de un archivo de excel o mejor dicho que si el archivo se mueve de la ubicación en la que esta simplemente no funciona o si se copia sin el archivo al que esta vinculado. ¿cómo puedo hacer para que el archivo solo se utilice en una usb? Este código es cortesia de Julibaga, y quisiera saber como modificarlo para aplicarlo a una usb y además que no se muestren todas las hojas, puesto que necesito que algunas permanezcan ocultas 'Poner lo siguiente en ThisWorkgroup: =========================================== Const archivoInicial = "C:\WINDOWS\Nombre_archivo.Extensión" Private Sub Workbook_B…

Hola, soy nuevo en el foro y necesitaria copiar un rango de una hoja a otro rango de una hoja en otro libro distinto, lo ideal seria exportar ese rango a una ubicacion y despues al abrir el otro libro importarlo. No tengo ningun ejemplo porque es simplemente lo que explico y no se como crear un archivo explicativo. Muchas gracias os agradezco vuestra ayuda.

Señores, soy nuevo tanto en el foro como en excel. Me ha sorprendido las cosas que se pueden hacer con el, ya que solo lo utilizaba para llenar celdas y alguna que otra formula de si. He creado un userform complejo, al menos para mi, en el que necesitaría ayuda. No se como ligar con la planilla excel, par aque al introducir los datos, los mismos queden guardados en la base de datos. Esta se guardaría por ej: por empresa, incluyendo los datos correspondientes al formulario. Tambien necesitaría al llenar el form, poder adjuntarle un archivo PDF como cotizacion si es que se les envio a la empresa. A la hora de utilizar los botones de busqueda, necesitaría me brinde todos …

Buenas tardes colegas. Espero se encuentren bien de salud. Acá les traigo otro Proyecto, Este es para controlar la alimentación de los trabajadores de la Lavandería, o sea, alumerzos, comidas y meriendas. Tengo determinado mediante OpptionButton filtros para cada uno de los casos, pero cuando quiero imprimir esos filtros (Botón que se encuentra dentro del Frame, encima del ListBox), todo lo hace a la perfección, pero la suma de que debe hacer de las columnas G e I me falsea el resultado. Private Sub BtnImprimirRango_Click() Dim Lin As Long Dim Uf As Long Dim I As Integer Dim X As Long Dim Suma, Suma1 As Double Application.ScreenUpdating = False Application.Displa…

Buenas amigos foreros: Gracias a la ayuda de ustedes he podido desarrollar varias herramientas con la opción de VB que trae incorporado el Excel. He fabricado herramientas de búsqueda muy completa gracias a la ayuda de ustedes, este foro ah sido de gran ayuda con el tema de Excel y su opción de VB. Con lo que aprendí de ustedes me dentro mas la inquietud del mundo de la programación y ahora estoy programado con VISUAL BASIC 2010. Estoy iniciando a explorarlo. Pido algún programador de acá que tenga más habilidad en el tema pueda evacuar algunas de mi inquietudes como muy amable mente lo ah hecho hasta la fecha. Entiendo que el VB de Excel la programación en si es muy si…