Buenos dias a todos, cree el siguiente codigo porque muchos usuarios diferentes trabajan sobre el mismo archivo, y tienen diferentes accesos y conecciones a los discos de la red, de modo que cada que vez que alguien abría el archivo debia modificar todos los vinculos (son como 10) manualmente. El problema que tengo ahora es que cuando el programa va realizando lo cambios, abre automaticamente varios cuadros de dialogo para seleccionar un archivo que necesita para seguir ejecutandose. Los usuarios le damos cancelar a todos los cuadros de dialogo que aparecen y el codigo sigue su ejecucion normal. Mi consulta es, sabiendo que dando cancelar el programa sigue su ejecuc…

Necesito ayuda ******* con este tema, ¿Alguien puede ayudarme ? Gracias x adelantado Adjunto un archivo zip con un formulario vba basico para enviar mail desde excel desde mi cuenta de gmail. En el botón "enviar" del formulario no sé como modificar el codigo de la macro para insertar una línea de código para permitir que se vinculen archivos adjuntos para enviar archivos adjuntos. La idea es utilizarlo desde excel, no de otros programas predeterminados como outlook (no sé si esto es posible) Con la macro actual sólo puedo enviar mails sencillos ¿Alguien puede ayudarme? Gracias por adelantado. Borja enviar email.zip

Si me pueden ayudar con macro para buscar en base de datos por código, luego que me copie la información en otra hoja automáticamente al ingresar un código en una celda y se vuelva a repetir la misma función en otra celda al ingresar el código Adjunto ejemplo. Libro1.xlsx

Hola buen día tengo un problemita con una macro , quiero hacer una agenda de citas , pero que las celdas no se modifiquen después de que ya tengan datos a menos que la cita se cancele esto supongo debe de ser con un permiso por medio de una contraseña o algo así, ojala me puedan ayudar me urge terminar esta agenda. AGENDA.xls

