Buenos días amigos, el presente es para hacerles la consulta sobre encontrar la forma mas óptima de contar el número de filas que hay en una columna, antes usaba un código que conseguí por la red, pero me dijeron que consume muchos recursos ya que ese código recorre celda por celda, así que decidí buscar otras opciones y me topé con 2 mas, así que mi consulta era saber su opinión sobre cual creen que sea la forma mas óptima de contar el número de filas de una columna, sobretodo cuando se trata de una base de datos bastante grande, los códigos que tengo son estos: 'Este código además de contar, me situa en la celda en blanco que esté a continuación, para contar el númer…

Buenos días a todos. Desde un formulario1 y a través de un ComboBox voy a otro Formulario2 o Formulario3 El problema surje cuando vuelvo al Formulario1, y es que no me acepta de nuevo el valor marcado por primera vez, ej. Formulario2 Adjunto el fichero para que veais más claro el problema. Gracias anticipadamente Ensacamo Código Formulario 1 Private Sub ComboBox1_Enter() Dim UltimaFila As Integer On Error Resume Next ComboBox1.Clear Sheets("Hoja1").Select Sheets("Hoja1").Activate UltimaFila = Range("A1").End(xlDown).Row For a = 1 To UltimaFila Dato = Cells(a, 1) ComboBox1.AddItem Dato Next End Sub Private Sub ComboBox1_Change() On Error Resume Next If Co…

Que tal, Hago este tema porque tengo una duda que me gustaría y me ayudarán a resolver. Me gustaría saber si desde un boton de un formulario en Visual Basic 6.0, es posible abrir una macro en VBA creada en Excel 2010. Si es posible, me gustaría saber cuál es el código que necesito. Muchas gracias por su atención.

Buenos dias: Tengo una base de datos y en mi codigo uso el vlookup para traer informacion de esa base a un userform, lo que necesito es incluirle un mensaje de alerta cuando se digite el codigo equivocado y por tanto no se encuentra en la base de datos, alctualemnte si se digita mal lo que hace es sacarme al codigo. Gracias por su colaboracion... el codigo es el siguiente Private Sub CommandButton1_Click() If Reclamacion = "" Then Numero_de_Factura = "": Exit Sub total_facturado_mdqx = "": Exit Sub total_reclamado_mdqx = "": Exit Sub Primer_apellido_de_la_victima = "": Exit Sub Segundo_apellido_de_la_vicitima = "": Exit Sub Primer_nombre_de_la_victima = "…

Buenas tardes, Espero no repetirme, antes de nada he buscado, pero me he podido saltar algo. El caso, esque intento scrapear una web llamada racingpost.com, y no consigo encontrar la forma de obtener las urls de los enlaces. Os paso el código por si alguien sabe la fórmula. Por otro lado, la url lleva un control de fechas, se puede automatizar? ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Sub Racing() With ActiveSheet.QueryTables.Add(Connection:= _ "URL;http://www.racingpost.com/horses2/cards/home.sd?r_date=2015-02-12&group_by=by_time", Destination:=Range("A8")) .Nam…

Buen día a todos. Alguien podria ayudarme a utilizar DT Picker. Ya lo inserté en una UserForm y escribi el código para que me aparezca al hacer doble click en una celda, despues selecciono la hora y que el valor me aparezca en esa celda. Pero al momento de dar doble click no me aparece, al contrario me marca un error. que puedo hacer??

Saludos Por favor alguien sabe como poder ordenar un grupo de datos con mas de dos campos. y que permita seguir ordenando al momento que sigue ingresando datos. Gracias por la ayuda

Hola amigos, espero que me puedan iluminar con mi problemilla: Tengo un libro el cual solo lo utilizo para mostrar un formulario del que coge datos fijos y los datos del formulario los envía a otro libro que se encuentra en la misma carpeta. Esta carpeta con los dos libros la tengo en una nube para que podamos utilizar desde varios sitios y varios ordenadores, hasta aquí todo bien, el problema viene cuando hacemos modificaciones en los libros, que los guarda con el nombre del archivo y el nombre del equipo que hizo la modificación por lo que tengo varios libros con el nombre más el nombre de los distintos equipos. Muchas gracias a todos.

Buenas tardes, estoy haciendo un programilla para un restaurante y estoy atascado en el error del titulo de este post. Me sale en este caso, pero en una instancia anterior que llega a esta, hago exactamente la misma funcion pero con diferentes datos y funciona perfectamente. Vereis, lo que intento digamos es tener una lista de menus, seleccionar un menu y en una nueva pestaña, ver que platos contiene este menu, escoger un plato de dicho menu y ver que ingredientes contiene ese plato, digamos como una jerarquia de informacion. La lista de menu me aparece perfectamente, para ello y todo lo demas uso listboxes. Bien, selecciono el menu deseado y me aparecen lo…

