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. Estimada(o) Antes que todo, espero se encuentren bien en este tiempo de pandemia y a cuidarse mucho Mi situacion es la siguiente. Tengo una tabla desde $A$4:$Z$5000 en vba....escribo Sheets("Sheet1").Range("D4").Sort key1:=Range("Z4"), order1:=xlAscending hace el orden por la columna Z pero la fila 4 la deja con datos y pierdo el nombre de las columnas debe comenzar obligadamente en la fila 1 ??? Gracias de antemano Juan Manuel

    • 0

      Reacciones de usuarios

    • 2 respuestas
    • 565 visitas
  2. Hola amigos de Excel tengo una consulta de como se puede hacer un reporte de stock para cada codigo con cabecera . para que se entienda mejor puse con colores y agrupe los datos que pertenecen a una misma venta o compra que tienen varios items. no se si se puede llegar a al resultado final filtrando o con código ,pero puse una celdas para hacer las consultas de fecha para que me filtre el resultado que deseo . no se si esta mal la base de datos pero asi registran los datos, no se si se puede llegar al resultado que deje. bueno para que me entiendan mejor en el archivo esta como quedaria el resultado final . hay otros reportes que saca un program…

    • 0

      Reacciones de usuarios

    • 2 respuestas
    • 1.1k visitas
  3. Started by fredycayo,

    Muy buen día. Hola a los amigos les pido ayuda a resolver una macro, tengo un archivo, la columna C valores iguales sume de la columna E y F el resultado se coloque en la celda N5, P5. Que al ejecutar botón se calcule la suma total y los días de extraer y adjunto el archivo.. Les agradezco su gentileza. Infomacion M1.xlsm

    • 0

      Reacciones de usuarios

    • 2 respuestas
    • 1.1k visitas
  4. Started by jesuspg,

    Hola compañeros, Me gustaría dejar desactivadas (o quitar, si es posible) las opciones que están marcadas dentro del cuadro rojo de la imagen adjunta, y dejarlas desactivadas tal y como aparecen en el cuadro azul. No he realizado nunca nada así, y toda la información que encuentro por Internet me aconseja realizarlo desde código XML. Pero estoy convencido de que debe de existir una sentencia algo parecido a la siguiente: ... Application.CommandBars.Controls("Eliminar").Enabled = False ... Un saludo, y muchas gracias por vuestro tiempo.

    • 0

      Reacciones de usuarios

    • 9 respuestas
    • 3.3k visitas
    • 1 seguidor
  5. Buenos días a todos; -Necesito una pequeña ayudita. A ver si sois tan amables de echarme un cabo. En una hoja Excel y en el evento "doble_click" hay un procedimiento que abre la ventana emergente de archivos de Windows y al seleccionar un elemento me inserta su nombre en un rango de celdas que he determinado. He hecho lo mismo desde un módulo. A este módulo hago la llamada a través de menú contextual de Excel. Supe configurarlo, pero me funciona con todas las celdas. No sé como hacer para que sólo funcione con un rango determinado, (igual que he puesto en el procedimiento de la hoja) Saludos y buen día a todos. Adjunto macro. MModulo.x…

    • 0

      Reacciones de usuarios

    • 2 respuestas
    • 1.9k visitas
  6. Started by patriciomates,

    Por favor ayudarme con esto, gracias. GESTOR().xlsm

    • 0

      Reacciones de usuarios

    • 0 respuestas
    • 964 visitas
  7. Started by jcjones,

    Buenas tardes Amigos foristas. Les pido el favor si me pueden ayudar con lo siquiente, estoy trabajando en un formato de excel, el cual debe de tener una foto de la fachada de la casa ( 1 0 2) en un espacio demarcado en la primera hoja y en las otras hoja se anexan 6 fotos maximo por hoja. Estas fotos estan en una carpeta junto con el formato por persona. La idea es que se pueda automatizar con un botón y las orgamice uniformemente en estos espacios. Muchas gracias. Anexo formato https://www.mediafire.com/file/fh2i1l9cn6abugz/Acta_de_cierre.xlsx/file

    • 0

      Reacciones de usuarios

    • 0 respuestas
    • 499 visitas
  8. Necesito que me ayudéis llevo toda la semana con esto de la captura de imagen y este es el codigoque menos problemas me da con las cámaras webs pero no se hacer que se graben las capturaqs como image1, image2, image3 .... en el directorio del archivo y que se carguen en el cuadro de imagen del userform1(13) formulariowebcamcaptura.xls

    • 0

      Reacciones de usuarios

    • 0 respuestas
    • 631 visitas
  9. Hello everyone as always when it comes to evaluating by column; I lose myself in a glass of water. My problem is this: 1) In Column (A2: A200) I should enter dates 2) I would like you to write me only the day of the week of that date every time I enter the dates in the column (B2: B200). 3) While in column (C2: C200) he wrote me the same thing as in column (B) but taking only the first letter. As for example: If in Column (B) it is written (Monday) in Column (C) it should only show the letter (L) that's all! Thanks as always for all the help you want to give me about it. Greetings from Maurizio Modificare_Giorni_Set_e_Giorni_Set_Solo_Prima_Lettera.xlsm

    • 0

      Reacciones de usuarios

    • 10 respuestas
    • 2.1k visitas
    • 1 seguidor
  10. Muy buenas a todos. Muy seguramente será un error estúpido pero no veo o no detecto el problema. Y es que la macro que tengo en el botón (guarda) me tira error si uso una tabla don introduce los datos, pero si la quito entonces la macro funciona a la perfeción. Os lo explicaré con capturas. Aquí se puede ver el lugar donde la macro debe introducir los datos, como se puede ver...No hay tabla alguna insertada.(captura de arriba) Ahora como podéis ver si se ha insertado una tabla, y nos dirigimos a la hoja "ENTRADAS", donde está la macro ( captura de arriba) Primero seleccionar la celda "E5"( recuadro rojo grande), después cl…

    • 0

      Reacciones de usuarios

    • 0 respuestas
    • 526 visitas
  11. Hola Una consulta quizas alguien me puede ayudar Tengo hecho el código para enviar whatsapp desde excel. Quiero adjuntarle pdf. Para enviar lista de precio a clientes. Tengo hecho lo de buscar el pdf, traerlo, me falta lo de enviarlo Aquí les muestro el código Sub dale_Click() Este boton manda el whatsapp Dim mensaje As String Dim numero As String numerodatos = Hoja13.Range("c" & Rows.Count).End(xlUp).Row 'MsgBox (numerodatos) For fila = 8 To numerodatos 'me busca en los datos los numeros a los que mandar numero = Cells(fila, 3).Value mensaje = Ra…

    • 0

      Reacciones de usuarios

    • 2 respuestas
    • 13.9k visitas
  12. Hola Foreros!! Tengo un macro que hace parpadear el fondo de un rango de celdas si en una determinada celda hay cualquier valor numérico. Pero sólo me funciona cuando introduzco directamente el valor en la celda; cuando el valor proviene de una fórmula no se ejecuta el macro. Además me gustaría que no solo reconociera el valor numérico sino cualquier texto en general. He probado con Private Sub Worksheet_Calculate() pero no me funciona El código que me funciona es el siguiente: Private Sub Worksheet_Change(ByVal Target As Range) If Not Intersect(Range("AR5:BB19"), Target) Is Nothing Then If WorksheetFunction.Count(Range("AR5:BB…

    • 0

      Reacciones de usuarios

    • 4 respuestas
    • 1.5k visitas
  13. Necesito ayuda para capturar una imagen desde cámara web CommandCam.exe Formulario_Avanzado.xlsm

    • 0

      Reacciones de usuarios

    • 0 respuestas
    • 1.1k visitas
  14. Hola a todos por aqui Ya tengo un macro que me realiza un Ping a una lista de IP que aqui muy amable me ayudaron a corregir unos errorsillos que me ayudo a perfeccionarlo, pero ahora estoy intentando hacer que la prueba me la realice el tiempo que uno le ingrese, pero me me marca el siguiente error tengo 3 botones, 1 corre la prueba de PING, 2 inicia el autoping, 3 detiene el autoping y el codigo que tengo es el siguiente Dim Tiempo As Variant Dim contador As Long Private Sub PingLista_Click() Call EnviarPing_CSR_Concent End Sub Private Sub Fin_AutoPing_Click() On Error Resume Next Application.OnTime Tiempo, Procedure:="Inicio_AutoPin…

    • 0

      Reacciones de usuarios

    • 3 respuestas
    • 3.1k visitas
  15. Buenas noche, expertos necesito una yuda tengo un formulario que funciona bien, pero el detalle es cuando la hoja socios esta vacia solo con los encabezados y registro los datos con el formulario se debe agregar en la fila 2 pero este se registra en la tercera fila, solo eso de ahi adelante segistra una tras otra, lo que pido ayuda es que empiece registrar desde la fila 2. El otro tema es al momento de filtrar con la caja de texto buscar por apellidos me filtra bien pero cuando selecciono la casilla no funciona, pero si selecciono la casilla sin filtrar me selecciona la fila del ListView y los datos me muestran en los campos de texto. Por favor me podrian ayudar que…

    • 0

      Reacciones de usuarios

    • 2 respuestas
    • 1.1k visitas
  16. Buenas tardes estimados/as, quisiera pedir de su ayuda, estoy creando una macro que me identifique las diferencias pero lo que quiero es que me resalte solo los caracteres diferente en la columna 1 , hasta el momento solo he podido que me resalte todo el texto, así que adjunto mi planilla, le agradecería su ayuda me estoy desesperando!! Nuevo Hoja de cálculo de Microsoft Excel (2).xlsm

    • 0

      Reacciones de usuarios

    • 6 respuestas
    • 781 visitas
  17. Hola buen día masters! He seguido avanzando con una macro que me ayudaron a construir en el foro pero ha crecido el alcance y de tener 2 filtros por medio de "Combobox´s" ahora son 3 filtros pero no funciona del todo bien porque la intención es que al seleccionar cada combobox filtre los datos y los vaya mostrando en el listbox. 1er combobox_año: OK si lo filtra y muestra los datos en el listbox 2do Combobox_mes: FAIL desaparecen los datos del listbox 3er Combobox_area: OK si lo filtra y muestra los datos en el listbox La función encargada de filtrar se llama Consulta dentro del UserForm llamado "Solutek". Por otra parte una vez filtrada la…

    • 0

      Reacciones de usuarios

    • 4 respuestas
    • 850 visitas
  18. Started by rsoto.conta,

    Buenas Noches estimados amigos, hace algún tiempo atrás me solucionaron mi vida en relaciona a que me modificaron un macros para distribuir deuda equitativamente , el tema que ahora por favor, necesito que me ayuden nuevamente. En resumen, yo trabajo en una empresa de cobranza, la que debo distribuir equitativamente : en monto de la deuda y según el % que se entrega a cada trabajador, es decir, según la tabla que me entreguen es el % que se distribuye segun el total, y además para cada uno debe ser equitativo en relacion al monto de la deuda, ya que a veces a algunos se les entrega muchos casos de monto bajo , por eso lo hago manual, llevamos 3 semanas de esta fo…

    • 0

      Reacciones de usuarios

    • 0 respuestas
    • 557 visitas
  19. Hola amigos de AE, quería hacer una consulta por favor. Tengo una hoja oculta con 1000 filas y 16 columnas (A1:P1000) que se actualiza de otras hojas a través de fórmulas y macros. Nunca se mete dato manual. ¿Es posible ejecutar en dicha hoja una macro, cada vez que se actualice el valor de una celda del rango indicado? He intentado por el evento Change pero no lo logro. Agradecido de antemano.

    • 0

      Reacciones de usuarios

    • 3 respuestas
    • 1.1k visitas
  20. Estimados amigos. Me surge una duda, existe una forma de saber si se ha deseleccionado un Item de un ListBox ¿? Es decir, si tengo el primer item de un ListBox seleccionado, y lo destildo, hay manera de registrar esta acción para poder ejecutar una macro ¿? Agradecido de antemano por vuestra ayuda.

    • 0

      Reacciones de usuarios

    • 9 respuestas
    • 3.1k visitas
  21. Hola Masters, Soy nuevo en este foro y primero que nada los quiero felicitar por que ayudan muchísimo a las personas que vamos comenzando en este mundo de excel avanzado. Estoy construyendo una interfaz tomando como base algunos ejemplos que han subido al foro pero me he atorado en querer editar datos de mi listbox y que se actualice en la base de datos al dar clic en el botón "Guardar", espero que me puedan ayudar, les dejo mi excel. Saludos a todos y de nuevo GRACIAS!! Matriz KPI´s OK.xlsm

    • 0

      Reacciones de usuarios

    • 10 respuestas
    • 1.7k visitas
  22. Buenos días, Soy muy nueva en el mundo de la programación VBA, y necesitaría ayuda en una macro que estoy haciendo, los datos el usuario los introducirá a traves de un formulario, la cuestión es que quiero que no deje poner introducir fechas anteriores al día de hoy, estoy probando con el siguiente código If Cells(ultimafila + 1, 13) <= Date Then 'No se puede poner fechas anteriores a hoy MsgBox "La fecha es anterior a hoy" Exit Sub Pero me sigue añadiendo la información. ¿Podéis indicarme cual es el error?Gracias

    • 0

      Reacciones de usuarios

    • 4 respuestas
    • 786 visitas
  23. Hi Everyone My new problem is this: On an Excel sheet in Column (C) 1) I would like that every time I enter a word like ("btp fut") or write ("btp ital") the letter (L) should appear in Column (P) 2) While If in Column (D) I enter a Date less than 5 days compared to today's date We will have to create the lettara (D) in the column (P) 3) If in Column (I) the Writing ("change balance") is shown and in Column (J) it does not contain (0), the Letters (CS) in column (P) should appear 4) If in column (K) I write the word ("square *") Write the letter (Q) in Column (P) Let's say I don't expect you to do all the work for me But that you help me …

    • 0

      Reacciones de usuarios

    • 5 respuestas
    • 1.5k visitas
  24. Buenos días; Hoy necesito ayudaexcel ? Adjunto una macro que envía por mail tabla en el cuerpo del mensaje de forma automática si necesidad de abrir el outlook. En la hoja excel tengo datos de facturas con vencimientos y lo que no se como hacer es que la macro valore las facturas cuyo vencimiento se haya cumplido y las envíe por mail. En dicha hoja estarán los vencimientos de varios clientes y solo debe enviar las facturas vencidas de todos los clientes a cada mail. -Adjunto macro explicativa. Saludos a todos y a ver si se logra entender bien MAlertaVencimiento(e).xlsm

    • 0

      Reacciones de usuarios

    • 0 respuestas
    • 1.1k visitas
  25. Started by MAURO_1512,

    buen dia en el archivo adjunto se organiza en cada hoja l ainformacion del producto entrada salida y existencia con formulas pero tengo problemas ya que el archivo que manejo es de mas de 30 productos y mucha informacion por lo cual aveces se me bloquea el excel. por esta razon busco ayuda para pasarlo a macros gracias EJEMPLO DE CAPTURA Y ORDEN DE KARDEX.xlsx

    • 0

      Reacciones de usuarios

    • 1 respuesta
    • 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 sergio@ayudaexcel.com

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