Buenas tardes. Tengo un comboBox que requiere 100 items y cuando utilizo el scroll del mouse se divide en dos y al activar la lista duplica los items. Adjunto un ejemplo de lista para que por favor me indiquen que debo hacer. Muchas gracias por su valiosa colaboración. Seleccionar usuario.xls

Hola a todos. Me gustaría me ayuden con lo siguiente. Quiero hacer una macro que borre el contenido de 10 combobox cuyo nombre es CbxComp1.....al....CbxComp10. Una forma de hacerlo es obviamente la que sigue (y me funciona): CbxComp1.Value = "" CbxComp2.Value = "" CbxComp3.Value = "" CbxComp4.Value = "" CbxComp5.Value = "" CbxComp6.Value = "" CbxComp7.Value = "" CbxComp8.Value = "" CbxComp9.Value = "" CbxComp10.Value = "" El tema es que quiero hacerlo con un bucle porque voy otras situaciones similares pero con más comboxes. He probado lo siguiente pero no me funciona (no soy experto): Dim i …

Buenas Estoy intentando crear un macro para generar un reporte entre periodos que están en las celdas " D5 " y " F5 " de una tabla de Access, pero no logro que funcione. acudo a ustedes para que me ayuden a definir cual sera el error. Formato de la fecha en Access "29/07/2020 10:48:51" Application.ScreenUpdating = True NumId = (Format(Worksheets("usuarioF1").Range("D5").Value, "DD-MMM-YYYY") & "# ") NumIh = (Format(Worksheets("usuarioF1").Range("F5").Value, "DD-MMM-YYYY") & "# ") Set Cnn = New ADODB.Connection With Cnn .Provider = "Microsoft.ACE.OLEDB.12.0" .ConnectionString = "\01.Datos\Registro.accdb" .Open End With Set Rs = New A…

Ayuda para crear un macro que extraiga varios datos de varios libros a un solo libro de celdas especificas, es decir seran varios libros pero aun asi seran las mismas celdas. Muchas gracias a todos por su aydua EJEMPLO.zip EJEMPLO.zip

Tengo este libro; samradDatePicker.xls, ¿Qué hace? es un libro en que se coloca en la carpeta XLSTART de Office y al tener una celda con alguna fecha al seleccionar la siguiente se presenta a la derecha un icono en que al darle se abre un calendario para que se puede auto-insertar fecha, pues bien. Este libro contienen macros y TODO libro que contenga macros abriendo Excel X64 presenta este avso; cualquier libro que contenga macros creadas en Excel X86, y abierto en Excel X64 presenta esto, mi pregunta; ¿alguien me puede dar una mano a resolver esto? la verdad es que soy inexperto en estos menesteres de macros y quisiera poder abrir libros creados en X86 también pode…

Hola tengo una magro en la cual ejecuto la linea siguiente: Cantidad_Total_Localidad = Application.WorksheetFunction.CountIfs(Range("O3:O" & h), Date, Range("R3:R" & h), Poblacion) Date es la fecha de sistema Poblacion es una variable que contiene la Poblacion Que intento pues que me diga en el rango indicado cuantos registros coinciden con la fecha actual y con la poblacion indicada en el otro rango facilitado. hasta aqui todo bien, el problema me viene cuando intento saber cuantos registros hay anteriores a la fecha actual, he probado de varias formas pero siempre me da el mismo valor (cero), el rango donde comparo las fechas ("O3:O"&h) tiene formato de …

Tengo el siguiente codigo que me extrae datos del listbox a una hoja de excel. pero al pasar los datos que traen fecha me los coloca como mm/dd/aa y lo requiero como dd/mm/aa, cabe recalcar que los datos de las fechas estan en una fila especifica "solo en una fila". Como podria modifcar mi codigo para poder realizar el cambio. Set r = Sheets("RESUMEN") uf = r.Range("B" & Rows.Count).End(xlUp).Row + 1 'Worksheets("RESUMEN").Range("A4:M" & uf).ClearContents Dim Fcc As Date 'Declaracion de variable de tipo fecha Fcc = FormatDateTime(Now, vbShortDate) 'asiganos la fecha a la variable r.Cells(1, 1) = "REPORTE REGISTRO DE COMIDAS…

Que tal buenas tardes, haciendo uso del foro solicito de su amable apoyo, tengo un archivo donde cargo datos de cuatro columnas respectivamente, el archivo me funciona buscando en el textbox de "cuenta", pero en el momento que hago la búsqueda con textbox de "codigo" no me aparece nada, parece que es algo de formato, aunque sigo sin poder hacer que me haga el filtro, y posteriormente que encontré el dato buscado, le doy doble click y deberia tomarme el dato de la columna de "cuenta", pero me aparece el numero del codigo, de antemano muchas gracias por sus aportaciones y muy buen foro. PRUEBA LISTBOX_COMBOBOX.rar