Buenas Tardes amigos: Los molesto nuevamente, esta vez necesito que mi formulario, imprima varias veces unas label. Me explico mejor: En el userform2, ingreso unos datos, como fecha, chofer, placa, etc En el userform3, aparecen esos mismos datos que ingrese en el userform2, pero como label. Lo que quiero es que cuando le de a imprimir(validar) en el userform3, me imprima las lineas en la hoja, pero que mantenga los datos de las labels que aparecen en el userform3, siempre y cuando no le de click a atras, que quiere decir volver a ingresar datos en el userform2. Ayudenme Por favor, les adjunto mi archivo Gracias de antemano control km.zip

Buenos dias a todos. Nuevamente recurro a ustedes para pedir ayuda. Les explico, tengo un archivo con varias hojas las cuales son mis Ordenes de Compra otra hoja que se llama "Explosion de Materiales". Lo que quiero es que de las hojas que son mis "ordenes de compra" tomar el valor de la celda "J10" y pegarlo en la hoja explosion de materiales en la columna "G" siempre y cuando el nombre que esta en "A12" de la hoja que seleccione (Cualquier Orden de Compra) coincida con los nombres que estan en la hoja "Explosion de materiales" Anexo archivo y ahi tengo el ejemplo de como deseo y quede. Gracias y desde ya agradezco por su ayuda. Libro2.xls

Hola a todos, Quisiera saber como puedo usar una macro, para sustituir el uso de formulas y solo copiar los valores. Adjunto un ejemplo con los datos a los que se quiere llegar, el ejemplo abarca tres meses; por favor si hay dudas estoy muy atenta. Gracias! Vane. Copia de Ejemplo_Macro.xls

Buenas tardes!!! Escribiendo para pedir de su ayuda, tengo un formulario que tiene un combobox que tiene los nombre de lista de departamentos al seleccionar uno me muestra en un listbox lo que contiene los articulos de ese departamento, pero si yo selecciono otro departamento del combobox, me pone la lista del nuevo y me borra la anterior y yo quiero ver todos las lista que seleccione anexo ejemplo LISTA 2021.xlsm

Hola amigos en el fichero .xlsm adjunto podéis que creé en Excel 2007 una aplicación en Excel con una interfaz a base de etiquetas (label) ocultas y visibles para cuando hacer click en ellas visualizar los formularios del Proyecto. Para lograr pantalla completa, ya que la Cinta de Opciones no me ha gustado nunca, el método Fullscreen me ha ido muy bien, pues es una ocultación "no violenta", pues haciendo doble click arriba en la ventana aparace otra vez la cinta. El problema ha venido cuando se ha cambiado a Office 2013 y en Excel 2013 el código corre sin dificultad pero en FullScreen y DisplayFormulabar=false, no se puede escribir en las celdas en otro proyecto en el …

Buenas. Necesito saber como puedo mover de una página a otra unos datos. Tengo una encuesta y esa encuesta cada vez que se realiza se va acumulando ahí en la pagina donde se recogen los resultados pero ami me gustaría tener una página nueva donde tener el nombre de cada uno y que a partir de ahí se vaya actualizando solo. Ej: Pablo me responde hoy que tiene 8€ pero mañana vuelve a hacer el cuestionario y pone que tiene 9€. Yo en vez de ver los dos y mirar en todos a ver si lo han hecho 2 veces o algo quiero en otra hoja que me ponga "Pablo" y ahí se vaya rellenando solo, cada vez que conteste se vaya o último que ha contestado a esa página. Espero haberme explicado bie…

buenas noches expertos, he tenido que recurrir a ustedes nuevamente con la intencion de poder terminar ya este trabajo que la verdad aunque lo hago de forma autodidacta y empirica y como quien dice como dios me da a entender estoy tratando de realizar lo siguiente: hacer que una variable sea la que controle a todos los formularios de un libro ya que pretendo que al libro se entre solo con usuario y contraseña para asi ver quienes son los que han logrado entrar, en este caso necesito hacer que el usuario que entre se vea reflejado en el formulario que se abre (userform2) para que a la hora de ingresar datos uno poder ver que usuario fue el que entró. no se si me doy a e…

