Hola de nuevo. Sigo peleándome con mi proyecto. Lo cierto es que ya lo tengo prácticamente terminado, pero necesito acabar esto que me está volviendo a dar quebraderos de cabeza. He buscado en la red y este problema se plantea bastantes veces y he adaptado de una manera muy básica un código para un Textbox. Veréis en la captura que el formulario tiene muchos Textbox. La idea es la siguiente, en los Textbox H.Entrada, H.Salida y Tiempo NO efectivo, recojo los datos de una tabla Excel. Quedaría así una vez busco un empleado y una fecha. Lo que pretendo es poder modificarlos. o bien borrando el dato (dejándolo en blanco) o modificando la hora. Para …

Hola de nuevo. Llevo varias horas con esto y no consigo trabajar bien con las horas en VBA. Ahora mismo el problema que tengo es que con este código no me suma los Textbox vacíos. Necesito que los sume como "cero". Porque a veces no hay hora de entrada, o tampoco final, simplemente porque ha estado de vacaciones. O por ejemplo no ha habido tiempo para comer porque se ha hecho la jornada continua. ¿Podéis ayudarme? Me da lo mismo que lo de en horas (hh:mm) que en decimal, pero que me de el resultado., que no sea un número entero. TextBoxT1 es el resultado, TextBoxS1 es la hora Final, TextBoxE1 es hora Inicio, TextBoxN1 es el tiempo para comer. Es decir que a…

Hola a todos tengo una userform con un boton para buscar un archivo PDF y otro boton para cargarlo en un WebBrowser al intentar cargarlo se me va al acrobat me lo carga en el acrobat pero no en el WebBrowser. Esto con la version Excel me funciona correctamente en la version 2010 pero en la 2013 y creo que posteriores no funciona ( no lo se fijo) me da un error en el WebBrowser Carga de archivos PDF.xlsm

Buenos días y semana a todos. He intentado eliminar una columna a través de una macro y si su rango es fijo lo se hacer. Ahora bien si su rango es variable pues la cosa se me complica. Creo que para este caso (corregirme si me equivoco) la mejor opción sería localizar el titulo de la columna y después eliminar. He visto que algo con la función "Find" pero no he conseguido configurar nada, por eso recurro a vosotros por si me podéis ayudar. Adjunto macro. Saludos MEliminarColumnas.xlsm

Estimados, Esperando que se encuentren bien, recurro a ustedes para que me ayuden a dar solución a una duda que tengo. He creado una VBA para generar una fórmula en Excel tomando como criterio el contenido de otra. Si tiene "X" cantidad de filas esta se rellene en otra celda con la fórmula propuesta. Ahora, ¿Cómo puedo hacer para que después de aplicada la formula esta pase a valores? Adjunto el VBA que use: Range("Z2").Formula = "=VLOOKUP(Y2,AO:AP,2,0)" Range("Z2", "Z" & Range("AC2").End(xlDown).Row) = Range("Z2").Formula Quedo atento a sus comentarios. Ss.

Buenas tardes, esperando se encuentren bien ante esta situación tan penosa, el motivo por el cual escribo es que estoy haciendo una especie de sistema en Excel para controlar un pequeño almacén, los códigos los tomé recopilando e investigando códigos de varias páginas, porque en realidad no sé mucho de macros, solamente trato de entenderlas y acoplarlas a mi necesidad. El punto es que todos los formularios funcionan bien hasta ahora, pero me vino una duda con los formularios "frm_Guia" y "frm_Factura" específicamente con las Cantidades y Montos, por ejemplo en el formulario "frm_Factura" cuando asocio una guía, modifico los montos y hasta ahí todo normal, el problema…

Buenas noche, el proyecto que estoy realizando y me tiene desconcertado ya que he leído, probado y vuelta a leer, y no lo consigo es que al filtrar desde el comboBox este me llene los datos filtrados al listBox,tambien comentar que el formulario no se encuentra en la hoja activa, agradeceria la ayuda, adjunto archivo Nuevo Hoja de cálculo de Microsoft Excel.xlsm

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

Ciao a tutti mi chiamo Maurizio e il mio nuovo problema è questo: su un foglio excel sto cercando di estrarre dati da una pagina web; Sulle previsioni del tempo. Per esercitarsi. Diciamo di essere un principiante con questo tipo di approccio tabulare; Sono un disastro, ma nemmeno molto. Ora il problema è questo: sono stato in grado di estrarre tutti i dati di cui avrei bisogno per fare un buon lavoro; Il problema è che tali oggetti dovrebbero essere estratti da un elenco e collocati altrove in celle separate. Allora posso pensare di metterli anche nel posto giusto. Hai una vaga idea di come posso risolvere questo problema? (P.S) Io da solo avevo provato ad u…