Buenas, me pasa una cosa extrañísima y pruebo aqui a ver si le ha pasado a alguien más y sobre todo si hay alguna solución: la hoja de cálculo en cuestión tiene un combo box para poder visualizar diferentes cuentas de resultados en la pestaña cta. Es un fichero que tenemos en red, que usan diferentes usuarios. Pues bien, cuando desconectas el portátil de la red, con el fichero abierto (para ir a alguna reunión fuera de tu sitio) hay un momento, que al navegar por las opciones el combo, en este se distorsiona la fuente de las opciones y no puedes ver nada (adjunto imagen). Si estas conectado en red, NUNCA pasa. Nos pasa en diferentes ordenadores. Es verdad que …

Hola, dentro de mi formulario tengo un Multipage1. Como puedo saber cual es la página que se encuentra activa? (Page1, Page2 o Page3) Gracias por su apoyo. Saludos

Hola, tengo imagenes en una carpeta, me gustaria que cada vez que encuentre en la tabla A una celda vacia inserte una de esas fotos, sucesivamente hasta que termine. Saludos

Hola a todos. Veréis, tengo un problema que me trae de cabeza...Tengo un libro abierto llamado "Entrada de datos" y otro llamado "Perfilador" donde se van copiando cosas del primero al segundo.Pues bien, cuando acaba de copiarse todo lo necesario, quiero que se ejecute una macro del libro "Entrada de Datos" pero NO HAY MANERA! Tengo el siguiente codigoWorkbooks.Open "C:\Users\alvar\Downloads\Entrada Datos Fondos (Final).xlsm"Workbooks("Entrada Datos Fondos (Final).xlsm").ActivateSheets("Selector de Fondos Indexados").SelectRange("B7").SelectApplication.Run "Entrada Datos Fondos (Final).xlsm!Ejecutar_Buscador"Y me da un error que dice "no se puede ejecutar la ma…

Hola, He planteado este tema en otro ya cerrado, lo vuelvo a subir. Tengo un listado de 7.000 líneas y necesito eliminar aquellas cuya suma sea 0. He intentado adaptar una macro, y funciona, pero solamente con las columnas que se ponían de ejemplo. En mi caso son 11 columnas y no he sido capaz. Adjunto las cabeceras. El subtotal lo incluyo en el debe y haber para cambios en la columna "proveedor". Saludos Cabeceras.xls

Hola de nuevo. Ya he terminado mi proyecto, con vuestra ayuda. Pero ahora veo que uno de los procesos es muy lento. Cuando le doy a un botón ejecuta esta macro con 7 bucles, uno por semana, que recorre cada vez que lo hace 7.000 filas. Y que cada mes añadirá otras más de 2.000 filas más. Así que cada vez que ejecute la macro se me va a emplear mucho tiempo. Yo creo que con un solo bucle lo puede hacer, porque pienso que debe haber una lógica matemática que lo haga, pero yo no soy capaz de saber cómo. U otra manera que no sea con bucles... Pego el código por si alguien de vosotros podría ayudarme. Ya veis que repito el código cada día de la semana y que los textbox so…

Hola a todos tengo tres labels que deseo que sean automaticos al iniciar el formulario: ID = siguiente número disponible en la BDatos en este caso 1 FECHA = fecha actual ESTADO = letra "A" adjunto archivo con el formulario. Saludos Fernando Productos.rar

Hola a toda la comunidad, ando en una terrible confusión de esta división y agradecería mucho me ayuden. Adjunto el archivo. El problema esta en cuando intento registrar una joya y pongo su peso y su precio por gramo, este ultimo me automatiza los cálculos para los demás textbox, pero lo que no logro que me de un resultado esperado en el textbox "Precio de vta. x gramo" (este textbox resulta de la división del precio total / el peso). Por ejemplo pongo 10 en el PESO y en PRECIO GR. pongo 100, los demas textbox escriben el resultado automaticamente y supuestamente me deberia mostrar en el precio de vta. total 1180 (resultado de la multiplicacion PESO * PRECIO GR. * IGV…

Hola a todos, tengo una macro que me busca una celda con una texto concreto, me crea una columna justo después y la rellena con una fórmula. Todo funciona, pero quiero que la fórmula la rellena solo hasta la última celda con datos de la columna vecina. Ahora tengo puesto que me copie la fórmula hasta la fila 6000. Selection.AutoFill Destination:=Selection.Resize(6000, 1) P.D: mi pregunta de hoy es más concreta y espero que sencilla :-) Muchas gracias de antemano! Paula RESIZE ejemplo.zip

