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

    hola, amigo encontre este archivo Bookmake, y me parece perfecto, pero necesito que de una hoja me realice 5 copias con las siguientes modificaciones; nombres y cambio a quien va dirigida la hoja anexo el archivo, espero que me puedan ayudar gracias Cinco Copias Choxis.rar

    • 0

      Reacciones de usuarios

    • 2 respuestas
    • 831 visitas
  2. En este formulario hay una sumatoria de los totales de los productos y ya esta perfecto pero cuando el vendedor necesitara ingresar: -iva (se le suma al total generado de la suma de los precios de los productos) -descuento (se le resta al total generado de la suma de los precios de los productos) -retencion (se le resta al total generado de la suma de los precios de los productos) el textbox de "VALOR TOTAL A PAGAR" seria: txtsumaart+txtiva-txtdescuento-txtretencion lo que pasa es que: hay veces que no se ingresa descuento ni retencion hay veces que no se ingresa descuento ni retencion ni iva puede ser variable dependiendo la situacion de todas maneras si no hay…

    • 0

      Reacciones de usuarios

    • 2 respuestas
    • 1.9k visitas
  3. Started by Antoni,

    Hola a todos: Necesito las imágenes de los iconos de Excel 2013 (Face-Id) en una hoja. Gracias de antemano Saludos

    • 0

      Reacciones de usuarios

    • 2 respuestas
    • 928 visitas
  4. Estimados, Tengo una macro que necesito me ayuden por favor a mejorarla. La macro lo que hace es ver la edad segun la fecha de nacimiento y generar un numero aleatorio supuestamente no repetido, pero al generar nuevos aleatorios si los repite, la macro es la siguiente: Function CALCULAREDAD(FechaNac As Date) Dim nacfecha As Date CALCULAREDAD = Abs(DateDiff("YYYY", FechaNac, Date)) - 1 nacfecha = DateAdd("YYYY", CalcEdad, FechaNac) If Day(nacfecha) < Day(Date) And Month(nacfecha) = Month(Date) Then CALCULAREDAD = CALCULAREDAD + 1 Else If Month(Date) > Month(nacfecha) Then CALCULAREDAD = CALCULAREDAD + 1 End If End If End Function …

    • 0

      Reacciones de usuarios

    • 2 respuestas
    • 613 visitas
  5. Tengo un formulario muy util que incrementa valores preestablecidos y los exporta a otra hoja. El problema es que necesito que queden en la segunda fila de una hoja y sin embargo la macro me los reordena. Necesito esa ubicación porque otra macro trabajará desde alli. Gracias incrementar_numero.rar

    • 0

      Reacciones de usuarios

    • 2 respuestas
    • 458 visitas
  6. Started by mario polet,

    Buenas tardes .... ¿El control Netcommocx permite abrir dos puertos com simultaneamente? Si no fuese asi ¿como podria controlar dos puertos com desde excel? Tengo dos basculas mandandome en continuo el peso x rs232 y necesito leer los dos puertos. Voy a intentar conmutar NETComm1.CommPort = 1 y NETComm1.CommPort = 2 e ir haciendo lecturas ...... gracias

    • 0

      Reacciones de usuarios

    • 2 respuestas
    • 1.1k visitas
  7. Hola tengo que importar a excel una base de datos que se encuentra en una página web que me pide contraseña, lo e estado haciendo manual sin embargo es mucha información para seguirlo haciendo haci. tengo entendido que tengo que ocupar el QueryTable.PostText

    • 0

      Reacciones de usuarios

    • 2 respuestas
    • 1.5k visitas
  8. Started by jesuspg,

    Una pregunta: "¿Alguien sabe cómo centrar los títulos de un cuadro MsgBox que no se utilizando espacios en blanco, sino que se realice de manera automática?" Debe existir algún valor de una propiedad que desconozca. Gracias.

    • 0

      Reacciones de usuarios

    • 2 respuestas
    • 1.6k visitas
  9. Cordial saludo, acudo hoy a este foro para dar solución a un dilema: Tengo en un userform VBA un texbox que se llena con las selecciones de un listbox que dependen a su vez de un filtro con combobox; el dilema es que al realizar cambio en el combobox, el listbox se limpia pero antes, almacena la selección en un textbox. Ahora bien, ¿Cómo puedo hacer para que al realizar nuevas selecciones, estas se "sumen" a las anteriores en el textbox, y no que los actuales registros reemplacen a los anteriores. Espero haber sido suficioentemente clara, agradezco toda la asesoria posible, ya que este proyecto se me ha estado retrasando por el inconveniente expuesto anteriormente. …

    • 0

      Reacciones de usuarios

    • 2 respuestas
    • 746 visitas
  10. Started by Potter08,

    Buenas, tengo una inquietud, alguien me podria ayudar con un macro para asignar nombres de rango desde valores de celda segun el archivo que adjunto espero su comentario. Salu2 Esto lo consegui con esta macro, genera una hoja con los nombre definidos de los rangos del libro. Sub List_All_Defined_Names() Set NewSheet = ActiveWorkbook.Worksheets.Add i = 1 For Each nm In ActiveWorkbook.Names NewSheet.Cells(i, 1).Value = nm.NameLocal NewSheet.Cells(i, 2).Value = "'" & nm.RefersToR1C1Local i = i + 1 Next End Sub[/CODE] Ejemplo nombres de rango.rar

    • 0

      Reacciones de usuarios

    • 2 respuestas
    • 927 visitas
  11. Started by gustav2704,

    Saludos de antemano pido ayuda con esto porque debo entregarlo mañana a mi jefe tengo en una hoja de excel la funcion sumproduct ASI: =SUMAPRODUCTO(--($C$5:$C$9=1);--($B$5:$B$9="a")) lo cual lo que me hace es: si para un rango de filas me encuentra el texto "a" y en esa misma fila pero en otra columna me encuentra el "1" entonces me cuenta cuentas veces se repite ese evento de repeticion ahora debo automatizar esto permitiendo que yo elija el rango de seleccion (o comparacion) que para el ejemplo que hice va hasta la fila 9(por ejemplo) guardado en una variable(rango9 para este ejemplo)pero no logro hacer la macro me reconozca dicha variable como deseo, arrojandome …

    • 0

      Reacciones de usuarios

    • 2 respuestas
    • 833 visitas
  12. Started by home can,

    Hola amigos. En una hoja con AutoFiltro quiero usar una macro para borrar una o varias selecciones de filtrado de forma que restablezca la totalidad de la tabla. He probado con la siguiente instrucción: ActiveSheet.ListObjects("datos").Range.AutoFilter Cumple con la función de borrar la selección y restablecer la tabla pero quita el modo de Autofiltro, lo cual no interesa. ¿Alguien me puede ayudar con otra opción que permita borrar la selección manteniendo el modo AutoFiltro? Gracias. ejemplo.xls

    • 0

      Reacciones de usuarios

    • 2 respuestas
    • 1.2k visitas
  13. Started by aureliope,

    Hola a todos Tengo un problema con Excel y espero que ustedes me ayuden a resolverlo pues no sé si aplica alguna fórmula o tenga que actuar con una macro. Me explico. Tengo dos hojas de Excel. En la hoja 1 está la matriz. En la hoja 2, 3, 4, etc. está el reporte mensual que debo hacer. Quiero que en la hoja dos se anoten automáticamente todos los datos que requiero de las distintas columnas de la matriz (hoja 1). O sea que en el reporte en la columna “a”, a partir de la fila 10 se empiece a rellenar hacia abajo automáticamente la información que tengo en la matriz en la columna “a” a partir de la fila 9 y si no hay valor no aparezca nada en la celda correspondiente en …

    • 0

      Reacciones de usuarios

    • 2 respuestas
    • 2.4k visitas
  14. Started by karin72,

    Hola Chicos, Nuevamente solicitando su gran ayuda...! Tengo una macro y quisiera que me ayuden en perfeccionarla. Antes, recomiendo ejecutar la macro para ver el funcionamiento y sobretodo tomar en cuenta el desplazamiento de las celdas. Realizada la prueba de la macro, (ingreso del cliente y colocación de la hora de inicio) necesito que la macro ejecute el desplazamiento de la celda hacia la fila de abajo de la columna C (Orden) para colocar en forma manual el numero de Orden y luego usar la tecla direccional para mover hacia la derecha y seguir usando la macro. Los otros datos son ingresados con un scaner de codigo de barras y en forma manual. Mil gracias por sus p…

    • 0

      Reacciones de usuarios

    • 2 respuestas
    • 4.1k visitas
  15. Hola a todos nuevamente, hoy traigo otro "chicharrón", pues no he podido dar con la solución adecuada, tengo un simulador financiero para calculo de intereses simples, con amortización a Kapital periódico o con una sola cuota al final del plazo total, que se pueden liquidar Diario, Semanal, Quincenal, o Mensual. Cuando escojo la modalidad Diario en el recuadro forma de pago, con una lista desplegable, la fecha de vencimiento en el resumen del simulador muestra para todos los períodos FALSO, mientras que si escojo cualquiera de las otras tres opciones funciona de maravilla, solicito ayudita, para corregir este impase, sé que es algo sencillo, pero no lo he podido ver. Gr…

    • 0

      Reacciones de usuarios

    • 2 respuestas
    • 977 visitas
  16. Hola, aprovecho para presentarme. Hace tiempo que os leo pero solo unos días desde que me he registrado. Llevo tiempo preguntándome si será posible hacer lo que pretendo. He buscado temas relacionados con "cambio de moneda" y he encontrado cosas parecidas, pero no exactamente lo que busco. Lo que quiero es que con un botón los cuadros de financiación que tengo se muestren en diferentes monedas (euro - dólar y sol, por ejemplo). Y si es posible, aunque ya es demasiado pedir, que se tome la cotización de alguna web. Cualquier ayuda o idea será bienvenida. Un saludo y gracias por ayudar. Dejo un fichero con lo que tengo. Financiación.rar

    • 0

      Reacciones de usuarios

    • 2 respuestas
    • 667 visitas
  17. Started by Anaec,

    Hola! Mi problema es que tengo un excell con muchas hojas, pero únicamente quiero imprimir las filas que tienen una cantidad. Hay otro hilo con éste tema, pero en mi caso hay varias hojas, y también quería consultar si se puede imprimir por bloques de columnas, en mi caso hay dos bloques por cada hoja, y quería imprimir sólo las que están rellenadas. Adjunto un ejemplo resumido. Muchas Gracias! HOJA.xls

    • 0

      Reacciones de usuarios

    • 2 respuestas
    • 595 visitas
  18. Buen día a todos, les escribo debido a que acabo de crear una macro que copia y pega información de una hoja a otra, pero no llega a realizar la ultima tarea, que es pegar, y en lugar de hacer esto aparece en la barra inferior de la ventana el siguiente texto: "Seleccione el destino y presione entrar". Les agradezco mucho. Les adjunto el codigo: Public Sub CommandButton1_Click() Dim c As Object '############################################################################################################ 'PASO 1 BUSCAR LA ESTACIÓN EN LA COLUMNA DE ESTACIONES dato = ComboBox1.Value Set c = Sheets("Base").Range("A4: A400").Find(dato, LookIn:=xlValues, Lookat:=xlWhole) …

    • 0

      Reacciones de usuarios

    • 2 respuestas
    • 1.9k visitas
  19. Buenas tardes, soy una persona nueva en este tema, y quisiera que me hagan el favor de darme una solución: Cuando tengo un (textbox o combobox) de carácter numérico y luego deseo hacer una función que dependa de los números almacenados (textbox o combobox), como puedo dar una variable a estos? para que luego el resultado me lo muestre en un textbox?

    • 0

      Reacciones de usuarios

    • 2 respuestas
    • 547 visitas
  20. Buenos días a todos; No me deja adjuntar la macro y por eso os pongo un enlace de un video. La macro consta de dos formularios con el siguiente código para el ComandButton1 del Form1. Private Sub CommandButton1_Click() UserForm2.Show UserForm2.CommandButton2.Visible = True End Sub Al ComadButton2 en el Form2 tiene la propiedad visible como false. Como se ve en el video cuando ejecuto la macro la primera vez no me muestra el botón "Mostrar" en cambio si la vuelvo a ejecutar si lo hace. ¿No se porqué? Siento no poder subir la macro para mayor entendimiento. Un cordial saludo. Video

    • 0

      Reacciones de usuarios

    • 2 respuestas
    • 1.3k visitas
    • 1 seguidor
  21. Estimados, buen día. Trabajo con libros muy pesados (con muchos registros, muchas formulas tipo "sumar.si.conjunto", tablas dinámicas, gráficos y con formatos condicionales en tablas, etc.) y el simple guardado preventivo normal demora bastante tiempo, cerca del minuto y junto con el auto guardado son muy molestos. Y eso que el libro está en modo de cálculo manual y la pc lleva unos 16G y y un Ryzen 5. Se podrá con un código VBA sencillo guardar, pero sin que el libro se calcule previo al guardado? Muchas gracias!!

    • 0

      Reacciones de usuarios

    • 2 respuestas
    • 1.6k visitas
  22. Buena noche foristas. Es un gusto saludarles y solicitarles su apoyo en lo siguiente. Hace un tiempo obtuve el apoyo de @JSDJSD para una macro que agrega una fila de totales y subtotales en la hoja CUADRO. En esta hoja se importa información de la hojas DATOS. En la actualidad me funciona bien, en la hoja CUADRO cuenta con 2 columnas denominadas DAP y VOLUMEN. Al final se suman los totales, pero mi deseo es que en la fila Total aparezca la Suma de VOLUMEN (que lo hace muy bien), pero en la columna DAP, obtenga el PROMEDIO de las filas SUBTOTALES, que es lo que aún no logro modificar. Si pudieran apoyarme, se los agradecería. La macro es esta: Sub E…

    • 0

      Reacciones de usuarios

    • 2 respuestas
    • 319 visitas
    • 1 seguidor
  23. Hola a todos, estoy dándole vueltas y vueltas y no veo por donde meterle mano. Lo que pretendo es distribuir un texto de forma homogénea dentro de un textbox miltiline, es decir que una vez digitado todo el texto pulsemos Enter y el contenido del mismo quede distribuido tal cual se muestra en el formulario incluido en el archivo adjunto. El Textbox tiene en este caso un límite de 30 caracteres por linea. Alineado Textbox.xlsm

    • 0

      Reacciones de usuarios

    • 2 respuestas
    • 2.4k visitas
  24. Started by ramonvar,

    Buenos Día a todos Si alguien me pudiera dar una mano en esto, les agradecería, tengo columna en una planilla en la cual quiero ingresar números, solo que con este formato xxx-xxx-xxxxxxx este sería ese formato. Ej. 001-001-0012536, entonces, lo que quiero es que cuando ingreso el primer 001, automáticamente me posicione el cursor en el próximo 001 y así después, ya posicionarme después del carácter "-". Sintetizando, automatizar con una macro, la aparición de los guiones, darme la opción de introducir los tres primeros números y que aparezca el primer guión, luego introducir los otros tres y aparezca el segundo guión "-", para luego compl…

    • 0

      Reacciones de usuarios

    • 2 respuestas
    • 765 visitas
  25. Started by Wrongdoer,

    buenas tardes, quisiera saber si hay algun codigo para hacer un userform siempre visible, osea que este siempre sobre todo. gracias

    • 0

      Reacciones de usuarios

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