Buenas tengo creado un mapa coroplético y me gustaría refactorizar el código mediante el uso de clases. La idea es que al abrir el libro se ejecute un constructor y almacene todos los objetos provincia en una colección. Pongo una captura de lo que he hecho hasta ahora: https://i.postimg.cc/90MJvP2W/imagen-2021-03-20-200920.png Ya he creado la estructura de cada una de las clases (cProvincia y cProvincias) pero mi duda es: 1. ¿Sería posible declarar a modo global una colección que dure el tiempo de vida del libro? ¿Es posible declarar una colección de tipo static como variable global? Lo he intentado y marca error. Más que nada lo digo, porque si cambio…

Hola buenas. Tengo este código y quisiera simplificarlo, con un bucle que me cargase lo mismo en los Combobox2 a Combobox8. No encuentro como hacerlo o no se como hacer la pregunta para encontrarlo, porque no lo encuentro. ¿me podéis ayudar? No es urgente, es simplemente que así son demasiadas líneas de código. Gracias. For Each celda2 In rango2 ComboBox2.AddItem celda2.Value ComboBox3.AddItem celda2.Value ComboBox4.AddItem celda2.Value ComboBox5.AddItem celda2.Value ComboBox6.AddItem celda2.Value ComboBox7.AddItem celda2.Value ComboBox8.AddItem celda2.Value Next celda2

Hola amigos de AE Una consulta. Tengo un archivo para que se guarde automáticamente antes de cerrar con un mensaje que avisa al usuario que se ha guaedado con éxito, sin embargo, desde de darle ok al mensaje pregunta aparece el cuadrito que pregunta si deseo guardar, no guardar o cancelar. Private Sub Workbook_BeforeClose(Cancel As Boolean) ThisWorkbook.Save MsgBox "ARCHIVO HA SIDO GUARDADO CON ÉXITO" End Sub El archivo es muy grande y no lo puedo adjuntar. Será algún comando en alguna macro del archivo que pregunta si desea guardar?? Muchas Gracias!!!

Qué tal, estoy teniendo problemas nuevamente queriendo copiar la misma hoja de diferentes archivos almacenados en una carpeta, lo que hace la macro es encontrar la última fila disponible para pegar la info del archivo 2, y así sucesivamente pero me aparece el error "1004" de que la hoja en la que quiero pegar el archivo no tiene el mismo número de celdas. Mi objetivo es hacer un archivo Master con la información de la primera hoja de todos los archivos dentro de la carpeta. Este es mi código: Sub MasterSTS() Dim Carpeta As String Dim Examinar As Object '-- Application.ScreenUpdating = False Application.DisplayAlerts = False Set Examinar = Application.FileDia…

hola expertos buenas tardes mi idea es bordear aquellas celdas que su numero sea igual a su posicion en los cuadros tanto arriba como abajo como lo muestro en la imagen con las celdas rojas Sub resaltar() ' ' Resaltar Macro ' Resalta similitudes https://foro.todoexcel.com/threads/bordear-celdas-de-acuerdo-a-posicion.55559/#post-237370 ' ' Acceso directo: CTRL+q ' Sheets("Hoja2").Select F1 = Asc(Range("A2").Value) f2 = Asc(Range("A3").Value) C1 = Range("B2").Value C2 = Range("B3").Value For J = 0 To 7 ' numero de Columnas Debug.Print "Siguiente Fila " If J Mod 2 = 0 Then Debug.Print "Esta si la hago :" & J For i = 0 To 9 ' numero de filas De…

Buenas tardes Tengo un formulario ya completo con un botón que guarda la información en diferentes hojas del libro de excel. Mi interés está en que al agregar la información a las filas de las hojas de excel, no puedan editarse. Dado que habrá varias personas utilizando el archivo, se quiere evitar el que se eliminen datos por algún descuido. Ya he intentando con los comandos de protect y locked y no logro resolverlo. Agradezco de antemano su apoyo y asesoría y tiempo. Daniela Plantilla LV 4.3.xlsm

Hola amigos AE. Una consulta. ¿Existe un comando de proteger la hoja previa o anterior? No me sirve colocarle nombre de la hoja pues la dinámica del proyecto cambia el nombre. Gracias!!!

