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 sretamalb,

    Buenas tardes, Tengo un libro1 en excel donde ejecuto una macro y este abre un libro2, el cual comienza a ejecutar otra macro. Hasta acá todo bien. El problema ocurre cuando quiero cerrar el libro 2. Cuando estoy en el libro 2 y cierro el libro 1 con la función Workbooks("libro1.xlsm").Close SaveChanges:=True, se cierra bien, el problema es que al continuar en el libro 2 este no se cierra queda abierto y necesito que también se cierre. Acá les dejo el código que estoy usando. Si reviso el código línea por línea con F8 se cierra todo y funciona perfect, entonces nosé porque cuando se ejecuta todo de una vez queda abierto al final el libro2 y no se cierra. Al…

    • 0

      Reacciones de usuarios

    • 6 respuestas
    • 1.1k visitas
    • 1 seguidor
  2. Hola amigos, ando buscando una macro para cerrar un libro abierto pero oculto (Solo se ve el userform) después de un tiempo inactivo, encontré varios en la red pero solo funcionan cuando el libro esta visible. Anexo uno de ellos. cerrar automaticamente.xlsm

    • 0

      Reacciones de usuarios

    • 21 respuestas
    • 3.4k visitas
    • 1 seguidor
  3. Buenos días a los integrantes de este foro, en esta ocasión recurro a Uds, para que brinde su apoyo en como solucionar el ERROR en la siguiente instrucción que detallo, los archivos estuvieron trabajando sin ningún problema, pero haces 2 días comenzó con a fallar Error ejecución. Set objWord = CreateObject("Word.Application") Siendo la macro original: Sub tablaaword() patharch = ThisWorkbook.Path & "\CARTA FAPOSA.docx" Set objWord = CreateObject("Word.Application") objWord.Visible = True objWord.documents.Add Template:=patharch, NewTemplate:=False, DocumentType:=0 Worksheets("TELECREDITO").Range("A1:D7").Select Selection.Copy textobuscar = "[tabla_ex…

    • 0

      Reacciones de usuarios

    • 5 respuestas
    • 2.2k visitas
  4. Started by JMark,

    Buenas tardes/noches estimados especialistas, Estaba tratando de adecuar la macro a mi necesidad sin embargo me tope con algunos problemas que me gustaría me puedan ayudar a resolver, son 02 observaciones: 1. la macro no envía los archivos adjuntos pese a tener la ruta, la necesito porque envía diferentes reportes personalizados por usuario. 2. se creó la macro filtro_avanzado para agregar fechas al correo pero no funciona. Muchas gracias por su tiempo y quedo atento a su respuesta en caso no haber sido claro por favor me comentan. Saludos, Mandar mail con adjunto.xlsm

    • 0

      Reacciones de usuarios

    • 2 respuestas
    • 1k visitas
  5. Started by car6108,

    Tengo una macro que me devuelve una cadena de numeros 18 los cuales pueden iniciar con un 0 o con varios a la izquierda pero me aparece asi 5.4705E+15 1.218E+16 2529 1.218E+16 2529 1.218E+16 1.4181E+16 2.18001E+15 e incluso los dos ultimos de la derecha los vuelve ceros espero haberme dado a comprender creo me falta establecer una variable les agradezco su ayuda

    • 0

      Reacciones de usuarios

    • 2 respuestas
    • 2.8k visitas
    • 1 seguidor
  6. Started by Nady,

    Hola amigos Tengo un archivo de verificación (check-list) en Excel, con casillas de marcación y necesito saber si se puede bloquear automáticamente la casilla cuando se marca y solo desbloquearla por medio de una contraseña

    • 0

      Reacciones de usuarios

    • 7 respuestas
    • 2.6k visitas
    • 1 seguidor
  7. Started by Arturo Castillo Chavez,

    Tengo un un formulario que tienes varios texbox el problema es que no se como haceros funcionar es en un formulario para dar de alta las factura en una hoja donde se concentran las altas y los pagos de facturas. Por favor en este formulario que se llama txt_Fecha_Facturacion + 30 = txt_Fecha_Facturacion (16-abr-19 +30 = 16-may-19) en excel si lo hace. en el txt_Total = txt_Importe_Factura + txt_Importe_IVA (Ejempo $ 3,000.00 + 480.00 = $ 3,480.00 Se podra hacer que lo haga a al momento y se vacien al listbox (ya tambien hice le código) El código del botón de buscar ya lo hice El boton de Agregar ya lo hice El botón de Actualizar (Que se guar…

    • 0

      Reacciones de usuarios

    • 7 respuestas
    • 2.3k visitas
    • 1 seguidor
  8. Started by sailorcarola,

    Buenos dias, alguno tiene una macro que lo que seleccione me lo guarde como csv. Vi una en otra pagina, pero me guarda las fechas en formato mes/dia/año, pero asi no me sirve

    • 0

      Reacciones de usuarios

    • 1 respuesta
    • 683 visitas
  9. Started by lug barry,

    hola no logro cuadrar los datos en un formulario vb, estos datos se intruducen en una hoja de excel, el cual ya esta resuelto,, pero no puedo cuadrar los offset para q queden bien parejos debajos de los rotulos en el formulario,, y tampoco me listan, cuando llamo un dato,, que tengo q mover para q me queden parejo adjunto foto este es el codigo If ActiveCell.Value = 0 Then ActiveCell.Offset(0, -50).Select LISTACLI.ColumnCount = 4 LISTACLI.AddItem LISTACLI.List(LISTACLI.ListCount - 1, 0) = ActiveCell.Value ActiveCell.Offset(0, 1).Select LISTACLI.List(LISTACLI.ListCount - 1, 1) = ActiveCell.Value ActiveCell.Offset(0, 1).Select LISTAC…

    • 0

      Reacciones de usuarios

    • 21 respuestas
    • 2.4k visitas
  10. Hola tengo un libro que al abrirlo salta un userform y al mismo momento el libro se oculta, pero al cerrar el userform el libro aparentemente se cierra, pero lo mas raro es que queda oculto pero abierto me doy cuenta cuando abro el administrador de tarea. Alguien podrá ayudarme Este es la instrucción para cerrar Private Sub CommandButton8_Click() Dim sino As String sino = MsgBox("Estás seguro de cerrar la Aplicacion?", vbYesNo + vbQuestion, "CONFIRMA") If sino <> vbYes Then Exit Sub MsgBox "Gracias por usar el sistema, hasta la proxima" Application.ScreenUpdating = False Set h = Sheets("Usuarios") u = h.Range("A" & Rows.Count).End(xlUp).…

    • 0

      Reacciones de usuarios

    • 6 respuestas
    • 2.3k visitas
  11. Started by jose lopez contreras,

    Hola amigos encontré la siguiente instrucción para cargar un ComboBox, funciona bien con una base de datos pequeñas, pero al tener una base de datos grande (mas de 3000 datos) tarda mas de 50 segundos en cargar. Pregunto abra otra forma de realizarlo en menor tiempo, alguien podrá darme un ejemplo. Sub cargarcombo1() For n = 2 To Hoja12.Range("E" & Rows.Count).End(xlUp).Row ComboBox1 = Hoja12.Range("E" & n) If ComboBox1.ListIndex = -1 Then ComboBox1.AddItem ComboBox1 Next ComboBox1 = "" End Sub

    • 0

      Reacciones de usuarios

    • 14 respuestas
    • 2.4k visitas
  12. Started by Comi,

    Saludos. Os dejo un archivo adjunto. Son dos hojas, una llamada CSV que es como a mi me llega la información de un pedido y la otra hoja que es donde me gustaría tener todos los pedidos juntos para poder controlarlos a la vez. No busco que me lo "arregléis sin más" solo que no se me ocurre como plantearlo. Obviamente lo único que se de programación es copiar y pegar algunos códigos que encuentro en mis hojas de excel. Gracias chicos. Ejemplo.xlsx

    • 0

      Reacciones de usuarios

    • 6 respuestas
    • 1.5k visitas
    • 1 seguidor
  13. Estimados amigos del foro saludos cordiales luego de buscar algo parecido a lo que requiero encontre un ejemplo, al cual he tratado de adaptar y ya casi funciona. En el archivo de ejemplo que subo no estan todas las hoja para abreviarlo,... pero alli se encuentra una hoja de BD del mes de octubre en la que se acumularan los registros solo de ese mes para cualquier año... luego de una busqueda con los combobox del formulario para reporte se muestra el resultado en el listbox, el mismo que debera mostrarse tambien en la hoja Info_Temas, ..alli es donde surge el problema pues se borra el encabezado del cuadro y ademas la informacion no se ubica en la linea luego del enc…

    • 0

      Reacciones de usuarios

    • 23 respuestas
    • 2.1k visitas
  14. Started by howling,

    hola necesito ayuda con una macro que estoy adaptando a mis necesidades, pero no logro hacerlo ya que soy nuevo en esto, lo que necesito es: 1- que el listbox carge los datos de una hoja especifica que tengo en un combobox en listada por ejemplo si en el combobox dejo la hoja 1 que cargue los datos de la hoja 1 y si es la hoja 8 los de la hoja 8 y así sucesivamente 2- que cuando se filtre desde el listbox queden los títulos de las cabecera de antemano gracias por la ayuda y espero también poder ayudar en lo posible a quien lo necesite PRUEBA.xlsm

    • 0

      Reacciones de usuarios

    • 6 respuestas
    • 1.7k visitas
  15. Started by TREBUR,

    Buenas noches, En un archivo excel tengo una columna de fechas con la función HOY(), sin embargo cuando vinculo a través de un formulario con VBA esa información a una plantilla en word me arroja la fecha con este formato 30/05/2014, y la necesito así: 30 de mayo de 2014. ¿Hay alguna opción con macro que se actualice automáticamente sin necesidad de ejecutarlo que se le pueda añadir a dicha función para lograrlo? La idea es que el excel me de la hora actual siempre que lo abra y obviamente luego pasarla al archivo word con el formato solicitado...

    • 0

      Reacciones de usuarios

    • 3 respuestas
    • 828 visitas
  16. Hola mi nombre es Maurizio y mi nuevo problema y este: En una hoja de Excel en la columna (A) necesito escribir las fechas en su totalidad. Por ejemplo, (01/04/2019) Ahora, me gustaría saber si existe la posibilidad de informar en la columna (B) su día de la semana sin que tenga que arrastrarlo a mano durante toda la columna. Tengo que volver a escribirlo manualmente utilizando el VBA. En la práctica, me gustaría que sucediera un poco como esta macro que creé para que usted lo ayude a comprender mejor todo. Gracias Saludos de A.Maurizio. ###################################### Hello my name is Maurizio and my new problem and this: On an Excel sheet in c…

    • 0

      Reacciones de usuarios

    • 7 respuestas
    • 1.1k visitas
    • 2 seguidores
  17. Started by Juanillosuarez,

    Buenas tardes Maestros, estoy intentando crear una macro, que además de borrar las lineas en blanco, según la condición de si celda vacia, además si dentro de un rango especifico, la colunna , en este caso la D, no contiene datos, me borre ese rango especifico. Lo he estado intentando, y no lo consigo. Todo esto, es para una hoja de datos, para realizar pedidos a proveedores. Les adjunto archivo de ejemplo, por si pudieran ayudarme. Ejemplo.xlsm

    • 0

      Reacciones de usuarios

    • 0 respuestas
    • 1.5k visitas
  18. Hola Compañeros. He realizado búsquedas pero no doy con la propiedad que me permita lo siguiente. Tengo un Userform con 2 ComboBox (uno pide un número y el otro el usuario asociado a ese número) y un Button (Aceptar). Me gustaría que al seleccionar el número del ComboBox 1 se mostrara automáticamente el usuario en el ComboBox 2. Lo he intentado con Additem, pero lo que consigo es que se agregue nuevamente el usuario a la lista, lo que querría es que lo muestre en el ComboBox. ¿Con qué propiedad podría hacer esto? Agradezco su ayuda de antemano, gracias.

    • 0

      Reacciones de usuarios

    • 2 respuestas
    • 1.2k visitas
  19. Hola muy buen dia o noche tengan, quiero pedirles un favor muy grande, si alguien tendrá por ahi entre sus archivos, uno donde tengan un combobox relacionado con otros comboboxes, ya que lo que requiero hacer es que en el comboboxPaises tenga la lista agregada de todos los paises del mundo, en el comboboxEstados tenga todas las listas de todos los estados de los paises del mundo, y en el comboboxMunicipios; disculpen mi mala cultura respecto a los demas paises pero mi idea es poder hacer que al poner el PAIS en el primero combobox llene el combobox con los estados de ese pais y al poner el ESTADO en el segundo combobox llene la lista de MUNICIPIOS de ese estado, descono…

    • 0

      Reacciones de usuarios

    • 7 respuestas
    • 11.3k visitas
  20. Buenos días a los integrantes de este foro, en esta ocasión recurro a Uds, para que brinde su apoyo en como mejorar la siguiente macro que describo a continuación, dicha macro permite exportar dicha información a una plantilla en diseñada Word, pero mi problema esta en dicha tabla no solamente puede contener 6 filas sino muchas en la sentencia: Worksheets("TELECREDITO").Range("A1:D7").Select y lo que se requiere es dicha tabla que está en Excel exporte la cantidad de filas que contenga a la plantilla del archivo Word en forma automática y que el siguiente párrafo del archivo Word no sea alterado para lo cual adjunto imagen, también quisiera saber como puedo q…

    • 0

      Reacciones de usuarios

    • 1 respuesta
    • 2k visitas
  21. Buenas tardes a los integrantes de este foro, recurro a uds para que me brinde su apoyo en como hacer que en la Barra de estado de Excel, muestre el tiempo de ejecucion que se describe en la macro que se adjunta, ya que he visto ejemplo donde mencionada por "Porcentaje", desde ya agradezco su apoyo y colaboración. Sub Reloj() Application.ScreenUpdating = False ActiveWorkbook.Save Application.OnTime Now + TimeValue("00:00:30"), "reloj" Application.ScreenUpdating = True End Sub Saludos.

    • 0

      Reacciones de usuarios

    • 0 respuestas
    • 782 visitas
  22. Started by TREBUR,

    Buenas noches, Dispongo de una macro que rellena automáticamente los campos de un oficio en formato word; necesito que al generar el archivo word también arroje la ventana de Guardar como... para así guardar con otro nombre y de esa forma no sustituya el original y luego se cierre. Dejo captura específica de esa parte del código tal cual como está...

    • 0

      Reacciones de usuarios

    • 2 respuestas
    • 2.3k visitas
  23. Started by lphant,

    Buenos días; Tengo un Excel desde el cual busco información en otros Excel que nunca suelen tener el mismo nombre en la hoja. Para que la cosa sea rápida, no quisiera abrir el Excel, por eso lo de buscar la información con la fórmula de la macro. Mi problema viene en el nombre de la hoja, existe alguna forma de poder poner en la formula el nombre interno de la hoja??. Muchas gracias. Un saludo, Ejemplo.xlsm

    • 0

      Reacciones de usuarios

    • 3 respuestas
    • 1.1k visitas
    • 1 seguidor
  24. Invitado Juan Pelfort
    Started by Invitado Juan Pelfort ,

    Hola, una pregunta muy sencilla: tengo unas macros funcionando con botón para ejecutarlas, la pregunta: se puede bloquear dicho botón (que no ejecute la macro) dependiendo del valor de una celda ? o, se puede cambiar el color dependiendo del valor de una celda ? Les agradezco de antemano la ayuda.

    • 0

      Reacciones de usuarios

    • 1 respuesta
    • 921 visitas
    • 1 seguidor
  25. Started by Diego Castro,

    Hola a todos! He aquí mi duda. Estoy haciendo un registro de datos a través de un userform. En este userform grabo datos que quiero registrar en una hoja Excel. No obstante, de este userform tengo puestos dos botones que me llevan a otros dos userforms debido a la naturaleza de los datos a grabar. No se si es posible una vez que tengo rellenados los tres userform vinculados que luego sé menos graben los registros al mismo tiempo en una misma línea. Así como poder modificarlos del formulario original cuando tenga que hacer alguna corrección. Muchas gracias

    • 0

      Reacciones de usuarios

    • 2 respuestas
    • 2.2k 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.