Hola foreros Necesito un pequeño cable que no consigo hacer con un formulario que he creado os lo muestro en la imagen. Bien de momento todo me funciona ok, pero os pongo en contexto el botón "nuevo" crea una nueva hoja en ella inserto los datos dándole a botón guardar pero cuando clicko me gustaría que esa hoja se llamase igual que el campo "nombre más apellido". Por último en cuadro imagen tambien me gustaría clikar y que me dirija a una carpeta donde tengo las fotos almacenadas de cada cliente. No consigo dar con lo programación de suso dichos. Os agradecería que me pudierais dar un poco de luz. Gracias antemano y saludo.

Buenos días, Tengo un formulario en VBA en el cual el usuario introduce 32 valores y el programa compara si hay una diferencia entre algunos de ellos mayor de diferentes parámetros. Tengo una función que pinta el fondo de las textbox de rojo o amarillo cuando se superan estos parámetros. Funciona perfectamente, pero cuando borro uno de los valores introducidos (por ejemplo porque me he equivocado al introducirlo) me salta el error 13 'no coinciden los tipos'. Soy consciente que es porque pasa de comparar dos números a un numero y un "null" pero simplemente quería saber si la función puede esperar a que haya un valor para compararlo y así no tener que rein…

hola, tengo un formulario que al introducir la fecha de nacimiento te da la edad en un textbox (ese codigo me lo facilitasteis y genial) ahora lo que quiero es que cuando se pinche un checkbox coja la edad del textbox y busque en la hoja excel la edad y asigne la tarifa que le corresponde. he puesto un codigo pero la variable "Fila" da error en "No coincide los datos" necesito vuestra ayuda para que me digais que estoy haciendo mal. gracias. adjunto fichero. Calcular_Edad (1)_ayudaExcel.xlsm

Hola buenos días, Todavía soy novato con las macros, os comento para ver si me podéis ayudar. Lo que quiero conseguir es mostrar una imagen, que se pueda quitar dando en aceptar, desde una lista. Por ejemplo en la fila C si escojo de la lista "2x2" me tiene que enseñar la imagen "2x2" si escojo "2x3" que me muestre la imagen"2x3". Adjunto el Excel y las imágenes. Muchas gracias por vuestra ayuda Libro1.xlsx

Hola colegas buenos días, espero se encuentren con excelente salud ustedes y sus familias. Hoy me traigo un tema al que le he dado muchas vueltas y llevo varios meses tratando de resolverlo, usando disimiles variantes, pero debo confesar que no he podido, aunque he estado cerca de hacerlo, pero sigue faltando detalles que no consigo completar. He tratado de hacerlo con VBA y mediante fórmulas o funciones, incluso estuve estudiando un poco más profundo el tema de las fórmulas matriciales del Canal Excel Hecho Fácil de Andrés Rojas Moncada porque tuve la opinión que la respuesta estaba dado en el trabajo con matrices. Voy al tema: Mi Dirección Nacional me …