Buen día, Espero alguien me pueda apoyar, tengo un libro de Excel con dos hojas, en la hoja llamada "Datos" viene capturada la información (marca, modelo, # de serie) de diversos equipos electrónicos proporcionados por el vendedor. En la Hoja 1 de igual manera viene capturada la información de los mismos equipos electrónicos capturada por gente en oficina. Se supone que todos los números de serie presentes en la "Hoja 1" deben coincidir con los números de serie de la hoja "Datos", ya realice la comparativa aplicando la función BuscarV en la columna G de la "Hoja 1", pero cerca de la mitad no encuentran coincidencia exacta. Pienso que puede existir errores d…

Buenos dias a todos , estoy con un trabajo para crear presupuestos , solo me falta un buen y bonito formulario el cual me he decidido ha construir, pero que dificil es cuando uno no sabe, lo estoy haciendo poco a poco pero no encuentro la forma de introducir imagenes, a ver si alguien puede ayudarme y estare muy agradecido, necesito una macro para insertar fotos GRACIAS prueva con formulario.rar

Hola de nuevo. Tengo un Excel que accede a una Access a través de macros conectando con "CreateObjet ("adodb.Connection") Hasta aquí perfecto, ahora la empresa está cambiando los Office en local por el Office365 (Online). He probado en un ordenador que tiene el 365 con Access y cuando abro un formulario me salta el primer error, "Dispositivo no disponible". El depurador de Visual Basic me da este error que creo que es un problema del drive ya que se para en la instrucción ChDrive ThisWoorkbook.Path. ¿Sabéis si esto tiene solución? Supongo que el problema viene de que el Path del libro es una url, al ser online, y no se si es posible salvar el error y que fu…

Buenas noches!! Escribo buscado ayuda, tengo una lista en donde en una columna tengo descripcion del producto y e la otra la temperatura. lo que pntend hacer esque cuando escribo la temperatura del producto escriba automaticamente "°C" es decir si yo escribo 20 aparesca 20°C anexo archivo Gracias!!! formato.xlsm

Buenas tardes Alguien me podría ayudar? Tengo un formulario en el que en la columna G tengo numeros de teléfono (solo algunos), por ello necesito una formula o lo que sea que si en la celda g3 es igual a = 0 vaya directamente a la celda c3 y si la celda g3 es diferente a 0 vaya directamente a la celda b4 y asi sucesivamente con el resto de las celdas. Es decir si g4=0 vaya a c4 y si g4<>0 vaya a c5 Gracias de antemano

Buenas, Tengo un archivo en el cual debo hacer gráficos, según cada valor único de la columna CLASE, en el excel que adjunto están 4 clases, estas se dividen en ESTACION, y esta en EPOCA, AÑO y FUENTE. Quisiera saber si hay una forma de generar estos gráficos automáticamente, son 32 clases en el archivo principal. Asimismo en el adjunto muestro el ejemplo de una sola CLASE. Muchas gracias Ejemplo.xlsx

Hola buenos dias, necesito ayuda con una macro, o quizas no sea la macro, en realidad no se lo que podra ser pero me esta maltratando el celebro, tengo una macro para cambiar foto segun texto en celda, este texto se cambia por un combobox y no me cambia la foto sin embargo si escribo el nombre de la foto , entonces si me cambia la foto, envio archivo con ejemplo saludos y muchas gracias por la ayuda Nueva carpeta (2).rar

Saludos maestros de Excel. Como podría hacer para buscar una información con varios campos que esta en una hoja y reemplazarlo en otra hoja pero no todo el campo sino uno o dos de ellos dependiendo de la necesidad. para el internet.xlsm

Qué tal, estoy teniendo problemas intentando eliminar la fila completa si no encuentra el valor en el vlookup, intenté filtrando y eliminando después del vlookup, en la condición del vlookup intenté la función .entireRow.Delete y aunque no me marca error, nunca termina de ejecutar la macro completa. ¿ Cómo puedo eliminar la fila completa del valor que no encuentre en el VLOOKUP ? 'VLOOKUP Dim Celda As Range, z As Long Application.ScreenUpdating = False Range("L:L").Clear For z = 2 To Range("B" & Rows.Count).End(xlUp).Row Set Celda = Sheets("Copia").Range("A:A").Find(Range("B" & z), , , xlWhole) If Not Celda Is Nothing Then …