Hola, Mi nivel de programacion en VBA es medio-bajo. Aunque no soy ajeno al mundillo de la programacion quisiera realizar una consulta a los foreros. Pongamos el siguiente ejemplo. Desde una hoja Excel quiero importar datos externos (en este caso una hoja excel). Lo que yo hago normalmente es poner a grabar una macro, simulo la importacion de los datos y despues paro la macro. Asi obtengo el "esqueleto" del codigo y a partir de ahi lo modifico hasta conseguir exactamente lo que necesito. Mi duda esta en esta parte del codigo (he recortado algunas cadenas de texto porque son irrelevantes) With ActiveSheet.QueryTables.Add(Connection:=Array( _ "OLEDB;Provid…

como lo hago para que al abrir el combobox y presione la rueda del mouse me baje a travez del combobox? saludos y gracisa

Hola Amigos: necesito un poco de ayuda con una macro de internet que adapte para trabajar con planillas en la empresa, es para dar formato al RUT que usamos en chile, la macro funciona bien, hace exactamente lo que necesito que haga, el problema se genera al limpiar la planilla para usarla nuevamente, cree un boton que ingresa los datos a una base de datos y borra el contenido de la planilla para empesar a usarla con datos nuevos... cuando uso el boton o cuando selecciono las celdas y le doy suprimir, o borrar contenido, me aparece el famoso error... "Se ha producido el error '13' en tiempo de ejecucion" y mas abajo en el cuadro pone: "no coinciden los tipos", al usar el…

Quisiera que ayuden en como obtener una macro o userform dentro otro userform el cual me pemita visualizar el ultimo registro cada vez voy ingresando uno nuevo. BASE DE DATOS.xls

Hola, Antes de nada saludar a todos los usuarios. Acabo de vincular varias tablas dinámicas a un mismo filtro de informe con el código que vi en este foro y funciona perfectamente, el problema viene al seleccionar varios elementos dentro del filtro, si marco la opción "seleccionar varios elementos" deja de funcionar. Me podríais ayudar con el código para poder hacer filtros de varios elementos, por ejemplo si tengo el campo trimestres que pueda seleccionar T1, T2 y T3. Este es mi código: Private Sub Workbook_SheetPivotTableUpdate(ByVal Sh As Object, ByVal Target As PivotTable) Dim TablaDinamica As PivotTable Const Filtro1 As String = "Trimestre" Appli…

Buenas tardes. He cogio un excel de un blog finanzas, que lo desarrollaron para "sorteos" en campeonatos. A raiz del mismo, he incluido un par de columnas de "datos", y necesito vuestra ayuda para: 1.- Con las columnas de la A a la G, quiero que obtener un orden aleatorio, como ya sale, pero que no salgan consecutivos 2 que coincida el club de la columna D. 2.- Con todas las columnas, quiero obtener emparejamientos, en los que se de la misma condicion anterior, o sea, que no se emparejen dos. Gracias. 15 1.xls

Hola a todos Poco a poco estoy progresando con mi hoja de cálculo y le intento ir añaciendo más y más funciones. El caso es que no sabiendo como ni porqué, cometí un error en la programación de Visual, y al presionar el botón "Salir" en el primer formulario, me sale un error. ¿ Alguien me lo puede solucionar ? Tengo otra consulta. Tengo una fórmula para calcular los años y los meses entre dos fechas. En la primera fórmula me calcula los trienios. =SI(F6>0;ENTERO((AÑO(F7-F6)-1900)/3 &","&MES(F7-F6)&"");"") [/CODE] Como podréis ver, extraigo el entero de la cantidad calculada, que es la que me interesa. Pero para realizar éste cálculo, pongo como…

Buenas Tardes, No he podido revisar todos los temas existentes, asi que pido disculpas si planteo algun tema ya solucionado. Quisiera saber si puedo buscar los valores de una fila ( filtrados por la fila anterior (A) y sumar los valores hasta que el resultado se aproxime a una cantidad determinada (C1), pegar el resultado de dicha suma en otra celda y borrar dichos valores de la fila, para repetir la acción con los valores restantes de la fila (. Espero no haber sido demasiado poco explicito. Gracias por anticipado adjunto ejemplo .... Ejemplo.xls

Hola a todos, Por favor, necesitaría crear una macro que me trasladara unas fechas de una hoja de excel al calendario de outlook para cuando llegue la fecha me salte el aviso. Las fechas las tengo en las columnas I, J, K. Gracias, Webanoia VENCIMIENTOS CLIENTES prueba.xls

Buenas, tengo la siguiente consulta. Tengo una serie de gráficos que vinculan de un rango de datos, los cuales se van actualizando semana a semana. El problema esque las celdas en las que el vinculo no contiene nada, se muestran en la grafica como 0, lo que queda bastante feo. Quiero saber si existe alguna macro en la que me cree un grafico eligiendo un rango, y que muestre unicamente donde haya datos introducidos y que cada semana se actualice.. Se que existe algo así, pero no tengo ni idea de como empezar.. Un saludo.

Hola: Esta es la respuesta a un hilo que no consigo encontrar. Si alguien sabe cual es, por favor que suba el archivo. Se puede gestionar cualquier nº de regalos. Las imágenes deben coincidir con el nombre del regalo de la columna A de la hoja REGALOS. El nº total de regalos debe ser siempre 72 (12 filas x 12 columnas), si hay menos, quedarán celdas en blanco, y si hay más, los regalos que excedan de 72 no se adjudicarán a ninguna celda. Saludos y perdón por las molestias. Mis documentos.rar

Hola a todos. Quería vuestra opinión. Tengo un programa que envío las nóminas por correo y en una hoja tengo una tabla con los empleados. La empresa ha decidido cambiar todos los ID de los empleados poniendo un carácter más delante. Es decir, si alguien era el 76254 ahora es 076254. Yo en mis PDFs lo tenía como (76254)_Nómina_2020_10. Ahora que tengo más de 1.000 fichero guardados he de volver renombrarlos con (076254)_Nómina_2020_10. Y lo que quería preguntaros es si me aconsejáis que haga una macro para cambiar el nombre de cada fichero (cosa que no veo por donde empezar) o que me busque en la Red algún programa que haga esto específicamente. Gracias. …

Hola nuevamente muchachos. Espero estén bien todos, es mi mayor deseo. Estoy teniendo otro problema por acá con la configuración de un TextBox donde quiero expresar números. Propiamente el número que va a estar reflejado en esos TextBox son la división del Salario Mensual entre los días a trabajar y eso me da un índice o tarifa salarial diaria. No tengo problemas en las operaciones matemáticas, sino en el formato a expresar en el TextBox. Este dato lo toma el TextBox de la Hoja, la que tengo configurada (Celda) como Numero. Podrían ayudarme. Gracias de antemano y excelente semana para todos. Saludos Pino

Muy buenas, agradezco de antemano la ayuda que me brindarán. mi consulta es la siguiente, Tengo un macro que me hace correr un cronómetro o temporalizador mejor dicho, este necesito que funcione con una userform la cual tiene otros botones de mi interes; los problemas que presento son 3, y los describo a continuación: 1.- al colocar el tiempo en la userform y esta colocarlo en la celda donde esta instalado el cronómetro este no corre, me imagino por que va como texto, pero al revisar la celda esta si tiene el formato establecido. 2.- y más importante, necesito que el temporalizador haga pausas, dado que necesito detener los tiempos de forma seguida y reanudarlos. 3.…

Hola a todos !! Antes que nada muchas gracias por tener el tiempo de responder a mi mensaje, navegando varios días por el foro he bajado varios documentos que aunque me han servido para orientarme no me ayudan a solucionar mi problema. Soy básica en el tema de programación con macros en visual basic y necesito un archivo con 10 usuarios y un admin. Los 10 usuarios no pueden ver mas que la hoja del tablero y de su propia área. Y el admin puede modificar y ver todas las hojas, se que existen temas similares y he tratado de usar los códigos pero no entiendo porque no me funcionan. Adjunto archivo para su ayuda. Gracias a todos los que se han tomado su tiempo en ayudarme. …

buenas noches mi pregunta es la siguiente he estado buscando en internet pero no encuentro nada, lo que busco es una macro que me pueda dejar usar la imagen (del cuadro de herramientas) como boton de comando?

Hola Hice una macro que me filtra lo que contiene "ATO" en la columna H; si hay, se borran las filas el problema es que cuando bajo mi reporte y no hay "ATO" la macro me borra el titulo, es el mismo caso para la parte donde borra lo que contenga "DUMMY". Si alguien me puede ayudar a solucionar este error estare muy agradecido. Adjunto una porcion del archivo para mejor referencia. Sub MacroPrueba() strArchivo = Application.GetOpenFilename( _ FileFilter:="Excel Files (*.xlsx), *.xlsx", _ FilterIndex:=1, _ Title:="Select: rptProductionCTO") If strArchivo = False Then Exit Sub Workbooks.OpenText Filename:=strArchivo …

Hola que tal buen día a todos, antes que nada es un honor estar en este foro que es de tanta ayuda para mi y mucha gente, en esta ocación le quiero pedir si me pueden apoyar con una macro que necesito para poder filtrar 2 columnas que están en mi hoja 1, se debe de comparar la columna B y debe de empezar a comparar los datos a partir de la celda B3 y a su vez también con la columna N3, cabe mencionar que el final de cada columna es variable y en ocaciones tiene mas filas con informacion, el resultado de esta comparación se tiene que mostrar en la columna "S" y empezar a poner los datos a partir de la celda "N3", si existen resultados comparados que no se encuentran se d…

bueno amigos tengo un problema que me gustaría resolver la verdad no se como hacerlo, tratare de explicarme bien quiero hacer una macro que al abrir el explorador de archivos yo vaya a una carpeta o ruta "X", pero yo quiero guardar esa ruta en una variable para después usar solo la variable, esto con el fin que estoy tratando de hacer un catalogo con imágenes, pero quiero que ese catalogo guarde un registro con nombre e imagen por lo tanto quiero haya un botón de buscar imagen, que se vea en un image y luego se guarde no se si me explique bien.

Hola compañeros. Os escribo la parte del código donde lleno un listbox de mi aplicación. Este código lo saqué de un ejemplo de internet. La cuestión es que quiero que en dicho listbox no me liste los registros como lo hace ahora. En la primera columna me aparece 1,2,3 etc y yo solo quiero que me aparezcan las columnas de datos. He intentado modificando el número de columnas, quitando el addittem nº etc, pero no logro dar con el error que me da con la propiedad column.

Saludos. Se trata de ver en pantalla, uno a uno, los diferentes cuadros de diálogo integrados de Excel. Primero se indaga sobre cuantos existen y luego se pretende ir viendo cada uno de ellos. He implementado la siguiente rutina, pero no funciona. Sub VERCUADROS() Dim Dialog As Object Dim DIALOGS As Object MsgBox " CANTIDAD DE CUADROS INTEGRADOS EXISTENTES = " & Application.DIALOGS.Count For Each Dialog In DIALOGS Dialog.Show Next Dialog End Sub Agradezco ayuda.