Buenos días amigos de la comunidad, Tengo un fichero que extraigo todos los meses de nuestra plataforma de fichajes y es formato csv. Yo lo convierto a xlsb y genero una tabla para poder explotar los datos. Mi problema como podeis observar es que el campo duración me lo saca en texto 9h 32m, me gustaría poder convertirlos a formato hora para que me aparezca 09:30. Subo el fichero Alguien me puede ayudar? Gracias anticipadas. Histórico01-01-202131-01-2021 2.csv

Hola, Necesito que en un archivo con celdas ocultas, y estas celdas ocultas tienen una formula (ejemplo: ='C:\excel\[0 SERVICIOS.xls]MAYO'!B70)), pero no pintan nada (osea, tienen formula pero no sacan ningún resultado en la hoja), me muestren las celdas que si sacan datos (o valor) y las que no sacan nada no las muestre, e intentado hacer varias cosas pero no lo consigo.Alguna idea?Gracias.

Hace un tiempo el amigo @Antoni hizo un cronometro regresivo con aviso, y funciona de cine, pero me encuentro con el problema que con el abierto no puedo usar el libro, he intentado ponerlo en una celda de una hoja, pero no lo condigo, a ver si me podeis ayudar con esto, muchas gracias por todo y perdonar las molestias. Crono con ring (1).xlsm

Buenas Tardes a todos Tengo tres listados, los cuales he de comparar entre ellos. Los dos primeros listados que llamaremos ( lista A y lista B ) a comprar tienen dos columnas ( la primera con ID y otra con números decimales), y el objetivo es poner en las dos columnas de color verde a todas aquellos registros que sean iguales y los que no son iguales se pongan en rojo, y aquellos registros que no estén en el otro listado, se quede en blanco sin hacer nada. Luego necesito que se compare los listados de ( Lista C ) con la lista A. Os dejo un ejemplo de los listados, agradezco de antemano vuestra ayuda. A ser posible necesito otra macro para …

Saludos amigos del foro, tengo un archivo que al abrirlo y luego mostrar el userform esta todo bien pero al cerrar con unload me se muestran junto al archivo otras dos hojas. Sospecho que debido a que le aplique un codigo para minimizar y maximizar el userform este esta haciendo algo como eso pero no estoy seguro, pongo el codigo de min-max: Option Explicit Private Declare Function SetWindowLong Lib "user32" Alias "SetWindowLongA" (ByVal hwnd As Long, ByVal nIndex As Long, ByVal dwNewLong As Long) As Long Private Declare Function GetWindowLong Lib "user32" Alias "GetWindowLongA" (ByVal hwnd As Long, ByVal nIndex As Long) As Long Declare Function FindWindow…

Buenos dias tengo toda una carpeta con 100 archivos de excel y debo pasarlos todos a formato csv me gustaria me dijeran si hay alguna funcion o macro que coja toda la carpeta con estos archivos y los pase automaticamente a csv y no uno por uno como se hace normalmente agradezco su ayuda

Estimados, a ver si me ayudan con una macro: Tengo dos archivos (archivo A y archivo en formato (*.csv), lo que necesito es hacer una macro que genere un archivo de salida que tenga las siguientes caracteristicas: 1. debe poseer el formato del archivo A, por ende, el objetivo mas que combinar es reemplazar la informacion del archivo A con la del archivo B 2. los archivos contienen informacion de transportar materiales desde un origen a un destino en un periodo determinado, en el archivo A se muestra solo la información por tipo de material y en el archivo B se muestra la informacion por material y destino, otro punto destacable es que el archivo A muestra todos los or…

Estimados, Necesito de su ayuda, tengo un combobox que al momento de seleccionar una opción se despliega información ( n información) , lo que quiero hacer es seleccionar uno de esos datos y genere una nueva hoja con una estructura y que se genera tanta cantidad de hojas como información exista. Ej. *Btn = boton ID Pais Jugador Numeros 12345 Cobresal . PAMELA 2 Btn 1234567 Colo L. DANIEL 4 Btn Con ese ejemplo a través de un botón o seleccionando una celda me despliegue una n…

Hola a todos al final hay parte dos. En esta segunda parte necesito saber el nombre de las imágenes y almacenarlo en los textBoxs que he creado, evidentemene en el evento Click. -¿Como?: Primero evaluamos que estén todos vacíos y si es así al hacer Click en la primera imagen se pondrá en el textBox1 el nombre de la imagen y siguiendo este hasta completar los cinco textBoxes. -¿Qué pasa si cambiamos de imagen?: Pues borramos el nombre de la imagen en el textBox correspondiente y almacenamos en él el nombre de la nueva imagen seleccionada. He probado con el ciclo For Each pero no sé cómo hacerlo cuando tengo que hacer los cambios. He gra…