Buenas Tardes: Tengo 2 hojas en excel una categorias y otra subcategorias. Necesito crear 2 combobox en un userform y que suceda lo siguiente: 1. combobox categoria sea medicamento combobox subcategoria aparezcan humano, fitoterapeutico, homeopatico, veterinario y oficinal. 2. combobox categoria sea cosmetico combobox subcategoria aparezcan humano, veterinario y dermatologico. 3. combobox categoria sea suplemento dietario combobox subcategoria no aparezca nada 4. combobox categoria sea alimento combobox subcategoria no aparezca nada 5. combobox categoria sea plaguicida combobox subcategoria no aparezca nada Una vez mas gracias

Hola comunidad de excel! Les vengo con un reto interesante. Estoy tratando de hacer un excel el cual rellene los mismos datos en 3 planillas diferentes de word, esto supe como hacerlo con una macro que usa las funciones buscar y reemplazar de excel. Pero ademas de eso quiero que guarde las planillas de word bajo un nombre que contiene un codigo que tambien es parte de los datos que ingreso en la hoja de excel. La verdad no tengo ni idea de como hacer eso. Para que entiendan bien a que me refiero les pondre un ejemplo: Los datos a ingresar son: Nombre Telefono Email Codigo de compra Quiero que una vez todos los datos hayan sido sustituidos en la planilla …

Hola a todos, Tengo el clásico formulario de Log In con una dirección de correo electrónico y una contraseña para acceder a la aplicación ofimática. Sin embargo, me gustaría conseguir lo siguiente: Cuando el usuario haga click en el icono del ojo , entones que se le muestre / oculte la contraseña que haya introducido. Pues bien, eso (más o menos) lo he conseguido con el siguiente código: Private Sub cbContraseña_Click() If tbContraseña.PasswordChar = "*" Then tbContraseña.PasswordChar = "" Else tbContraseña.PasswordChar = "*" End If End Sub Sin embargo, me gustaría modificar al mismo tiempo el icono del ojo en funci…

Hola!! Desarrollé un libro de excel con algunas formulas de uso común para mi y lo grabe en mi computadora como "COMPLEMENTO DE EXCEL" dejé que excel lo colocara en la carpeta por default que utiliza. Para trabajar ocupo el equipo de mi oficina, un equipo de escritorio en casa y una laptop, los tres con Excel 2016 MSO. Actualmente estoy desarrollando una solución utilizando VBA y dentro del código hago referencia a un par de formulas de las que contiene mi complemento utilizando la función Application.Run llamando al archivo mediante la ruta completa hasta la carpeta donde Excel guardó el complemento, en la computadora. El archivo de trabajo que estoy des…

Saludos a todos, con la siguiente disyuntiva quiero con macros filtrar una base de datos para quitarle todos los espacios en blanco y copiar los valores restantes a otra hoja. Pero al momento de estar grabando la macro me marca este error "Demasiadas continuaciones de linea". Anexo archivo de ejemplo. De antemano muchas gracias. demasiadas continuaciones de lineas .xlsm

Hola amigos: Tengo el siguiente código: Public Buscarhoja As String Private Sub UserForm_Initialize() 'Al iniciar el userform Application.Visible = False 'Ocultar la Aplicación Excel End Sub Private Sub UserForm_Terminate() 'Al cerrar el userform Application.Visible = True 'Mostrar la Aplicación Excel End Sub Private Sub UserForm_Activate() 'cargar número TextBox20 = Sheets("EXTRAS").Range("O1") + 1 'Cargar combobox ComboBox1.RowSource = "FP" ComboBox4.RowSource = "LA" ComboBox5.RowSource = "EP" p = Sheets("CLIENTES").Range("C1").End(xlDown).Row ComboBox2.RowSource = "CLIENTES!D2:D" & p End Sub Private Sub TextBox1_Change() 'Formato de fecha E…

Amigos Muchas gracias por este necesario e impresionante sitio y ayuda prestada. Tengo una duda tengo un macros para guardar ciertos datos de manera vertical, pero mi gran duda ahora es se puede hacer algo similar pero de forma horizontal? Sub copia() Dim Datos As Range, Dato As Range, x As Byte Set RECUENTO = Range("R3:U3") With Sheets("Hrs").Cells(Rows.Count, 2).End(xlUp)(2) For Each Dato In RECUENTO .Offset(, x) = Dato: x = x + 1 Next Dato End With End Sub Lo que necesito es copiar un rango fijo (q7:v404) a otra hoja y que estos sean copiados hacia la derecha (despues de la ultima columna vacia) Desde ya mu…

