Saltar al contenido

Macros y programación VBA

Temas sobre la automatización de Excel utilizando macros y VBA. Errores de VBA. ¿No consigues que tus macros hagan lo que necesitas?

  1. Started by jeladio,

    Hola amigos: Recurro nuevamente a uds para ver si alguien me puede dar una ayudadita, he estado adaptando varias macros que me he encontrado en internet a una aplicacion que estoy haciendo, entre ellas me encontre una que me conecta excel con access, es una aplicacion muy completa y funciona muy bien, pero como yo he tenido que estar haciendole agregados, cada macro que he ido adaptando abre y cierra la base de datos independientemente, (al menos eso es lo que entiendo) mientras que con el macro principal que estoy utilizando abre una sola vez se realiza todo en ella y luego se termina cerrando, y por lo que veo hace todos los cambios utilizando el macro que se encuentr…

    • 0

      Reacciones de usuarios

    • 1 respuesta
    • 852 visitas
  2. buenas soy nuevo en esto para ver si me pueden colaborar es que necesito copiar una columna y pegarla en otra pero que esa se repita varias veces hacia abajo gracias

    • 0

      Reacciones de usuarios

    • 4 respuestas
    • 1.4k visitas
  3. Started by sara506,

    Chicos mi duda va en como podria hacer para unir varios archivos XLM en uno solo ya que tengo como 1000 y si no es posible alguna forma de convertirlos a formato de excel normal o csv. Gracias por sus recomendaciones Archivos.zip

    • 0

      Reacciones de usuarios

    • 4 respuestas
    • 11.8k visitas
  4. Team, Espero me puedan apoyar con los siguiente, en una sola columna de excel tengo 7647 registros desde "A1:A7647", lo que necesito es a través de una macro pasar estas cantidades a un archivo TXT sin espacios, solo separados por ",". Quise hacerlo seleccionando de la fila la misma cantidad de columnas que hay para copiar y trasponer, pero al momento de copiarlos a un TXT, me deja mucho espacios entra cada dato. Ejemplo: Excel A1 17564, A2 34899, Copiar y Trasponer 17564, 34899, Seleccionar y pegar en TXT 17564, 34899, Y lo que necesito es que esten así: 17564,34899, Anexo envío los archivos como ejemplo. De antemano gracias y quedo al pe…

    • 0

      Reacciones de usuarios

    • 3 respuestas
    • 2k visitas
  5. Hola que tal buen día a todos, antes que nada es un honor estar en este foro que es de tanta ayuda para mi y mucha gente, en esta ocación le quiero pedir si me pueden apoyar con una macro que necesito para poder filtrar 2 columnas que están en mi hoja 1, se debe de comparar la columna B y debe de empezar a comparar los datos a partir de la celda B3 y a su vez también con la columna N3, cabe mencionar que el final de cada columna es variable y en ocaciones tiene mas filas con informacion, el resultado de esta comparación se tiene que mostrar en la columna "S" y empezar a poner los datos a partir de la celda "N3", si existen resultados comparados que no se encuentran se d…

    • 0

      Reacciones de usuarios

    • 1 respuesta
    • 1.6k visitas
  6. Started by Wrongdoer,

    buenas tardes, mediante un MonthView envio la fecha a un label y lo que quisiera es que el formato de la fecha en el label apareciera con nombre del dia, del mes y del año, lo hice de la siguiente forma pero no me funciona Private Sub MonthView1_DateClick(ByVal DateClicked As Date) Label5 = MonthView1.Value End Sub Private Sub Label5_Change() Label5 = Format(Label5, "[$-F800]dddd, mmmm dd, yyyy") End Sub gracias por la ayuda

    • 0

      Reacciones de usuarios

    • 1 respuesta
    • 5.4k visitas
  7. Started by cottavi,

    Buenos dias / tardes / noches al foro. Muchas veces uno no recuerda el nombre completo de un archivo, pero si parte de el. Por ejemplo: Nombre del archivo: ManualDeExcelParaPrincipiantes Fracccion que recuerdo: principiantes Lo que necesito es una rutina que me busque un archivo dentro de una carpeta (incluyendo sub carpetas si las hay) por medio de una palabra clave, me despliegue un listado con los nombres de los archivos que contienen la palabra clave y que abra el archivo al hacer click sobre el. El archivo anexo es una adaptacion de una excelente macro del foro que mejore un poco. En ella se puede seleccionar la carpeta donde se desea la busqueda. En el text…

    • 0

      Reacciones de usuarios

    • 3 respuestas
    • 1.9k visitas
  8. Hola amigo,quisiera su ayuda, lo que quiero es comparar 2 listas, lista1 y lista2 y si el valor de la lista2 es igual al valor de la lista1 entonces que me copie el dato de la celda de al costado ejm si lo encontre en b5 entonces que me copie el valor de c5 y lo copie en la hoja2 del mismo libro.El formato y una mejor explicacion lo adjunto en un archivo. Desde ya gracias por su cooperacion. Comp.rar

    • 0

      Reacciones de usuarios

    • 4 respuestas
    • 1.8k visitas
  9. Started by joloco,

    Acoplentar formato y macro hola amigos aca de nuevo con mi formato, miren toda la ayuda que me dieron aca en su momento me a funcionado perfecto pero ayer me surgio un problemita al ir a entregar un equipo de renta no encontraba a la direccion que anote en el formato y daba vueltas y vueltas porque no tenia como comunicarme con mi cliente, ustedes se preguntaran porque, porque en el formato no tenia un espacio donde colocar el telef. (un lapzo brutus), bueno ahora ya lo coloque, si pero requiero que cuando yo de click en el boton de nuevo cliente me aparesca el inputbox con nombre, dirreccion y telefono, y me los guarde en Datos_Clientes en las columnas de nombre, direc…

    • 0

      Reacciones de usuarios

    • 4 respuestas
    • 720 visitas
  10. Started by edwingaleano,

    Buenas tardes Resulta que ya aprendi a manejar combos, labels y textbox; sin embargo no se manejar listbox, asi que recurro a ustedes a ver si alguien me puede ayudar. En el adjunto hay un archivo que carga existencias, posiciones nombres etc. El problema es que en el userform3 necesito que en un listbox se carguen las posiciones (hoja2 columna f) y cantidades (hoja2 columna i) del codigo buscado por el combo. Y luego que en un label me diga cuanto hay en total. Les agradezco la atencion. Edwin Alexander Galeano I CONTROL 1.3.rar

    • 0

      Reacciones de usuarios

    • 0 respuestas
    • 2.2k visitas
  11. Started by fernandotipo,

    Hola se puede poner este codigo en una sola instruccion gracias Private Sub cant2_Exit(ByVal Cancel As MSForms.ReturnBoolean) Call calcula_importe End Sub Private Sub precio2_Exit(ByVal Cancel As MSForms.ReturnBoolean) Call calcula_importe End Sub Private Sub cant3_Exit(ByVal Cancel As MSForms.ReturnBoolean) Call calcula_importe End Sub Private Sub precio3_Exit(ByVal Cancel As MSForms.ReturnBoolean) Call calcula_importe End Sub Private Sub cant4_Exit(ByVal Cancel As MSForms.ReturnBoolean) Call calcula_importe End Sub Private Sub precio4_Exit(ByVal Cancel As MSForms.ReturnBoolean) Call calcula_importe End Sub Private Sub cant5_Exit(ByVal Ca…

    • 0

      Reacciones de usuarios

    • 0 respuestas
    • 700 visitas
  12. Invitado
    Started by Invitado,

    Srs. agradecería mucho me puedan ayudar con mi problemita, tengo esta macro que necesito dividirla en do sin perder la continuidad de ella, esta macro me crea 21 paginas similares, pero al ejecutarla me indica el mensaje " Procedimiento demasiado largo", espero me puedan ayuda. Se que es muy extensa pero lamentablemente es la forma que tengo, para generar las 21 hojas, adjunto macro. Espero haberme explicado bien Desde ya les estoy agradecido por su ayuda desinteresada. procedimiento demasiado largo.xls

    • 0

      Reacciones de usuarios

    • 1 respuesta
    • 922 visitas
  13. Hola. He creado un libro de excel con 11 hojas, la primera de ellas es una portada en la que he creado 10 botones para acceder al resto de hojas. El caso es que he creado un macro en cada botón para que al pulsar me redireccione a la hoja del libro correspondiente, pero siempre me deja en la celda A1 y lo que yo quiero es que me deje en la primera celda libre, es decir, que si he escrito en A1, A2, A3...A10, cuando habra el libro me ponga en A11 para escribir directamente y no tener que desplazarme hasta allí. El macro sería algo así como: Cuando pulse el botón número 1, llevame a la hoja 1 del libro y ponme en la primera casilla en blanco de la columna 1 ¿Alguien pued…

    • 0

      Reacciones de usuarios

    • 7 respuestas
    • 1.4k visitas
  14. La macro es la siguiente: Sub Envio() ' ' Envio Macro ' Envio de hoja con datos variables ' archivo = "C:\Consorcios\Aviso.xls" Workbooks.Open archivo For i = 5 To 7 Workbooks("HojaInformativacopia.xls").Activate periodo = Cells(1, "L") nombre = Cells(i, "E") importe = Cells(i, "J") deuda = Cells(i, "Q") Total = Cells(i, "O") direccion = Cells(i, "S") Workbooks("Aviso.xls").Activate Range("D9").Value = nombre Range("I9").Value = importe Range("I10").Value = deuda Range("I11").Value = Total Workbooks("HojaInformativacopia.xls").Activate Workbooks("Aviso.xls").SendMail direccion Next Workbooks("…

    • 0

      Reacciones de usuarios

    • 2 respuestas
    • 1.3k visitas
  15. Started by thierry1983,

    Hola!! Necesito armar un cuadro de lista dependientes, digamos que dos cuadro de lista. En uno quiero que salga las marcar de autos (Ford, Fiat, BMW, Etc) y dependiente de la selección de la marca en el otro aparezcan los modelos de las diferentes marcas. Gracias

    • 0

      Reacciones de usuarios

    • 4 respuestas
    • 832 visitas
  16. Buenas Tardes. Tengo este codigo: Private Sub ListBox1_Change() With Sheets("Hoja1") Set codi = .Columns("A").Find(What:=Me.ListBox1, LookIn:=xlValues) If codi Is Nothing Then MsgBox "Codigo no existe!": Me.ListBox1.SetFocus: Exit Sub For i = 2 To 12 Me.Controls("Textbox" & i) = .Cells(codi.Row, i) Next End With Set codi = Nothing Dim nsp As String Dim hoja As Worksheet nsp = ListBox1.Value For Each hoja In Worksheets ' Busca si existe una hoja con el nombre del codigo de cliente If nsp = hoja.Name Then Dim rw As String rw = ListBox1.Value & "!A:A" ComboBox1.RowSou…

    • 0

      Reacciones de usuarios

    • 2 respuestas
    • 2k visitas
  17. Started by dilu121,

    NECESITO AYUDA CON RESPECTO A HIPERVINCULOS EJEMPLO TENGO UNA LISTA EN UN EXCEL : 1 A 2 B 3 C 4 D 5 INFINITO Y UNA RUTA DE ARCHIVOS \\192.168.1.201\HOLA\LETRAS\ DONDE ESTAN LOS EXCEL A , B ,C , D , INFINITO CON EL MISMO NOMBRE DE LAS CELDAS , son archivos distintos. QUISIERA QUE MI LISTA(MIS CELDAS 1 A, 2 B, ....) RUTEEN A ESOS ARCHIVOS QUE TENGAN SU NOMBRE , YA QUE AL HACER CLICK EN 1 A ME HABRA EL EXCEL DE LA CARPETA \\192.168.1.201\HOLA\LETRAS\A1.XLS Y ASI LOS DEMAS = CON SU RESPECTIVO NOMBRE. GRACIAS ES ALGO DE VIDA O MUERTE GRACIAS

    • 0

      Reacciones de usuarios

    • 0 respuestas
    • 778 visitas
  18. Started by Antonio,

    Hola amigos. Estoy en la búsqueda de ayuda para modificar una Macro que pretende separar nombres propios compuestos. La macro que utilizo no lo está haciendo correctamente (lo hace parcialmente) y no he podido dar con el código correcto, así que recurro a los que saben solicitando su ayuda. En el fichero que subo van las explicaciones de lo que debe hacer la macro. De antemano, muchas gracias a quien o quienes puedan ayudarme. SEPARA NOMBRES.xls

    • 0

      Reacciones de usuarios

    • 3 respuestas
    • 2.1k visitas
  19. Started by raymond315,

    tengo una tabla donde quiero que el color cambie de verde a rojo utilizando la fecha de la computadora. ejemplo: visita peter = 21 feb 2011(verde) vence al año 21 feb 2012(rojo)

    • 0

      Reacciones de usuarios

    • 0 respuestas
    • 790 visitas
  20. Started by angelusx82,

    Buenos días y gracias de ante mano, He creado un fichero, como podéis ver (fichero adjunto) es bastante sencillo. Pero me gustaría que en la cuarta columna de (alerta), me saltara una alerta y cambiara el color de verde a rojo. Para así poder identificar aquellas personas que han pasado el plazo (24/48/72 horas) desde que se creo. Estoy bastante perdido al respecto y os agradezco vuestra ayuda. Saludos. Hoja RM.xls

    • 0

      Reacciones de usuarios

    • 1 respuesta
    • 905 visitas
  21. Hola a todos! Mi pregunta es si se puede enviar un nombre de usuario y contraseña a cualquier sitio web desde excel o solamente a ciertos sitios web. He estado buscando macros que hagan esta función y he encontrado unas pocas, el problema es que sólo una de ellas funciona en mi navegador y no lo hace para todos los sitios web. También he encontrado un link en el sitio web "eHow" donde ofrecen unas instrucciones para poder programarlo personalmente (Cómo enviar un nombre de usuario y contraseña a un sitio web con el Código VBA de Excel | eHow en Español) Yo lo he intentado pero no lo consigo. ¿Alguien podría ayudarme? He intentado programarlo para poder ingresar en el fo…

    • 0

      Reacciones de usuarios

    • 1 respuesta
    • 1.7k visitas
  22. Started by vicbey,

    Hola, buenas noches Estoy realizando una aplicación FLASHCARD MULTILINGUE, apenas tengo el inicio.....APARECEN LOS TERMINOS DE CADA LENGUA EN CUANTO ESTOY EN ALGUNA DE LAS FILAS pero desconozco los códigos en VB para poder hacer todo la idea del proyecto... Se trata de varias columnas; 4 lenguas, índice, nivel de dificultad (clasificación de tarjetas...sabidas o no sabidas), y columnas de Audio y Foto.... En concreto la problemática la encuentro respecto a los filtros, el poder reproducir audio y el asunto de la dificultad de cada tarjeta..(cómo marcarla..y modificarlo). Incluyo el excel, la carpeta con los archivos de imagen y audio, junto a un pdf con las instruccio…

    • 0

      Reacciones de usuarios

    • 0 respuestas
    • 750 visitas
  23. Started by fulljaz,

    tengo un programa donde necesito colocar en el combo (el combo busca por nombre de articulo es es el rango), pero cuando se le coloca para que hayan 2 columnas el combo entonces no muestra el nombre del articulo sino el codigo En excel las columnas estan asi definidas para otros formularios mas, no se deberia cambiar este orden: SERIAL ARTICULO CANT PRECIO UNITARIO en formulario: SERIAL ARTICULO CANTDISPONIBLE PRECIO UNITARIO textbox1_serial combos1_artic textbox1_cantidad textbox1_precio 10 campos iguales AL LLENAR EL COMBO EST…

    • 0

      Reacciones de usuarios

    • 1 respuesta
    • 5.1k visitas
  24. Started by Blazar,

    Buenas tares, antes que nada Tengo una situación con un macro y quisiera un par de opiniones y de su ayuda para resolverla La macro que intento hacer deber realizar un filtrado de una serie de datos de una hoja y copiarlos a otra el filtrado se basa en una columna con un dato especifico esa columna es fija siempre va ser la misma, una vez que hago la búsqueda del dato, cuando lo encuentra realizo el copiado de toda esa fila a otra hoja de excel, el problema es que también necesito copiar unas celdas hacia abajo pero no siempre es el mismo numero de celdas estas pueden variar a veces es 1 sola o pueden llegar a ser hasta 4 adjunto el archivo (no el real uno muy par…

    • 0

      Reacciones de usuarios

    • 0 respuestas
    • 1k visitas
  25. Started by johnc,

    estoy tratando de hacer una macro que haga una tabla dinamica con rangos Dinamicos esta es la formula, Pero al Ejecutar la macro Me aparece un error que dice arugmento o llamada a procedimiento no valida, que estoy haciendo mal? de su ayuda Por Favor........ Dejo el archivo adjunto, y por favor indicarme cual es mi error. Gracias. Libro1.rar

    • 0

      Reacciones de usuarios

    • 7 respuestas
    • 1.5k visitas

Información básica de protección de datos

  • Responsable: Sergio Andrés Celemín
  • Finalidad: Moderar y responder comentarios de usuarios. Recuerda que la información que facilites es pública, y los datos que incluyas los leerá cualquier visitante de esta web, así como el avatar que poseas.
  • Legitimación: Consentimiento del interesado.
  • Destinatarios : Hetzner Online GmbH.
  • Duración: Mientras se conserve este post o hilo en la comunidad, o decidas eliminar el comentario.
  • Derechos: Puedes ejercitar en cualquier momento tus derechos de acceso, rectificación, supresión, oposición y demás derechos legalmente establecidos a través del email [email protected]

Información adicional: Encontrarás más información en la política de privacidad.