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

    Estimados, vengo nuevamente con una consulta, y espero tenga buena acogida. Tengo una rutina en la que habro archivos y rescato datos, le doy formato y otras cosas. El origen de estos datos es de archivos planos pero con extención particular ".mad", que en el fondo puede ser cualquiera pero distinta de ".txt" La cosa es que algunos archivos por sus datos pierden coherencia. Solución posible hacer conección de datos desde archivos de texto. Hago la conección y grabo una macro, pero no puedo modificarla para los parametros que van cambiando, como la ruta de origen del dato. Adjunto Query para aclarar el tema y adjunto archivo plano que intento copiar. Este archivo se sep…

    • 0

      Reacciones de usuarios

    • 3 respuestas
    • 1.3k visitas
  2. Started by dff1403,

    Buenas Noches, trabajo en un empresa x en la cual hargo las facturas las cuales se asocian con un documento de salida que se llama guia de remision, normalmente los datos de la factura son los mismo que la guia, mas que no van los precios, para esto tengo este archivo, el cual es mi plantilla, lo que deseo es que de la hoja fact. se copien los item asi como las cantidades y toda la descripcion par no estar copiando de una en una a la hoja ejemplo. Muchas Gracias. ejemplo.xls

    • 0

      Reacciones de usuarios

    • 0 respuestas
    • 1.3k visitas
  3. Hola amigos/as. Quiero pedirle nuevamente ayuda para solucionar mi problema. Tengo un TextBox en una HOJA Excel el cual el evento es Private Sub TextVenta_Change(). Puede que el evento no tenga que ser este pero probe con GotFocus que es el que mejor dá pero hace una repeticion cuando cambio de hoja No he podido lograr insertar formula y formato a partir de la 1ª libre. Adjunto libro de prueba en 3 partes una ves que no me acepta el tamaño en uno solo. Son de 60 KB cada De verdad necesito su ayuda. Agradezco una mirada al codigo que tengo su correccion Gracias Editado: Quisiera cerrar o eliminar este tema, preferiblemente eliminarlo porque el tema esta mal expues…

    • 0

      Reacciones de usuarios

    • 0 respuestas
    • 1.3k visitas
  4. Hola amigos. Estoy trabajando esta macro para copir unos datos de excel a texto, mi duda es: ¿habrá forma de que al hacer esta tarea la macro me solicite seleccionar manualmente el rango deseado? En la macro tengo señalado por defecto toda la columa "D", pero en ocasiones lo requiero de "D1:D10" de "D9:20", son rangos variables. ¿se puede seleccionar manualmente el rago deseado? sub PasarATXT() Application.DisplayAlerts = False inihoj = ActiveSheet.Name nomfic = InputBox("Nombre del Archivo de texto") nomfic = nomfic & ".txt" Sheets.Add neohoj = ActiveSheet.Name Sheets(inihoj).Select Columns("D:D").Copy Sheets(neohoj).S…

    • 0

      Reacciones de usuarios

    • 0 respuestas
    • 1.3k visitas
  5. Buenas tardes a todos.. MI duda ahora es. como poder agregar columnas con un macro, después de un texto en una celda adjunto la hoja donde esta lo que se quiere hacer y lo el original es agregar 2 columnas en blanco o mas dependiendo después de la celda con contenido "Total" agradezco desde ya el tiempo dedicado.. Ayuda.xls

    • 0

      Reacciones de usuarios

    • 4 respuestas
    • 1.3k visitas
  6. Started by tazzmania128,

    Hola a ver si me pueden ayudar en lo siguiente. Estoy con un excel en donde la columna A me muestra los ficheros que hay en un directorio A B C 1 Equipo Numero Serie 2 1.txt 3 2.txt Lo que me gustaría hacer es que en las celdas , por ejemplo, B2 se ejecute un comando de msdos que sería para la celda B2 --------> find B1 A2 para la celda C2 --------> find C1 A2 y me muestre en las celdas B2, C2, B3 y C3 las salidas de los comandos find... espero haberme explicado, subo un archivo por si se entiende mejor muchas gracias por vuestra ayuda test.xls

    • 0

      Reacciones de usuarios

    • 0 respuestas
    • 1.3k visitas
  7. Hola Amigos, buenas tardes, es posible utilizar la misma sentencia (variables y cadenas guardadas en variables) en varias consultas que debo hacer , ya que imagino debo usar la misma sentencia en cada procedimiento que realice y ya intenté con declarar variables como Public pero no me deja. Estos código los fuí tomando del blog de @avalencia a quien agradezco por compartir https://abrahamexcel.blogspot.com/2019/04/excel-y-mysql-2.html es posible realizar lo que deseo? usar la misma conexión e ir variando en cada procedimiento prácticamente la consulta SQL así como los datos de la tabla donde voy a consultar. adjunto imagen! Gracias!!

    • 0

      Reacciones de usuarios

    • 4 respuestas
    • 1.3k visitas
  8. Started by petercien1,

    Hola a Todos Un gusto saludarles Tengo una consulta, (no tengo adjunto), solo quiero saber si se puede y por donde debieran los caminos. Tengo un formulario para ingreso de datos y a veces necesito realizar una suma simple de hasta 5 valores, sin decimales. Entonces me pregunto si esta operación que hago en una calculadora, la puedo hacer en un solo texbox. Saludos a todos Pedro

    • 0

      Reacciones de usuarios

    • 8 respuestas
    • 1.3k visitas
    • 1 seguidor
  9. amigos tengo una macro que al parecer unicamente me esta abriendo un libro, veran intento abrir varios libros que estan almacenados en la columna "I", desde i2 hasta i26.. pero no funciona, me pueden ayudar. Gracias. Anexo codigo: Sub ejemplo() For i = 2 To 24 Workbooks.Open "C:\Users\Gerardo\Documents\EXCEL ARCHIVOS\" & Worksheets("hoja1").Range("L" & i) Next i end sub[/HTML]

    • 0

      Reacciones de usuarios

    • 3 respuestas
    • 1.3k visitas
  10. Started by riverts,

    Hola a todos; quiero saber si me pueden ayudar con un formulado me perdi un poco con esto: DIA: generar un numero aleatoreo tomando en cuenta la distribucion de los dias por mes y años bisiesto Dia:=ALEATORIO.ENTRE(1;31) Mes:=ALEATORIO.ENTRE(1;12) Año:=SI(D11=$B$5;ALEATORIO.ENTRE(2004;2022);SI(D11=$B$6;ALEATORIO.ENTRE(2004;2022);ALEATORIO.ENTRE(1980;2022))) IMAGEN DEL LIBRO Me puede poner en el camino correcto Gracias de Antemano. Saludos..

    • 0

      Reacciones de usuarios

    • 2 respuestas
    • 1.3k visitas
    • 1 seguidor
  11. Started by loza1993,

    estoy realizando un programa de contabilidad y me tope con un problema,necesito que guarde una hoja determinada en una carpeta ya creada luego el mismo programa la reescribe y necesito que guarde la mismo hoja peor con un nombre diferente ya que no contiene los mismos datos gracias.

    • 0

      Reacciones de usuarios

    • 1 respuesta
    • 1.3k visitas
  12. Hola a todos, Tengo un libro excel que tiene dos hojas La 1 llamada asistencia en donde tengo el detalle del control de asistencia de todos los trabajadores y en la 2 llamada Report Diario en donde resumo toda la informacion por categorias de la primera hoja estoy aprendiendo macros y encontre la Macro Match para coincidir una fecha y mediante eso poder traer los datos de esa fecha y me esta arrojando el siguiente error '1004' no se puede obtener la propiedad Match de la clase WorkSheetsFuction. agradeceria enormemente me pudieran ayuda subire el archivo para mayor claridad de mi duda. Atte. Macros 2014

    • 0

      Reacciones de usuarios

    • 13 respuestas
    • 1.3k visitas
  13. Buenas tardes, Tengo una base de datos con un total de 20 columnas de las cuales deseo extraer en una hoja nueva del mismo libro únicamente 8 columnas con datos filtrados de una ellas en especifico. En la hoja nueva donde se pasaran los datos que requiero extraer, quiero adicionar 2 columnas más pero las celdas de cada una de ellas arroje un resultado si cumple ciertos criterios. ¿Cuál es el objetivo de esto?´ 1- Filtrar de la columna con el titulo Etapa solo los datos que estén en: Documentación y Formalizado. 2- Copiar únicamente las columnas con títulos (Cliente, Monto Aprobado U$, Tipo De Operación, Ubicación Gtia Tipo Crédito Etapa F. Lib. Gravamen y F. Solvenci…

    • 0

      Reacciones de usuarios

    • 0 respuestas
    • 1.3k visitas
  14. Started by yack,

    Hola estimados maestros, Buenos lo que quiero hacer es un reporte por N° Pedido junto con los items que contiene cada pedido. Primero: Ejecuto el Formulario (Form_Reportes) en lo cual Hago la Consulta según los criterios de Option Boton y me arroja al ListBox la Informacion de la Hoja "CONSOLIDADO" (lo cual contiene sumas Totales). Segundo: Al Oprimir el Boton "Imprimir" quiero que me genere todo los items del ListBox mas sus detalles (es decir que artículos está incorporado en el N° Pedido), para mas entendimiento a lo que requiero adjunto un Imagen. El problema viene en el Segundo punto, lo cual no encuentro la lógica de como hacer un reporte como l…

    • 0

      Reacciones de usuarios

    • 0 respuestas
    • 1.3k visitas
  15. Hola a todos los participantes en este foro. Para empezar dar las gracias a todos aquellos que me puedan ayudar en el desarrollo de este proyecto. Mi consula es acerca de lo siguiente: tengo un libro con dos hojas, en la hoja dos esta la BD, en la hoja uno tengo una consulta de busqueda a dicha BD, la cual se realiza a través de filtros avanzados y automatizados por un macro asignada a un botón. Lo que deseo es que cuando un usuario digite alguno de los parámetros de busqueda (documento o nombre), al presionar el botón de consulta se me realice una busqueda en la BD, por ejemplo que si digita el documento 6894785, verifique que en la columna cedula de la BD se en…

    • 0

      Reacciones de usuarios

    • 1 respuesta
    • 1.3k visitas
  16. Started by Gera241,

    Buen dia. Quisiera hacer la permutaciones o combinaciones en una tabla. Ejemplo tengo la siguiente tabla . . 1 2 3 1 A B C 2 A B C 3 A B C 4 A B C 5 A B C De esta quiero que me muestre combinaciones posibles como por ejemplo: Esto contando como una combinacion . . 1 2 3 1 A B C 2 A B C 3 A B C 4 A B C 5 A B C o también . . 1 2 3 1 A B C 2 A B C 3 A B C 4 A B C 5 A B C Puedo hacer las combinaciones posibles sin formulas pero es muy tardado…

    • 0

      Reacciones de usuarios

    • 2 respuestas
    • 1.3k visitas
  17. Started by Vicentevi,

    Hola, buenas. Mi pregunta es la siguiente; tengo un formulario con preguntas en las que quiero que me contesten mediante la utilizacion del comando checkbox. En cada pregunta tengo 5 checkbox y quiero que cuando la propiedad value de un checkbox cambie, los otros se desactiven para que no puedan seleccionar mas de una respuesta (checkbox.enabled=true). el problema es que tengo muchas preguntas y imaginaos que tengo que implementar 10 lineas de codigo para cada checkbox, teniendo 5 checkbox por cada pregunta y un monton de preguntas. La pregunta es, se podria implementar algun tipo de codigo a nivel de modulo o clase para no tener que hacer esto en cada checkbox de los c…

    • 0

      Reacciones de usuarios

    • 4 respuestas
    • 1.3k visitas
  18. Started by paranere,

    Hola tengo una tarea algo ambiciosa desde mi punto de vista,ver si existe una macro para esto. Usamos Excel 2010 Quiero manejar un libro comparatido aqui en oficina Hay basicamente 4 usuarios y 2 administradores, Cada Usuario y Administradores deben de tener su contraseña unica pero solo para ciertas condiciones o Privilegios. Aqui la descripcion de Privilegios de cada uno. (de cualquier manera marque las celdas con "X" de aquellas columnas, las cuales no podran modificarse por el usuario o propietario de cierta hoja. Usuario 1 Privilegios: - Ingresar datos en hoja "REGISTRO" - Sin restricciones en hoja "ORDEN" - Copiar datos de "REGISTRO" y "DISEÑO" - Pegar…

    • 0

      Reacciones de usuarios

    • 3 respuestas
    • 1.3k visitas
  19. Started by JavierAdrian,

    Hola: Queria saber si es posible generar una macro que me ajuste los altos de fila según esta necesidad: a. autoajuste b. si el alto que resulta de lo anterior es menor a 50 autoajustar a 30 Bueno eso seria Gracias

    • 0

      Reacciones de usuarios

    • 5 respuestas
    • 1.3k visitas
  20. Started by Aslam1981,

    Buenas Tarde a Tod@s soy Nuevo con VBA y hablo español muy mal quiero Vuestra ayuda para aprender un poco para mis tareas diarias. lo que necesito de momento es lo siguiente: tengo 2 hoja en el libro de excel y "Sheet1" es hoja principal y "sheet2" es solamente para tareas terminadas en la sheet1 tengo todos los datos (Tareas pendientes") y en esta hoha"Sheet1" en la columna "H" pongo datos cuando esta treminada. lo que quiero, es un codigo que me haga lo siguiente. 1- cuando pongo algo en la columna "H" esta fila me corta de la sheet1 y pega en el "SHEET2" en la ultima fila disponible 2- y de la sheet1 se borra dicha fila de momento eso es todo lo que…

    • 0

      Reacciones de usuarios

    • 0 respuestas
    • 1.3k visitas
  21. Started by JoaoM,

    Tengo un ListBox con datos, los datos son numéricos con signo moneda Bs 1.234,56 Quiero al dar clic en una determinada línea del ListBox pasar esos datos al TextBox y que también quede en este ultimo con signo moneda también, tal como está e el listBox algún experto me puede suministrar dicha línea o líneas? Gracias

    • 0

      Reacciones de usuarios

    • 5 respuestas
    • 1.3k visitas
  22. Started by Ik2012,

    buen dia estoy iniciando una empresa de enmarcados, he trabajado intensamente en la elaboracion de la factura y casi la tengo terminada, pero no tengo manera de guardar cada factura de cada cliente que he atendido sino que lo que he hecho es que en el mismo libro he ido guardando varias hojas cambiando el nombre segun lo requiero, otro problemita es que no se como hacer el boton de conteo de dichas facturas para que cada vez que la abra me aparezca el numero que seguiria, muchas gracias

    • 0

      Reacciones de usuarios

    • 3 respuestas
    • 1.3k visitas
  23. Started by pinguinov,

    Buenas. Vereis quiero realizar una macro que, cuando el usuario clickee el botón de guardar como aparezca en el diálogo un nombre de archivo, a modo de sugerencia, distinto al que posee el propio archivo. He intentado lo siguiente: Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean) Application.Dialogs(xlDialogSaveAs).show ("Nombre sugerido.xlsx") End Sub [/CODE] pero lo que obtengo es que, una vez guardado el archivo, me pide volverlo a guardar y me gustaría evitar eso. También había pensado en, por medio de la macro, guardar el archivo en alguna parte (windows/temp por ejemplo) con el nombre que yo sugiero y luego hacer aparecer …

    • 0

      Reacciones de usuarios

    • 0 respuestas
    • 1.3k visitas
  24. Started by luquiluk,

    Hola a todos y a ver si me se explicar, os adjunto un archivo con el cual lo podréis ver si pulsáis el F8 para ejecutar la macro paso a paso. Lo que necesito es que los datos que busca de la columna entidad, y luego los pega en la hoja de "pegar" lo haga de golpe es decir que no tenga que acudir continuamente a la hoja de datos, si no que los acumule y luego los suelte INDIVIDUALMENTE. me han dicho que se podría con redim pero no se como hacerlo, lo necesito porque realmente no acudiría a una hoja excel a soltar los datos si no a un programa externo que por cada tipo y ofi me dará unos datos que volvería yo a importar. Gracias Por cierto lo he tenido que subir en XLS, …

    • 0

      Reacciones de usuarios

    • 1 respuesta
    • 1.3k visitas
  25. Started by Galactico,

    buenas noches, dispongo de esta macro para navegar dentro de una pagina web Sub test() Dim IE As Object Set IE = CreateObject("InternetExplorer.Application") With IE .Top = 0 .Left = 0 .height = 1000 .Width = 1050 .Visible = True .Navigate "www.google.com" Do While .Busy Or Not .ReadyState = 4: DoEvents: Loop End With End Sub estoy tratando de cambiar el "www.google.com" por el valor de una celda, específicamente concatenando el texto inicial del link (www.google.com/) y el texto de una celda que quiero buscar, por ejemplo: el texto inicial seria www.google.com/ ce…

    • 0

      Reacciones de usuarios

    • 1 respuesta
    • 1.3k 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.