Hola amigos tengo la siguientes macro que saque por ahí, pero me a traido muchos problemas, lo que quiero es que según un valor ingresado me entregue una fotos con ese nombre y además me comprima la foto, porque tengo que insertar cerca de 40. agradezco desde ya su ayuda y buena voluntad. adjunto archivo saludos imagenes.rar

Buenas tardes amigos, espero que estén todos bien Después de revisar el foro a fondo no encontré nada parecido a ver si me pueden ayudar con esta problematica que tengo. Tengo un listado de fondos y quiero mediante una macro crear una hoja por cada fondo distinto que tenga en el listado. He visto propuestas por internet como esta: [CODIGO]Sub CreateSheets() Dim rng As Range Dim cell As Range On Error GoTo Errorhandling Set rng = Application.InputBox(Prompt:="Select cell range:", _ Title:="Create sheets", _ Default:=Selection.Address, Type:=8) For Each cell In rng If cell <> "" Then …

Tengo un archivo con muchas (realmente muchas) tablas dinamicas (que voy a llamar dashboard.xlsb), cuyo origen de datos esta en otro archivo de excel con multiples hojas (que voy a llamar basededatos.xlsx). El tema es que el archivo de datos creció tanto que se hizo practicamente inmajejable. Para sortear este problema, decidí convertir este archivo en binario (lo cambie de .xlsx a .xlsb). Por supuesto, ahora las tablas dinamicas están buscando los datos en el archivo basededatos.xlsx y no lo encuentran, pues decidi cambiarlo a basededatos.xlsb. Hay alguna forma mediante VBA de cambiarle la ruta o el nombre del archivo con el origen de datos a TODAS las tablas dinamica…

Buenos días chicos , He revisado que mi consulta no estuviera resuelta y no la he encontrado.He visto algunas parecidas pero lo que necesito concretamente. 1-OBJETIVO Tengo un archivo excel donde llevo el control economico de proyectos de inevrsión y quiero que desde el excel me baje los archivos adjuntos de los emails seleccionados en el outlook y me los guarde en la carpeta OFERTAS.Estos archivos son ofertas relacionadas con el proyecto de inversión y quiero ahorrar tiempo en la acción de bajar estos archivos adjuntos. Lo que me interesa es que me baje los archivos del email seleccionado o emails que yo seleccione , y no de los emails marcados como …

Hola, tengo un userform con un ComboBox que al iniciar selecciono un item. se podria hacer que al seleccionar uno de esos item cargue en el TextBox1 otro item relacionado con el ComboBox. ejemplo: Seleccionar Enero y en el texbox1 ponga 31 dias. Que los datos no los seleccione de una tabla que los seleccione desde el userform. Gracias Saludos. Libro1.xlsm

existe algun comando para terminar la ejecucion de la macros desde dentro del codigo? If StoPper <= RealMonth Then mSg = MsgBox("El mes analizado no cuenta con datos reales", vbCritical, "Error") 'aqui nececito algo que termine todos los procesos y termine la macros Else ... gracias.

BUENOS DIAS, ABRA ALGUNA MACRO QUE AMARRE MI PROYECTO EXCEL A UNA SOLA COMPUTADORA, YA SEA POR CODIGO DE DISCO DURO, O OTRO , ES DECIR QUE SI LLEVAN MI PROYECTO A OTRA MAQUINA NO LES ABRA.

Buenas tardes!! Estoy intentando buscar sin éxito información acerca de a través de una tableta para firma electrónica poder capturar la firma e insertarla en una hoja Excel, en un rango o una picture, pero no tengo éxito. Os agradezco si podéis darme un poco de luz, o si sabéis de algún link, o donde buscar, porque no veo información al respecto. La intención es que a la hora de imprimir una hoja de entrega de por ejemplo una herramienta de trabajo, en vez de imprimirla y firmarla en papel, pudiera firmarla en una tableta y guardar en PDF o imprimirla pero ya firmada. Todo lo que me sugiráis será de ayuda. Gracias de antemano. Moisés.

Hola: Necesito eliminar estas columnas ("A:E, G:G, I:J, L:M, O:Q, S:T, V:W, Y:Z, AB:AC, AE:AF"), pero no lo consigo con ninguna de las macros que he visto. Por ahora he conseguido una que funcione que aquí adjunto: Sub Eliminar_Col() Range("A:E").Select Selection.Delete End Sub pero solo elimina, lógicamente, las primeras 5 columnas porque no sé cómo se pueden añadir las otras. He intentado múltiples formatos para añadirlos a "Range" pero siempre me da error. Muchas gracias

