Пікірлер
@tonygonzalez3321
@tonygonzalez3321 11 күн бұрын
Buenas tardes Elsa... Felices Fiestas!!!! Muy buen aporte para realizar estas búsquedas con criterios múltiples... yo suelo usar siempre la instrucción OPTION EXPLICIT... en base a esto, qué clase de variable es "cd"? he probado a dimensionarla como OBJECT, VARIANT, y RANGE, y da error... si puedes aclararme este punto te lo agradecería. Un saludoooo!!!!
@ElsaMatilde
@ElsaMatilde 2 күн бұрын
Buen día y Feliz Año! Para este caso, donde la variable 'cd' recorre las celdas, la debes declarar como Range (1 celda también es un rango). Si te da error debe ser en alguna otra instrucción. Sub llenalista() Dim cd As Range Dim x As Integer, i As Integer 'opcional. Dependerá de la cantidad de filas ocupadas.
@elstp2
@elstp2 26 күн бұрын
Saludos, pudiera enseñarnos como realizar un sistema de contabilidad con excel y macros?, donde uno tenga un formulario que es donde uno registrara las informaciones de las cuentas contables o movimientos contables con su debito y creditos, y todo se vaya a una base de datos etc...
@ElsaMatilde
@ElsaMatilde 25 күн бұрын
Hola. Tomo la idea. Pero desde ya que el tema no es menor como para publicarlo en 1 solo video. Y además ya estamos en época de vacaciones! Te sugiero ir mirando los videos 27 y 29 donde encontrarás un formulario para 'crear registros' y otro luego para 'modificar / eliminar' esos registros. Esta sería una base de las macros que necesitarás. Sdos!
@elstp2
@elstp2 20 күн бұрын
@@ElsaMatilde gracias
@franciscotorres2738
@franciscotorres2738 Ай бұрын
Si tienes dudas de como exportar (Guardar) hojas Xlsx, le comparto el código: hace lo mismo que el de PDF pero con las hojas Sub conXlsx(nbre) ruta = ThisWorkbook.Path ActiveSheet.Copy With ActiveWorkbook .SaveAs Filename:=ruta & "\" & nbre & ".xlsx", FileFormat:=xlOpenXMLWorkbook .Close savechanges:=False End With End Sub Si tienen alguna pregunta, Elsa sabe jajaja
@ElsaMatilde
@ElsaMatilde 29 күн бұрын
Se agradece el aporte. Ya está copiada en el Blog como también la de exportación a PDF. Sdos!
@franciscotorres2738
@franciscotorres2738 Ай бұрын
En el caso de que tenga mucas más columnas que hacer?
@ElsaMatilde
@ElsaMatilde Ай бұрын
Hola Fran. En mi primer comentario dejo dicho que en el Blog encontrarán otra macro no mostrada en el video. Enviame tu hoja si tu libro tiene una estructura o formato diferente a todos los ejemplos mostrados en este canal, y veo si necesito publicar un video más sobre este tema ;) Sdos!
@franciscotorres2738
@franciscotorres2738 Ай бұрын
@@ElsaMatilde Muchas gracias, claro que sí.
@santiagocorrea2327
@santiagocorrea2327 2 ай бұрын
muy buenas noches, y en dado caso de que yo quiera mostrar una imagen así como usted la muestra profe, pero con la particularidad de que quiero que sea en tiempo real. es decir una selección de rango o imagen así como usted misma lo explica pero en tiempo real y que se refleje en una imagen como podría hacerlo. existe alguna manera ? me interesaría muchísimo aprender. muchísimas gracias por su valioso aporte profe. un abrazo y me encantaría que pudiera responder mi pregunta. de ante mano muchísimas gracias.
@ElsaMatilde
@ElsaMatilde Ай бұрын
Hola Santiago. Siempre hay que guardar la imagen. Si miras el siguiente video (Nº 82) lo verás 'en tiempo real'. En un userform se selecciona un item desde el combobox y 'casi inmediatamente' se obtiene la imagen del rango filtrado en un control Listbox, a pesar de que ese rango previamente se guardó como una imagen. Sdos!
@santiagocorrea2327
@santiagocorrea2327 Ай бұрын
@ElsaMatilde muchísimas gracias. Lo intentaré hacer tal y como lo describes en el vídeo 82
@ElCanalDeNito
@ElCanalDeNito 2 ай бұрын
Hola Elsa, veo que te animas con la competencia. La verdad es que está creciendo el interés por esta hoja de cálculo. Es una herramienta muy potente y para empezar a aprender la veo inclusive mejor que Excel, tiene una ribon muy básica. Saludos ❤
@ElsaMatilde
@ElsaMatilde 2 ай бұрын
Hola. Si, es verdad. Cada vez se ven más consultas por este tipo de hojas. Tienen sus pro y sus contra. Veremos cómo avanza esta competencia. 😉
@oscardulcey
@oscardulcey 2 ай бұрын
Buenas noches, desde hace tiempo conoci su blog y ahora descubro sus videos. ¡Genial! Gracias por su tiempo y por compartir conocimiento.
@ElsaMatilde
@ElsaMatilde 2 ай бұрын
Agradezco tus comentarios. Sdos!
@Claudio_Rengifo
@Claudio_Rengifo 3 ай бұрын
Excelente, aún está disponible para su descarga
@ElsaMatilde
@ElsaMatilde 3 ай бұрын
Hola Claudio. Claro que sí. Si no se puede descargar desde el sitio solicitamelo a mi correo. Sdos!
@Claudio_Rengifo
@Claudio_Rengifo 3 ай бұрын
@@ElsaMatildeGracias. Cuál es su contacto de correo
@ElsaMatilde
@ElsaMatilde 3 ай бұрын
cibersoft.arg de gmail.com
@elgaulinvicto
@elgaulinvicto 3 ай бұрын
Muy agredecido con su aporte, me gusto mucho tu manera de explicar. Quizas podria ayudarme con esto, al exportar la imagen la guarda en blanco pero eso solo ocurre en mi pc de escritorio ya que cuando ejecute la macro en mi laptop no tuve ningun inconveniente, hay alguna configuracion adicional que debo hacer en mi pc? Gracias de antenmano
@ElsaMatilde
@ElsaMatilde 3 ай бұрын
Gracias por tus comentarios. Con respecto a tu consulta, recuerdo que en versiones bastante anteriores de Office teníamos una opción en Word ya que era un problema frecuente, algo como: Mostrar dibujos y cuadros de texto en pantalla. Debieras comparar las opciones de tu Excel en la laptop con las de la PC. Sdos!
@ElCanalDeNito
@ElCanalDeNito 3 ай бұрын
Hola Elsa, muy interesante y bien explicado la instrucción. Saludos 👍👍
@josemariacorderoherrera640
@josemariacorderoherrera640 4 ай бұрын
Gracias por compartir doña Elsa. En el caso que el rango de búsqueda tenga un filtro el método find no logra encontrar los valores ocultados por el filtro. ¿Que sugiere en esos casos?
@ElsaMatilde
@ElsaMatilde 4 ай бұрын
Hola. Una opción sería quitar el filtro, hacer la búsqueda y volver a colocar el filtro. Dejo un pequeño ejemplo: Sub busca_con_filtro() 'dato a buscar en la col C dato = "mayo" 'se quitan posibles filtros If ActiveSheet.FilterMode = True Then ActiveSheet.ShowAllData On Error GoTo noEncontrado Range("C:C").Find(what:=dato, LookIn:=xlValues, lookat:=xlWhole).Activate 'si encuentra el dato guarda la ubicación en una variable o mensaje MsgBox ubica 'opcional 'vuelve a colocar el filtro que tenía ActiveSheet.Range("$A$4:$D$26").AutoFilter Field:=1, Criteria1:="<>" & "COBRANZAS" Exit Sub noEncontrado: MsgBox "No se encontró el texto " & dato & " en la col C" 'vuelve a colocar el filtro que tenía ActiveSheet.Range("$A$4:$D$26").AutoFilter Field:=1, Criteria1:="<>" & "COBRANZAS" End Sub Otra opción es recorrer el rango con un bucle del tipo For... Next donde se incluyan las celdas ocultas: Sub busca_con_ocultos() 'dato a buscar en la col C dato = "OCT" For i = 5 To Range("A" & Rows.Count).End(xlUp).Row If Range("C" & i) = dato Then MsgBox "Dato encontrado en fila " & i Exit For End If Next i End Sub
@josemariacorderoherrera640
@josemariacorderoherrera640 4 ай бұрын
@@ElsaMatilde muchísimas gracias por compartir su conocimiento. En mi caso prefiero la opción de quitar y poner los filtros para usar el Find dado que se trata de muchos registros a evaluar. Le saludo desde Costa Rica 🇨🇷.
@omarc.g.2796
@omarc.g.2796 4 ай бұрын
Gracias por el video Elsa. Saludos.
@jahsantos6635
@jahsantos6635 4 ай бұрын
🎉esto era lo que buscaba, suscrito y revisando los demás videos 🎉 gracias ✨
@ElsaMatilde
@ElsaMatilde 4 ай бұрын
Gracias por comentarlo ;) Sdos!
@jahsantos6635
@jahsantos6635 4 ай бұрын
@@ElsaMatilde hola, espero estes bien Disculpa, intento configurar el código para que coja en la fila 8 con fila combinada desde las columnas de la C a la H , y no me realiza el auto ajuste Podrías por favor orientarme 🥹🙏🏼 depende de esto un informe importante que debo entregar 🙏🏼 gracias
@ElsaMatilde
@ElsaMatilde 4 ай бұрын
@@jahsantos6635 Aquí en el Blog dejé otro ejemplo: elsamatilde.blogspot.com/2022/02/53-autoajuste-de-filas-en-celdas.html Si no te resulta tendrás que enviarme tu libro para verificarlo. Sdos!
@jahsantos6635
@jahsantos6635 4 ай бұрын
@@ElsaMatilde también use el código del otro ejemplo pero tampoco me sirve Te enviaré correo y agradezco tu revisión 🥺
@ElsaMatilde
@ElsaMatilde 4 ай бұрын
@@jahsantos6635 Claro, porque veo que tu necesidad no es recorrer un rango sino que son celdas específicas. Para estos casos los videos 1 y 3 podrían haber sido más apropiados. Ya te estoy devolviendo tu libro con la macro ajustada. Sdos!
@ElCanalDeNito
@ElCanalDeNito 4 ай бұрын
Hola Elsa, un tío muy bueno para las t.d. Saludos.👍👍
@ElCanalDeNito
@ElCanalDeNito 5 ай бұрын
Hola Elsa, muy biuena la explicación y ejemplo. Saludos.👍
@ElsaMatilde
@ElsaMatilde 5 ай бұрын
Para mencionar libros que se encuentran en otro disco o servidor, seguir los siguientes ejemplos: Sub Libros_en_otro_Disco() ruta = "D:\AL_TRABAJO_2023\Javi_Prueba_IMAGENES\Datos\" libro = "Consultas Julio.xlsm" Workbooks.Open (ruta & libro) End Sub Sub Libros_en_un_Servidor() ruta = "\\EMPRESA\Sucursal1\Depto.Pedidos\Marketing y ventas\" libro = "Consultas Julio.xlsm" Workbooks.Open (ruta & libro) End Sub
@ElsaMatilde
@ElsaMatilde 5 ай бұрын
(06:10) En la instrucción Workbooks.Open (ruta & "PEDIDOS REGISTRADOS/" & nbreLibro) la palabra PEDIDOS no debe llevar la barra delante ya que la variable 'ruta' la contiene.
@anaschrittate1895
@anaschrittate1895 5 ай бұрын
Muchas gracias , por tus explicaciones tan claras. Un saludo
@ElsaMatilde
@ElsaMatilde 5 ай бұрын
Gracias por tu comentario. Sdos!
@jesusbernardovalenzuelamar9390
@jesusbernardovalenzuelamar9390 5 ай бұрын
Le debo mi vida, trato de hacer una recoleccion de datos de una empresa que guardaba todos sus datos en diferentes hojas, ahora se quieren graficar todos esos datos de una manera secuencial pero son muchas hojas! con ayuda de una macros, recopilare todos los datos y me hacia falta saber como buscar datos entre las pestañas. MUCHAS GRACIAS!, Me suscribo y veo sus demas videos al respecto.
@CamilaGalvezCamilo
@CamilaGalvezCamilo 6 ай бұрын
Hola buenas tardes, tengo una consulta, tengo una planilla Excel guardad con nombre un nombre X.. al modificar este nombre los hipervínculos se eliminan. Como puedo modificar sin que se eliminen los hipervínculos??
@ElsaMatilde
@ElsaMatilde 5 ай бұрын
Hola Camila. Si cambias de nombre al libro del ejemplo, que tiene la lista con los vínculos, éstos se mantienen. Ahora, si tus hipervínculos se dirigen a un libro (digamos Libro1) y ahora le cambias ese nombre por 'Nuevo_Libro', tendrás que modificar el argumento 'Address' en la macro, manteniendo el resto de los argumentos sin cambios. Sub Mod_libroVinculado() 'nuevo nombre del librovinculado nvaDire = "Nuevo_Libro.xlsm" 'modifica el rango de la col A, a partir de la fila 4 'se mantienen los argumentos SubAddress(hoja y rango)y Screentip del vínculo For x = 4 To Range("A" & Rows.Count).End(xlUp).Row Range("A" & x).Select ActiveSheet.Hyperlinks.Add Anchor:=Selection, Address:=nvaDire, _ SubAddress:=Range("A" & x).Hyperlinks(1).SubAddress, _ ScreenTip:=Range("A" & x).Hyperlinks(1).ScreenTip, _ TextToDisplay:=ActiveCell.Text Next x End Sub Si el nuevo libro se ubica en una 'subcarpeta' de la carpeta activa tendrás que agregarla en el nombre, por ej: Pruebas\Nuevo_Libro.xlsm O de este modo si se encuentra en otra ubicación: ..\..\Pruebas\Nuevo_Libro.xlsm Sdos!
@gersaavedra6168
@gersaavedra6168 6 ай бұрын
Gracias. Muy buen video
@ElsaMatilde
@ElsaMatilde 6 ай бұрын
Gracias!
@manuelmoreno6211
@manuelmoreno6211 6 ай бұрын
Muchas, gracias por el aporte, de verdad me sido muy util.
@ElsaMatilde
@ElsaMatilde 6 ай бұрын
Me da gusto que así sea. Sdos!
@JorgeBustamante-c7e
@JorgeBustamante-c7e 6 ай бұрын
Ingeniería buenas tardes soy de Ecuador y es un excelente tutorial ....una preguntA en lo que corresponde al formulario este podría buscar en una base de datos con 5000 productos sin ponerse engorroso el filtro(se demore en filtrar)
@ElsaMatilde
@ElsaMatilde 6 ай бұрын
Las demoras en los procesos tienen que ver con la memoria disponible y los recursos del sistema (versión Windows, versión Office, tamaño del libro, etc). Tendrás que realizar alguna prueba y verificarlo. Sdos!
@JorgeBustamante-c7e
@JorgeBustamante-c7e 7 ай бұрын
El de pajinacion en en un listbox con un buscador
@ElsaMatilde
@ElsaMatilde 2 ай бұрын
Hola. Entiendo que este comentario se resolvió en la respuesta anterior. De todos modos te dejo el enlace del último video donde publico 3 ejemplos con un ListBox dentro de un Userform: kzbin.info/www/bejne/aYC3iXqhrsaFe9E Sdos!
@Daniel_MZA
@Daniel_MZA 7 ай бұрын
Gracias por sus aportaciones en Excel me son muy útiles, Saludos desde México!
@ElsaMatilde
@ElsaMatilde 7 ай бұрын
Gracias por comentarlo. ❤
@ElCanalDeNito
@ElCanalDeNito 7 ай бұрын
Hola Elsa, me gustó la 💡. Interesante. Saludos.
@ElsaMatilde
@ElsaMatilde 7 ай бұрын
Gracias por comentarlo.❤
@celisfreites9401
@celisfreites9401 7 ай бұрын
Quisiera por favor me ayude, estoy haciendo una aplicación en vba para un restaurante y necesito lo siguiente: tengo 20 mesas que al momento de abrir el modulo de venta selecciono la mesa y cambia de color y su estado pasa a ocupada la idea es seleccionar e ir montando la comanda hasta que el cliente quiera pagar, pero al salir de ese modulo no conserva el color de ocupado, cómo puedo hacer esto por favor ayuda
@ElsaMatilde
@ElsaMatilde 7 ай бұрын
Hola. Te podría recomendar que utilices variables para indicar que la mesa está ocupada y cuando el cliente paga, quitarle la marca. De este modo se puede evaluar a la salida del módulo el estado de las variables, que debieran ser declaradas como Públicas para ser consultadas en diferentes procesos. Si no logras resolverlo tendrás que enviarme tu libro para revisarlo. Los correos aparecen en la sección Contactos de mi sitio AplicaExcel. Sdos!
@JorgeBustamante-c7e
@JorgeBustamante-c7e 7 ай бұрын
Buen video una pregunta con este buscador si el formulario esta ubicado en otra hoja de excel realiza la búsqueda
@ElsaMatilde
@ElsaMatilde 7 ай бұрын
Hola. Entiendo que se trata del video Nº 36 ya que allí vimos un ejemplo con formularios. Entonces, si el Userform se abre en otra hoja, la búsqueda se ejecuta correctamente porque se menciona que debe ser realizada en Sheets("Hoja1"). Pero para el pase de datos al ListBox debes anteponer la hoja. Por ejemplo: Listbox1.List(i,1) = Sheets("Hoja1").Range("B" & fila). Te recomiendo el video nº 66 (Cinco maneras de nombrar a las hojas). En tu userform podrías declarar Set hoX=Sheets("Hoja1") y luego anteponer en todas las instrucciones de pase esa referencia. Sdos!
@ivandarioespinosaacero8721
@ivandarioespinosaacero8721 7 ай бұрын
Buen día señora Elsa, Primero que todo, quiero darle infinitas gracias por compartir su conocimiento en este leguaje el cual me apasiona muchísimo y sin dejar de lado mis más sinceras felicitaciones por los videos que sube en su canal, lo que me lleva a hacerle una consulta puntual;: Actualmente yo desarrollé una macro que valida cantidades de un archivo y las contrasta con las cantidades que tiene otro archivo, claramente para hacer esto, primero la macro debe validar un criterio por el cual debe hacer un filtro y así cumplir su función, peeeero, al hacer el filtro en el segundo archivo (cédula de ciudadanía) y, al no encontrarse ese documento en el archivo, el filtro queda "en blanco", es decir, la macro genera un filtro de algo que no está en la segunda base y por ende arroja un error, a pesar de que le implementé un manejador de errores el cual no me gusta usar mucho, la macro "salta este error por la primera vez" pero si ella sigue encontrando un segundo documento que no esté en la base, el manejador de errores ya no cumple su función y se me detiene el procedimiento. Así las cosas, quisiera saber si usted tiene algún procedimiento ( un IF Then Else) que me permita hacer una validación primero sí ese documento que estoy filtrando está o no en la segunda base para evitar usar lo menos posible el manejador de errores GoTo.?? Gracias y quedo atento a sus comentarios o inquietudes que esto genere . 🙏
@ElsaMatilde
@ElsaMatilde 7 ай бұрын
Hola. Haces un filtro en una base y quieres saber si ese dato también está en la segunda base....antes de filtrarla..... ? Envíame por favor algo más de información a mi correo y con mucho gusto revisaré tu macro. Sdos!
@codextremo4238
@codextremo4238 7 ай бұрын
COMO PUEDO CONTASTARME CON UD 😀
@ElsaMatilde
@ElsaMatilde 7 ай бұрын
Hola. Los correos aparecen en la sección Contactos de mi sitio AplicaExcel. Quedo atenta. Sdos!
@ElCanalDeNito
@ElCanalDeNito 8 ай бұрын
Hola Elsa, muy interesante lo expuesto. Buena idea el doble click. Saludos 👍
@juanmarchio4147
@juanmarchio4147 8 ай бұрын
Hola, muy interesantes tus videos. Respecto a tu blog, te pediria que cambies los colores de los fonts porque la verdad no se lee nada, salvo los titulos en rojo. El resto sale en celeste muy clarito. Un gran saludo
@ElsaMatilde
@ElsaMatilde 7 ай бұрын
Gracias por comentarlo. Veré de mejorar el Blog. Sdos!
@ElsaMatilde
@ElsaMatilde 7 ай бұрын
Estimado Juan. Le cambié el tamaño de letra a las últimas 3 entradas del Blog. Coméntame si ahora permite una mejor lectura. Gracias. Sdos!
@rubencruz7168
@rubencruz7168 8 ай бұрын
Excelente explicacion. Gracias por compartir su conocimiento. Siempre estaré agradecido por toda la ayuda q me has dado. Ya hace un par de años de ese codigo. Saludos y sigo leyendo tus manuales.
@ElsaMatilde
@ElsaMatilde 7 ай бұрын
Gracias por comentarlo. Sdos!
@MarioSaiz-m6u
@MarioSaiz-m6u 8 ай бұрын
Genial.Muchas gracias por compartir su conocimiento.Realmente su forma de explicar es muy sencilla y se entiende fácilmente
@ElsaMatilde
@ElsaMatilde 7 ай бұрын
Gracias por comentarlo. Sdos!
@juniormarca6143
@juniormarca6143 8 ай бұрын
Gracias. El ejemplo 4 me sirvió c:
@ElsaMatilde
@ElsaMatilde 7 ай бұрын
Gracias por comentarlo. Sdos!
@Benito-MExcel
@Benito-MExcel 9 ай бұрын
Hola Elsa, buenos ejemplos Saludos.
@ElsaMatilde
@ElsaMatilde 7 ай бұрын
Gracias Benito. Sdos!
@mmmmmnoma
@mmmmmnoma 9 ай бұрын
No funciona la parte de e.columnwidth regresa vacio, solo da el ancho de la primer columna combinada d.columnwidth y de la segunda da vacio, por lo tanto no funciona la macro, pero gracias por la explicación. En office 365.
@ElsaMatilde
@ElsaMatilde 7 ай бұрын
Qué raro lo que me comentas. Acabo de descargar el libro con el ejemplo y veo que sí ajusta bien (en 365). Quizás tu problema sea otro. Si deseas enviarme tu libro para revisarlo, los correos aparecen en la sección Contactos de mi sitio AplicaExcel. También te invito a visitar el Blog. Allí dejé otros ejemplos con otras combinaciones de columnas que quizás quieras evaluar. Sdos!
@WilliamMendez_cw
@WilliamMendez_cw 9 ай бұрын
Gracias, Elsa muy bueno
@ElsaMatilde
@ElsaMatilde 7 ай бұрын
Gracias por comentar ;) Sdos!
@ElsaMatilde
@ElsaMatilde 9 ай бұрын
NOTA: en el Blog, en la entrada de este tema, dejo otra macro para resolver el mismo ejemplo pero sin establecer de antemano las columnas combinadas. Para ejecutarla bastará con seleccionar alguna celda del rango combinado.
@ElCanalDeNito
@ElCanalDeNito 10 ай бұрын
Hola Matilde, muy buena la propuesta. Me gusta mucho el procedimiento para el ComboBox. Me alegra que esté de vuelta por el canal. Saludos 👍👍
@marcopantig.5941
@marcopantig.5941 10 ай бұрын
Gracias me has ayudado bastante!!!!, es muy didáctico (también tu blog por supuestooo!!)y sencilla tu manera de explicarlo aunque no por ello fácil te agradezco mucho, pero es posible que en la macro en el código se pueda modificar por ejemplo: dejar digamos que uno se sitúe en la cabecera de 1 columna o columnas cualquiera de Excel (A,B,C,D,E,F,G, ET) en donde se desee ajustar el alto de la celda combinada puede ser columnas G, H, I, J por decir otro rango? en tu ejemplo se hace en específico en columnas D y E pero si se hace con esta opción quizá se pueda usar con cualquier rango diferente a columnas D y E; porque sucede que a veces el archivo ya viene con varias columnas combinadas y sería excelente que cargado los datos de la tabla uno pueda elegir que columnas ejecuten la macro situándose en la cabecera de columna de Excel... De antemano gracias por tu atención!!
@ElsaMatilde
@ElsaMatilde 10 ай бұрын
Si no podrás establecer de antemano cuáles serán las col a combinar (en el video son D:E) , tendrás que seleccionar alguna celda 'combinada' . Podría ser la del TITULO o no. De esa manera la macro sabrá de cuántas columnas dispone para la combinación. Acabo de publicar la macro en el Blog con la imagen del ejemplo: elsamatilde.blogspot.com/2022/02/53-autoajuste-de-filas-en-celdas.html Sdos!
@galocasagrande9905
@galocasagrande9905 10 ай бұрын
Hola Elsa, estaria necesitando ayuda con un ejercicio en particular. Lo que necesito es que mediante el uso de while, do while cualquiera sea y atraves de un input seleccionar las palabras de un rango especifico segun la respuesta que coloque en el inputbox. Obviamente la palabra que elija como respuesta debe estsr en el rango. Luego con eso debo hacer operaciones.
@ElsaMatilde
@ElsaMatilde 9 ай бұрын
Hola: Entiendo que no necesitas el InputBox para SELECCIONAR una celda/rango de la hoja sino para INGRESAR UN TEXTO que luego lo vas a buscar en el rango. Comentame si de esto se trata. Sino, enviame en una hoja Excel una pequeña muestra con las aclaraciones al correo cibersoft.arg de gmail. Sdos!
@Segadorasv
@Segadorasv 11 ай бұрын
Gracias! Una duda si las celdas combinadas fueran más, en el código tendría que poner todas las celdas en el set?
@ElsaMatilde
@ElsaMatilde 11 ай бұрын
Hola Abraham. Si, debes sumar el ancho de todas las columnas de cada fila. Por ejemplo desde B:G sería: 'se declaran todas las columnas involucradas en el rango Set B = Cells(y, 2): Set C = Cells(y, 3): Set D = Cells(y, 4): Set E = Cells(y, 5): Set F = Cells(y, 6): Set G = Cells(y, 7) anchocol = B.ColumnWidth + C.ColumnWidth + D.ColumnWidth + E.ColumnWidth + F.ColumnWidth + G.ColumnWidth Pero, como le comenté a 'user-pw' unas semanas atrás, el resultado del cálculo depende de la cantidad de columnas, pero también de la fuente (tamaño, tipo de fuente, negrita o no) por lo que en las instrucciones de ´cálculo' tendrás que ir probando y ajustando. Por ejemplo: para fuente normal (calibri 11) y 6 columnas. If dif <= 1.5 Then 'si son muchas columnas probar con <= 1 If dif <= 0.4 Then 'si es fuente muy pequeña y mayor nro de columnas probar con 0.5 resulta = 1 Else resulta = 2 End If Else resulta = dif + 2 End If 'se asigna el alto obtenido If resulta > 0 Then Range("A" & y).RowHeight = (alto * resulta) Si te presenta algún inconveniente adaptar esta macro a tu modelo de datos, podrás enviarme tu libro a mi correo con la macro para ajustarla. Sdos!
@Segadorasv
@Segadorasv 10 ай бұрын
@@ElsaMatilde muchísimas gracias!
@LeandroMorocho-q1z
@LeandroMorocho-q1z Жыл бұрын
gracias por tu aporte!! tengo un problema al tener mas celdas combinadas (aprox 10) y no esta tomando algunas el alto de la fila. Si podria ayudarme
@ElsaMatilde
@ElsaMatilde Жыл бұрын
Enviame tu libro con un pequeño ejemplo para que pueda apreciar cuáles son las celdas combinadas (1 o más columnas, 1 o más filas). Mis correos aparecen aquí: aplicaexcel.com/contactos Sdos!
@ElsaMatilde
@ElsaMatilde 11 ай бұрын
Leandro: Ya te devolví el libro con la macro ajustada. Revisa tu carpeta Spam por si no lo encontraste aún ;)
@ElsaMatilde
@ElsaMatilde Жыл бұрын
Aclaración: al momento de darle formato moneda puede ser escrita como en mis ejemplos o con la palabra 'currency' de este modo: TextBox2 = Format(TextBox2.Value, "Currency"), lo que devolverá el formato regional del usuario.
@elmorocho4502
@elmorocho4502 Жыл бұрын
Excelente explicación. Gracias
@elmorocho4502
@elmorocho4502 Жыл бұрын
Buena publicación, para hacer búsquedas en BD. Gracias por compartir
@ElsaMatilde
@ElsaMatilde Жыл бұрын
Gracias a tí por comentarlo. Sdos!
@elmorocho4502
@elmorocho4502 Жыл бұрын
Excelente publicacion.
@elmorocho4502
@elmorocho4502 Жыл бұрын
Excelente, video. muy bien explicado. Se pudiera hacer que haga un resumen de todos los meses segun el Articulo vendido, es decir que evalué cada uno por separado.
@ElsaMatilde
@ElsaMatilde Жыл бұрын
Hola, gracias por tu comentario. Para obtener un resumen debieras mirar los videos de Filtros. Nº 35 (Filtro avanzado) y Nº 36 (Filtro dinámico) desde un Userform. Sdos!
@joseurbaneja
@joseurbaneja Жыл бұрын
Tiene un enlace para descargar este ejemplo ?
@ElsaMatilde
@ElsaMatilde Жыл бұрын
Hola José. Si, podés acceder a más detalles en el Blog, buscando la entrada del 2020, Enero. Para descargarlo directamente: aplicaexcel.com/Blog/Mod-Elim_Base.xlsm Si te presenta alguna dificultad contactame a mi correo (aparece en mi web) y te lo envío x mail.