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

    Buenas Tardes: Necesito como puedo hacer Buscar Objetivo en varias celdas. En el ejemplo que les adjunto en la Celda H2, es el importe que sale a pagar después de los descuentos de ley, pero el importe que debe ser para pagar está condicionado de acuerdo al cargo que tienen (Hoja Cargos) y si no se encuentra el cargo, la Celda H2, queda igual. La diferencia que falta para llegar debe ir en la Celda C2. Si en la celda en donde van los datos de los trabajadores (Trabajador), la macro debe parar. A la espera de su apoyo, me despido. Neto a Pagar.xlsx

    • 0

      Reacciones de usuarios

    • 5 respuestas
    • 3.4k visitas
  2. Started by Jhog,

    Buenas Tardes, Alguien me podria apoyar con resumir las operaciones ya que desarrolle las operaciones en un rango de filas por ejemplo hasta 45, sin embargo muchas hojas son variables y la formula a veces es mas de 45 hasta 100 o 200 filas, por lo que se demora un poco en las operaciones, habra alguna forma de que las operaciones se hagan en funcion de la cantidad de datos de determinada columna SAludos, Sub ProcesarMO() Dim celda As Object Dim rng As Range Set rng = Range("I13:FE13") For Each celda In rng valor = celda.Value If valor Like "*S*" Then celda = Val(Range("G13")) * Val(Range("H13")) / 9.5 Next celda …

    • 0

      Reacciones de usuarios

    • 5 respuestas
    • 973 visitas
    • 1 seguidor
  3. Started by moises2012,

    Hola amigos quisiera que me ayuden nesecito guardar los datos ingresados en el formato que adjunto, para luego buscarlos por codigo de cliente y poder modificar los datos si es nesesario, podrian ayudarme con un ejemplo en mi mismo formato con las primeras celdas solamente, que guarde solo los primeros datos luego que busque el cliente por nombre o codigo, y luego que pueda modificar los datos, para luego imprimirlos, gracias de antemano. EVACRED FENIX S.A.rar

    • 0

      Reacciones de usuarios

    • 5 respuestas
    • 2k visitas
  4. Buenas Tardes amigos, Un gran servicio, creen que me puedan ayudar, necesito formatear la columna leída desde la macro a texto, y evitar que los valores 01, 04, 0009 los muestre como 1, 4, 9 he probado con la grabadora de macros y no lo he logrado, sale un error de depuración: adjunto ejemplos, he intentado hasta personalizar los tipos de datos a nivel de celda (@, ####, RRRR, etc. )en la plantilla pero nada, creo que la solución está en hacer referencia a los valores pero no sé cómo. Adjunto ejemplo, crear la carpeta "carpeta" en c:\ y ejecutar la macro. En la prueba ver la columna AJ (cuenta bancaria) Graaaaaciaaaaas !!!!!!! WALTER. CPE_MAESTRO_PER_PERSONAL.txt …

    • 0

      Reacciones de usuarios

    • 5 respuestas
    • 974 visitas
  5. Started by SALAVERRINO,

    Buenas tardes a los integrantes de este prestigioso foro, en ocasión recurro a Uds, para que brinden su apoyo con la siguiente macro, a la cual quiero que en la barra de estado cuente la cantidad registros que se encuentran en la pestaña PLANILLA que empieza en la celda AZ8 hasta la AZ2507 y por cada archivo que van generando en PDF indique 1 de 19, 2 de 19, .... hasta llegar a 19 de 19, desde ya agradezco su apoyo y colaboración. Sub ElegirAccion() Dim i As Integer Dim intInicial As Integer Dim intFinal As Integer Dim intConsecutivo As Integer Dim srtTitulo As String Dim Ruta As String Dim nombre As String Dim pass As String, hoja As St…

    • 0

      Reacciones de usuarios

    • 5 respuestas
    • 1.2k visitas
  6. Started by Caballero Rojo,

    Hola estimadxs! En un proyecto he aplicado la siguiente macro para que la hoja Excel se tape, funciona pero cuando cierro la hoja y vuelvo a abrir la macro deja de funcionar, otra vez se la hoja, mi consulta ? es si pudieran ayudarme, es algo normal o falta algo en la macro para que quede fija. Gracias!!? Private Sub ocultar() Application.DisplayFullScreen = True Worksheets("Dashboard").Select End Sub

    • 0

      Reacciones de usuarios

    • 5 respuestas
    • 783 visitas
    • 2 seguidores
  7. Estimados amigos: me permito solicitar su colaboración con respecto a lo que me esta sucediendo con el archivo (2)_Devoluciones.xlsm el cual fue un excelente aporte que realizo otra persona en el foro y que permite llevar un control de devoluciones, lo que sucede es que el funciona correctamente en una pc que tengo pero cuando trato de ejecutarlo en otra pc diferente sucede algo que no he podido identificar a que se debe, los valores de en el formulario se multiplican x 100 cada vez que selecciono la celda del formulario. espero que me puedan ayudar solucionado este inconveniente. mil gracias por su ayuda. (2)_Devoluciones.rar

    • 0

      Reacciones de usuarios

    • 5 respuestas
    • 785 visitas
  8. Started by EDUARD1580,

    Buen dia amigos del foro amigos para que si me pueden colaborar en la siguiente formula de busqueda por nombre y codigo de empleados, lo que pretendo es que cuando realizo la busqueda por el codigo me salga el nombre del empleado y que se registre la entrada y salida y que automaticamente se registre en la planilla matriz y asi sucesivamente con las demas hojas de cada nombre de empleados Amigos gracias por su colaboracion ejemplo.rar

    • 0

      Reacciones de usuarios

    • 5 respuestas
    • 764 visitas
  9. Started by jesuspg,

    Hola a todxs, Quiero depurar el siguiente código: ... Columns("F:F").Columns.Group Columns("J:J").Columns.Group Columns("M:M").Columns.Group Columns("Q:S").Columns.Group ... Y se me ha ocurrido aplicando un Array: ... Dim Columna As Range Set Columna = Array("F:F", "J:J", "M:M", "Q:S") For Columna = 0 To UBound(Columna) Columns(Columna).Columns.Group Next Columna ... Pero me da error. No logro identificar qué estoy haciendo mal. Necesito orientación... Gracias de antemano por vuestro tiempo.

    • 0

      Reacciones de usuarios

    • 5 respuestas
    • 1.6k visitas
    • 1 seguidor
  10. Started by AndreaZu,

    Buenas tardes, soy nueva en esto y me gustaría solicitar de su ayuda, tengo una macro a modo de ejemplo ( lo saque de internet) que le agregue un listbox, el asunto es que tengo dos hojas , la hoja de base de datos y la hoja de dato a buscar ,me gustaria que en el momento de seleccionar la celda en el listbox me busque eso solamente. espero que me puedan ayudar!!. gracias de antemano buscar-con-varios-criterios-en-vba.rar

    • 0

      Reacciones de usuarios

    • 5 respuestas
    • 1k visitas
  11. Estimados amigos: Aprovechando vuestra amabilidad y conocimientos, lanzo otra petición de ayuda por si alguno puede echarme un cable. En la hoja de Excel que estoy diseñando (la misma que he enviado en otra consulta anterior), los datos vienen agrupados en items de cuatro filas (esto se ve mejor en el archivo que adjunto). El caso es que necesitaría alguna macro que me permitiera insertar un nuevo item (las cuatro filas) entre otros dos items. Además, las fórmulas, lógicamente, deben conservarse y hacer referencia al nuevo ítem insertado. Por último, al haber incluido ese nuevo elemento, será necesario reorganizar el resto de items para que cada uno haga referencia a su…

    • 0

      Reacciones de usuarios

    • 5 respuestas
    • 1.2k visitas
  12. Started by pipex360,

    Hola amigos tengo una pregunta, necesito crear una manera de llenar fichas automáticamente, para esto cuento con una base. Lo que hago yo es insertar un buscarv asociado al numero de local (son 400 locales) y automáticamente se llena la ficha, el problema es que esto tendria que repetirlo 400 veces. Por esto leí sobre los macros he grabe uno, pero este me permite solo auto llenar la ficha que ya hice, mi pregunta es como hago para que el macro me realice automáticamente las 400 fichas? grabe esta macro lo que hace es crear la ficha y guardarla en el pc, necesito hacerlo para 400 datos (ojo que los numeros no son necesariamente sucesivos esto quiere decir que pueden habe…

    • 0

      Reacciones de usuarios

    • 5 respuestas
    • 2.4k visitas
  13. Started by vecodis,

    Buenos días, soy bastante novato en programación y tengo un problema, no consigo ver las listas en el Combobox del Formulario. A ver quien me puede echar una mano. Gracias.prueba.xlsm

    • 0

      Reacciones de usuarios

    • 5 respuestas
    • 851 visitas
    • 1 seguidor
  14. Started by jesuspg,

    Hola chicos, no sé por qué razón dentro de mi módulo de login cuando introduzco mal la contraseña una vez, se repite el mismo proceso dos veces... Cuando introduzco mal la contraseña dos veces, se repite el mismo proceso tres veces... Cuando introduzco mal la contraseña tres veces, se repite el mismo proceso cuatro veces, y así sucesivamente... Adjunto el fichero para que lo echéis un ojo. Las contraseñas son: [email protected] > "asdfg" [email protected] > "zxcvb" Por favor, cualquier aclaración por vuestra parte me sería de muy grata utilidad. Saludos. PRUEBAS.xlsm

    • 0

      Reacciones de usuarios

    • 5 respuestas
    • 690 visitas
    • 1 seguidor
  15. Started by casos30,

    Buenos Días amigos, tengo una pequeña bodega y quiero implementar algo practico y rápido para su manejo, para ello estoy haciendo una base de datos con macros y formularios pero mi problema consiste en detectar la fecha en que venció un producto y así sacarlo de circulación, para ello hago operaciones con fechas pero no me funciona, así mismo deseo saber que productos vencerán dentro de 10 días para tomar las precauciones del caso. Espero puedan ayudarme, gracias de antemano. Adjunto prototipo de lo que pienso hacer. valida_fecha.zip

    • 0

      Reacciones de usuarios

    • 5 respuestas
    • 3.6k visitas
  16. hola queridos lectores les explico mi problema , intente buscar una formula de excel que me ayudara pero parece que la unica opcion es una macro en la hoja 1 tengo una lista de codigos en cierto orden y en la hoja 2 tengo los mismos codigos pero en distinto orden , lo que necesito es poder ligar estos codigos es decir que si cambio el valor de un codigo en la hoja uno , el mismo codigo en otro orden que esta en la hoja 2 cambie automaticamente les dejo una hoja como ejemplo. saludos y gracias Prueba excel.xls

    • 0

      Reacciones de usuarios

    • 5 respuestas
    • 919 visitas
  17. Started by yordin,

    Buenos dias. nuevamente yo por aca con una consulta o petición de ayuda, es lo siguiente, en mi lugar de trabajo tengo un archivo o base de datos en Excel el cual tengo adaptado con varias macros y Userform para la emisión de constancias de trabajo, pero queria adaptarle una macro que verifique dicha constancia no halla sido emitida en los últimos 20 dias como podria hacer. Estoy usando una macro que me verifica que el dato no este repetido es la siguiente: Sub VALIDAR() Application.ScreenUpdating = False Application.Calculation = xlCalculationManual Application.EnableEvents = False ActiveSheet.DisplayPageBreaks = False Set H1 = Sheets…

    • 0

      Reacciones de usuarios

    • 5 respuestas
    • 4.7k visitas
  18. Buenos dias a todos, En una consulta anterior quería hacer lo siguiente: Tengo una Tabla y quisiera a través de una macro que todos los datos que tengo en una columna filtrados se me copien en hojas diferentes con el mismo nombre que los datos. Ejemplo: en la Columna F "Categoria" tengo los siguientes datos SSD, Procesadores, Altavoces, Tablets, etc... y si filtro esta "Categoria" quiero que se copien en hojas separadas con los nombres de cada una SSD, Procesadores, Altavoces, Tablets, etc... Y muy amablemente Antoni me creo la siguiente Macro: El Problema es que en unos ficheros funciona y en otros muy parecidos NO Me crea otra…

    • 0

      Reacciones de usuarios

    • 5 respuestas
    • 1.1k visitas
  19. Started by jik,

    Hola. Estoy declarando una variable de una ruta al abrir un libro para después utilizarla en varios módulos. La pruebo con MsgBox y la variable queda bien declarada pero al tratar de utilizarla en otro módulo su valor (también probado con una msgbox) queda en blanco. ¿por qué me pasa esto? No soy muy experto por lo cual agradezco una explicación relativamente simple. Muchas gracias A continuación la declaración cuando se abre el libro: Option Explicit Public ImpPredeter As String Public RutaData As String ----------------------------------------------------------------------------------------- Private Sub Workbook_Open() Application.ScreenUpdating …

    • 0

      Reacciones de usuarios

    • 5 respuestas
    • 2.2k visitas
  20. Started by MarianoCruz,

    Hola a todos: Recurro a ustedes por lo siguiente: Tengo una hoja tipo base en la que por medio de un user form, ingreso información en la siguiente fila vacía. en la columna A llevo un consecutivo unicamente informativo que va de 1,2,3,4 etc segun se va llenado cada fila vacia. y asi en cada la fila vacia siguiente. Me funciona bien! Ahora necesito que el ingreso lo realice a partir de la fila 2 y la información que esta escrita previa se recorra hacia abajo. Así poder tener la ultima información arriba. con esto mi consecutivo seria 4,3,2,1. Adjunto la estructura del user form. Muchas gracias Ingreso por userform.txt

    • 0

      Reacciones de usuarios

    • 5 respuestas
    • 599 visitas
    • 2 seguidores
  21. Started by pinoji,

    Buenas Tardes Foristas. Una vez más acá. tengo una pequeña duda y me gustaría que ustedes me ayuden . Quiero sumar dos o más TextBox y que el resultado me lo ponga en un Label en tiempo real. Necesito el código. Una amistad me dio este, y aunque no me pareció lo implementé y no suma. Private Sub LblImporte_Change () LblImporte.Caption = Val(TxtCantidad.valuie) * Val(TxtPrecio.Value) End Sub Gracias de antemano. Tengan un feliz resto del día. Pino

    • 0

      Reacciones de usuarios

    • 5 respuestas
    • 3.1k visitas
    • 2 seguidores
  22. Started by sasas,

    Hola amigos recurro a uds pues no encuentro solucion en internet, mi consulta es: Como envio el foco (SETFOCUS) a un determinado valor de un combobox, les explico el contexto: Tengo un combobox con 3 estados Estado1 Estado2 Estado3 Un formulario que esta en estado1 no puede pasar a estado3, tienen que pasar por estado2, entonces si mi formulario esta en estado1 y le cambio a estado3 y le doy guardar, me envia una alerta y me envia a mi formulario pero pierdo el foco de mi valor inicial "estado1" Muchas Gracias

    • 0

      Reacciones de usuarios

    • 5 respuestas
    • 2.4k visitas
  23. Started by crengifo,

    Buenas tardes estimados, tengo la siguiente macro donde quiero que al seleccionar el checkbox1 me ejecute el primer procedimiento de lo contario siga al siguiente procedimiento, pero me esta tomando el valor en la casilla de adicion del segundo procedimiento. Agradezco me puedan orientar gracias. Sub Dedicion() dim sh1, jh2, jh3, jh4, jh5, jh6 as Worksheet If sh1.CheckBox1.Value = True Then Set jh5 = Workbooks.Open("\\10.7.10.1\calidad\RegCalidad 2024\Molienda de Cemento y Empaque\Base datos Cementos producido 2024.xlsx", ReadOnly:=True) Set jh6 = Sheets("MEZCLA ADICION") jh6.Activate jh6.Cells(4, "A").Select JFila = ActiveCell.Row …

    • 0

      Reacciones de usuarios

    • 5 respuestas
    • 750 visitas
    • 2 seguidores
  24. Buenas tardes Desearía me ayudaran, si es posible, para hacer un Formulario que contenga tres Combobox dependientes entre sí Un saludo y gracias anticipadas AndrMax Formulario.rar

    • 0

      Reacciones de usuarios

    • 5 respuestas
    • 2.2k visitas
  25. Started by bigpetroman,

    Buenas, escribo este tema para ver si a alguien más le ha pasado y sabe el motivo por el cual sucede o como corregirlo. Desde ayer, cuando ejecuto cualquier macro (de un mismo archivo o cualquier otro archivo), la misma se “para” sin motivo aparente, y sale el recuadro de “La ejecución del código se ha interrumpido”; le doy a continuar y todo finaliza sin problemas; si le doy a depurar la macro se para el cualquier línea de código (nunca es la misma línea); si la macro es larga, el recuadro de interrupción sale varias veces hasta que finaliza la ejecución del mismo (dandole a continuar). El problema, según lo que yo he logrado detectar, sucede cuando la ejecución del a…

    • 0

      Reacciones de usuarios

    • 5 respuestas
    • 3.9k 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.