Pretendo crear una tabla para hacer un seguimiento de documentos, de dónde vienen y dónde están. Los documentos son ingresados a la tabla con anterioridad (en una primera etapa), junto con otros. Luego de un tiempo estos documentos tienen destinos diferentes. Mi problema esta en la segunda etapa, al momento de registra el destino de esos documentos. Mi idea es por medio de un USEFORM: Textbox1: Ingresar el Nº del documento. (Buscaría en datos ya cargados) Textbox2: Fecha de Endoso. => COLUMNA (J) Textbox3: Endosado a. => COLUMNA (K) Textbox4: Obs. => COLUMNA (L) Lo que quisiera lograr es: Buscar en la Tabla, el dato ingresado en el Textbox1, a partir de …

Buenas me gustaría saber como hacerle para crear una macro que sea capaz de informarme cuando esta por agostarse mis inventarios Inventario.rar

Hola amigos, solicito su ayuda con el siguiente caso: Mediante una macros quisiera subir varios archivos excel automáticamente a la nube de DRIVE (hojas de cálculo Online). Para no estar subiendo uno por uno, ya que diariamente tengo que subir 50 archivos excel al Drive, y como son los mismos formatos tendría que reemplazar diariamente la misma hoja de cálculo de Drive. Ejemplo - Hojas de cálculo de Google. Quedo atento a vuestra gentil respuesta. Gracias!!! EJEMPLO.rar

Buenos dias, No soy capaz que funcione la macro, os explicco: Mi objetvo es: Macro 1: Conseguir que inserte una fila nueva cada cambio de celda de la columna a sea diferente. Despues de muchos dias y copiando ejemplos de la web conseguido Macro 2: Paso 1: que realice sumatorio de la columna J hasta espacio blanco y mantenga formula en la celda,( le llamare en este post obj1 y al range para su obtencion Range1). Despues de muchos dias y copiando ejemplos de la web conseguido Paso 2:que realice sumaproducto de la columna J * la columna K hasta espacio blanco y mantenga …

Que tal Buen Dia Tengo un problema con crear una macro que se es algo sencilla pero no doy, les explica: Tengo una base de datos donde la columna A es la informacion principal y en ocasiones se repite, la macro tiene que insertar dos filas al termino de cada lista repetida que encuentre (los datos ya estan ordenados). Adjunto un ejemplo, problema en pestaña 1 y como queda en pestaña 2 Gracias. Saludos!!! ejemplo.xlsx

Hola, tengo un formulario donde puedo abrir archivos pero antes de abrirlo debo verificar que no esté abierto con anterioridad. Estoy tratando de implementar : If FileAlreadyOpen(nomb_archivo) Then Pero me manda error.

Hola, es mi primer mensaje en el foro. Mi nombre es Alejandro y soy estudiante de Ingenieria Civil Siguiendo un post anterior Macro ReSolver ecuaciones de una incógnita quise resolver el problema planteado en el ultimo mensaje, en el cual se llega a un error de la función cuando la ecuación presenta un cambio de tendencia. Mi idea fue la siguiente: En cada ciclo comprar el resultado obtenido de Q con el real y guardar la diferencia en una variable. Luego si la diferencia es menor que la anterior guardar el valor de Y en una variable Yb. Para evitar el error de la función en el cambio de variable, cambie la condición de comparación del ciclo Do por una que recorra t…

buen dia tengan todos, ando en busca de la luz y la iluminacion, no logro dar el proceso, propiedad o codigo que me permita hacer que al seleccionar un elemento de un listbox tambien se posicione o seleccione toda la fila de la hoja encontrada, es decir, una vez dando click en elemento del listbox tambien me señale la fila a la que pertenece. Espero su valiosa colaboracion para poder resolver este dilema gracias anticipadas listoboxActivarceldaregistroSeleccionado.rar

Muy buen día, tarde, noche. Quisiera solicitar de su amable colaboración en un pequeño inconveniente que estoy teniendo. Estoy siguiendo un tutorial para un sistema de facturación, pero me he quedado atorado en un proceso, el cual es el siguiente: Según el instructor, para continuar con el tutorial se debe descargar un archivo que él dejo en un ejecutable, y que supuestamente me guarda una Dll entre mis archivos, la Dll se llama DllAdo.dll, la cual permitirá realizar una conexión entre Excel y Access, y que todo quedará según él más rápido. La cuestión es que nos indica que se debe crear un módulo de conexión con la siguiente función: '''''''''''DLL ADO ''''…