¡Buenas tardes a todos! Necesito su ayuda para automatizar una tarea semanal en Excel. Tengo un archivo de Excel que consta de cinco hojas: una hoja de datos del mes en curso y cuatro hojas fijas (Mar principales, Aire principales, Mar secundarias y Aire secundarias) que deben completarse según la hoja de datos del mes. La hoja de datos del mes tiene varias columnas, pero las importantes son F, G, H, I, L, N, Q y R, ya que determinan la clasificación y el contenido de las otras hojas. Quiero crear un botón en la hoja de datos del mes (Abril'23) que genere automáticamente los resultados en las hojas (Mar principales, Aire principales, Mar secundarias y Aire secun…

Hola a todos. Tengo un LIBRO de 142Kb. No veo la manera de reducirlo y que siga siendo comprensible. ¿ Como puedo mandarlo? Gracias a tod@s.

Buenas noches, No sé casi nada de programación en vba comparado con lo que he visto, tengo un error en la ejecución y no consigo adivinar cual es, simplemente quiero extraer datos de una tabla entre dos fechas, si es posible que alguien me ayude. Gracias y un saludo. busqueda fecha.xlsm

Buenos días estimados, necesito una macro que al ejecutarse, guarde en un nuevo libro solo los valores de la hoja activa y que todas las celdas tengan formato "texto". Además de ser posible que el nombre con el que se guarde contenga la fecha del día. Intenté hacerlo con varias macros publicadas en el foro pero no logro hacer que todo salga bien. Desde ya, muchas gracias por su ayuda.

Buenas, me gustaría saber si es posible obtener el nombre o la información de un icono que está en un subitem de un listview. Como veis en la imagen que os adjunto, en el listview se carga los dias de un mes y cada día tiene asignado un icono cuyo nombre es el número.jpg y en el listimage el número se corresponde con su index. Al seleccionar una celda, me gustaría obtener el nombre o el index del icono que contiene. itemSel = ListView1.SelectedItem itemSel..SubItems(2).Icon.name o ActiveIcon,index o algo por el estilo

Hola, una vez mas necesito vuestra ayuda, he intentado sacar el codigo de otros usuarios que han hecho la misma consulta que la mia, pero no me entero mucho. en mi caso los elementos de ambos combobox no estan en una hoja excel si no en el userform. expongo mi ejercicio. en el combobox1 tengo 9 elementos y en el combobox2 hay 22 elementos si combobox1 es igual 0 el combobox2 tiene que mostrar solo los dos primeros elementos (0 y 1) si combobox1 es igual 1 combobox2 = muestre los elementos 0 y 1 si combobox1 = 2 combobox2 = desde el 6 hasta el 22 si combobox1=3 combobox2 = desde el 14 hasta el 22 y asi con el resto de elementos del…

Hola, tengo una macro que me copia datos a una hoja dada, pero quisiera que cuando copie los datos y vaya a pegarlos, me pregunte el nombre de la hoja adonde quiero pegar los datos copiados. La macro es simple, ya que entiendo poco de programación Sub Datos_Capital() ' ' Datos_Capital Macro ' ' Sheets("201").Select ActiveWindow.SmallScroll Down:=-69 Cells.Select Selection.Copy Sheets("220").Select -------------->aqui es donde quisiera me preguntase el nombre u hoja a copiar Range("A1").Select ActiveSheet.Paste Range("C2:K2").Select Selection.Replace What:="3", Replacement:="22", LookAt:=xlPart, _ …

Hola, buenas tardes! Les comento, estaba tratando de armar una macro que fuera capaz que ordenar de mayor a menor los valores de cualquier columna de la tabla dinámica (principalmente del campo valores), la macro debe detectar la celda activa y ordenar de mayor a menor los valores de la columna en cuestión. Me encontré con una macro que logra hacer eso pero con el problema que solo funciona mientras tenga una solo valor en el campo "Filas" En este caso si yo solo tuviera el valor "Nombre" dentro del campo filas, la macro funciona bien, si yo tengo la celda activa en C5, entonces la macro ordena de mayor a menor lo valores del mes de enero, si la tengo en l…

Hola que tal, Tengo el siguiente código que me ayuda a exportar una columna cada 100 filas y guardar lo en una carpeta en formato .txt pero cada vez que exporto al final de la línea 100 se agrega un espacio en blanco, me pueden ayudar a quitarlo y que solo queden las 100 líneas que necesito. Adjunto código: Sub ExportarTXT() Dim mPath$, iniCell$, i&, LR&, Vec, j%, iniTime!, R% iniCell = "$G$2" iniTime = Timer mPath = ThisWorkbook.Path & "\Txt\" With CreateObject("Scripting.FileSystemObject") On Error Resume Next: .GetFolder(mPath).Delete True: On Error GoTo 0 .GetFolder(ThisWorkbook.Path).subFolders.Add "Txt" End With LR = Cells(Rows.Count, R…

macro para elegir carpeta origen, destino y copia recursiva de archivos . El problema que presenta es que cuando debería de salir de un menú inicial para seleccionar entre 4 opciones, y acto seguido pasarle un valor selecionado como carpeta origen al modulo principal. Acto seguido debería de solicitar una carpeta destino . La comprobacion de la existencia de los archivos se realiza desde un segundo archivo excel, haciendose la comprobacion en la carpeta origen y en todas sus subcarpetas de manera que todo aquel archivo que exista en carpeta origen o subcarpetas y aparezca su nombre en el segundo archivo excel será copiado en la carpeta destino. …

Buenas, tengo una duda de si se puede hacer o no con un listbox. Quisiera seleccionar un celda de un listbox dandole click para poder editarlo. Lo único que consigo seleccionar es la fila pero no una columna en concreto

Buenos días:He leído un poco de como generar un fichero de texto pero no he logrado saber como generar distintos espacios entre columnas. O sea, que salga la columna 1, dos espacios columna 2, seis espacios columna 3.Sería algo así:Nelio 36 LeerYune 34 BailarAgradezco a todo aquel que me pueda ayudar.

Hola a todos; Estoy tratando de pintar unos labels vinculando los textBox con los spinButtons, de forma estática lo consigo pero lo que quería conseguir es dar cierto dinamismo ayudándome de dichos spinButtons, Os lo muestro en este gif lo que tengo hasta ahora. Saludos y buen finde a todos. MIntervalos.xlsm

Hola estimados foreros, es posible que me puedan apoyar por favor...no sé y la verdad no entiendo el porqué del error que arroja al querer registrar un nuevo item (sondaje), me explico... en la hoja "BD" hay un botón de "agregar", éste al pincharlo se dispara el formulario con algunos datos de la tabla, luego si es que quiero registrar un sondaje nuevo (botón registrar) , al momento de digitar cualquier tecla... se dispara inmediatamente un mensaje con el error mencionado en el título de este tema. Por lo que estoy estancado en este punto y no puedo seguir avanzando para dejar funcionando el resto de los botones. Adjunto el archivo por si alguien me puede ayudar a sacar e…

Buenas tardes, Necesito ayuda en varios aspectos, me he bloqueado y a pesar de haber intentado varios métodos no consigo llegar a lo que necesito. Adjunto archivo con una pequeña prueba. 1. Necesito insertar un número determinado de filas desde A1 hacia abajo, a partir de la cantidad que ponga en B2, será entre 1 y 6 máximo, pero es por no estar insertando manualmente. Lo he intentado con la siguiente macro, pero siempre tengo que tener la celda bien marcada y con al menos 2 filas ya fijadas para que se quede el mismo formato, no sé si existe otra forma de hacerlo: Sub InsertarFilas() Dim numFilas As Long Preguntar al usuario por el núme…

Hola a Todos y buen dia. Espero y puedan apoyarme con mi tema de antemano muchas Gracias Tengo un codigo de macro que me sale error, y quisiera que alguien me ayudara, Explico que es lo que debe de hacer esa macro. Tengo numeros distintos en la columna A y un importe a buscar en la columna C2 lo que requiero es que en la columna B me señale con una "x" los importes exactos que sumen la celda que se encuentra en la Columna "C2" Anexo Archivo . Libro1.xlsm

Estimad@s, buenos días. Debo seleccionar un rango de celdas que contienen formulas desde la celda B2 hasta la I800 (B2:I800). Este rango varía de acuerdo a la información necesaria. Es decir que trae datos desde B2 hasta I3 y/o hasta I800. El tema es que las fórmulas siempre van hasta la I800 y no hasta el dato que quiero que seleccione. En este caso, el dato es un texto que es resultado de una fórmula. Cuando la fórmula no cumple cierta condición se muestra en blanco (" "). Pero para la Macro es una celda con datos. Entonces, cómo seleccionar hasta la última celda que contenga "x" dato que es el resultado de una fórmula. Debo seleccionar B2 hasta la última celda que…

Buenas tardes, ¿Me podéis decir si esto lo puede hacer Excel? Tengo una hoja con datos en tres columnas, 2 numéricas y una de texto, el problema que tengo es que estos datos los cojo de una aplicación diferente y se van modificando diariamente, necesito actualizar los datos de estas columnas sin perder las que no se hayan modificado, solo cambiar los que coinciden con el texto y primera columna y añadir si no existe añadiendo los tres campos. Lo he intentado en otra hoja del mismo libro pero no soy capaz. No se si me he explicado, bien. Un saludo a todos, Paco

Hola a todos, espero que me pueda ayudar con esta macro. Necesito hacer una iteración para saber la sección 2 , os lo explico mejor con un ejemplo de la tabla adjunta. El material, sección1, tipo e intensidad1 los pongo yo. La columna intensidad tabla es la intensidad máxima de la sección 300 de la tabla en la hoja 2. La intensidad2 corresponde a cada sección2 en la tabla de la hoja 2. El número de circuitos se obtiene de dividir la intensida1/intensidad2, al entero superior. La idea es cuando la intensidad 1 sea mayor a la intensidad de la tabla (367), la intensidad 1 se divida por las intensidades2 de la tabla en la hoja 2 y escoja el menor número de circuitos j…

Hola a todos los del foro Requiero un favor de ustedes, con un macro que me convierta el dato de la columna D de la hoja TXT a número con dos decimales. Los números de esta columna todos ninguno tiene separador de decimales pero todos los últimos dos valores son decimales. macro.xlsm Ejemplo D2 = "60225700 debe ser 602,257.00" D3 = "16123300 debe ser 161,233.00" de antemano muchas gracias y espero alguno me pueda ayudar.