Hola buenas a todos. En esta ocasión por mucho que he buscado en el foro no encuentro solución a mi problema. Tengo un macro mediante el cual cambio los valores de una columna por los valores de otra. Tengo 2 hojas creadas, una la he llamado lista y la otra datos. En la sheet lista, he colocado la relación de los números que tiene que reemplazar y por cual en cada caso. El macro me cambia los valores de las celdas bien, pero luego vuelve a cambiar el valor de nuevo en las celdas que ya había modificado, volviendo a cambiar el valor de las celdas y creando un caos en el resultado. Ejemplo: 1 - 97 2 - 98 3 - 99 4 - 101 5 - 103 6 - 105 7 - 107 8…

Hola buenas noches, la verdad es que todo el dia me la he pasado buscand como hacerle para que de la tabla de mi hoja datos pueda usar ciertos campos en la plantilla de la hoja formato y poder colocar un boton siguiente y anterior para pasar entre los registros de la tabla desde la plantilla. y en esa plantilla al obtener un promedio almacenarla en el campo CALIFICACION de la tabla con su correspondiende fila (ficha , nombre, etc) y seguir con los demas registros..vaya que me he liado . estoy perdido en VB intente grabando una macro que no me dio resultado y el hacer el BD en access tengo comproblemas con el software u.u. Espero puedan ayudarme. gracias JEFATURA CAL DESE…

Amigos, tengo macros creadas en excel en windows y ahora por la necesidad es que debo utilizarlo en la nube, estoy usando el onedrive pero no me permite he buscado información en san google y la verdad que no me funciona. La necesidad de utilizar la nube se hace por que se requiere que el archivo sea abierto por mas de 4 usuarios, algunas veces al mismo tiempo y tienen que estar actualizados. Alguien me puede ayudar en este inconveniente o que otra solución podría realizar.

Hola buenos días amigos de Ayuda Excel, acudo nuevamente a ustedes para que me ayuden con esta macro. Muchas gracias La macro debe buscar los datos o valores indicados en la columna C de la hoja COLORES en la columna A de la hoja LISTADO GENERAL y una vez localizado, asignar el valor del precio ubicado en la columna F de la hoja COLORES en la columna I del respectivo dato y muy importante, que se actualice automáticamente cuando el valor del precio de la hoja COLORES varie. NOTA: En esta hoja COLORES se van añadiendo constantemente nuevos datos. EN CASO QUE NO ENCUENTRE EL PRODUCTO, DEBE ADVERTIRLO MEDIANTE UN MENSAJE BUSCAR DATO EN OTRA HOJA.xlsm

Hola a tod@s, No logro hacer una validación para varios TextBox, Tengo como 15 filas de controles y quiero aplicar la misma Validación a los controles que están alineados en columna, quiero ahorrarme el poner la misma validación para esos controles que pueden ser hasta 50 . Alguna idea? Envió archivo muestra con solo 3 lineas de controles y 3 columnas de controles y su validación correspondiente, si pones A o pones B o pones C Gracias de antemano por la ayuda recibida. Saludos. ValidarVariosTextBox_LBV.xlsm

Hola, Buen día, Favor su apoyo. En un Formulario tengo un Listbox el cual me jala datos de otro libro de Excel, hasta ahí todo bien. Ahora lo que quiero hacer es que mediante un botón pueda exportar esos datos que me muestra el ListBox hacia un nuevo Libro Excel y otro botón que me permita exportar los datos del Listbox hacia un Pdf. Nota: Al momento de presionar el Botón para exportar tiene que aparecer la ventana de Guardar Como para poder especificar ruta y nombre del Archivo. Muchas gracias de antemano por el apoyo.

Estimadas/os, Junto con saludar, estoy recien empezando en este mundo del VB, y estuve trabajando en una macro que en función de una lista, empleo BUSCARV según vendedor y enviar al correo de forma separada con copia a jefaturas correspondiente. La macro sería la siguiente: Sub Enviar_Rango_a_Destinatario_de_correo() ActiveSheet.Range("AG2:AX14").Select For i = 1 To 13 ThisWorkbook.Sheets("RESUMEN").Range("X1").Value = i ActiveWorkbook.EnvelopeVisible = True With ActiveSheet.MailEnvelope .Item.To = ThisWorkbook.Sheets("Resumen").Range("X4").Value .Item.cc = ThisWorkbook.…

Hola, tengo un problema con un userform de 6 button_clicks. Dependiendo del button click seleccionado, la variable X cogerá un valor entero del 1 al 6. Esta variable X, està declarada en el programa principal como public X, ya que se va a utilizar en varias ocasiones. El userform se ejecuta perfectamente y coge el valor correspondiente, pero en el programa principal, el valor de la variable no es el correcto, ya que el valor de X pasa a ser 0. Resumen codigo: Public X As Integer Sub A () . . . UserForm1.Show . . . End Sub Y así es el codigo de un buttonclick Private Sub OptionButton1_Click() If OptionButton1 = True Then X = 1 End If End Sub …