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

    Buenas tardes, acudo nuevamente a su ayuda, estoy intentando hacer un registro de asistencia a la Iglesia a donde asisto la asistencia esta dividida en CLASES, cada CLASE tiene un MAESTRO y cada MAESTRO tiene sus ALUMNOS las CLASES supone que es cada Hoja, dentro de la hoja esta el registro de Alumnos con su respectivo maestro Lo que intento hacer es lo siguiente: 1° combobox me muestra las CLASES (Hojas) 2° combobox me muestra los MAESTROS (de la CLASE seleccionada) 1° listbox me muestra los ALUMNOS del MAESTRO seleccionado Los errores que tengo: 1° combobox me muestra las CLASES (Hojas) - muestra todas las hojas, solo…

    • 0

      Reacciones de usuarios

    • 12 respuestas
    • 4.6k visitas
    • 1 seguidor
  2. Buenos días, solicito su apoyo para pasar los datos de la columna A y B a txt, con el ancho fijo a una sola columna, con 2 decimales y a partir de la fila 3 Y la columna C enseguida de los datos en txt, igual con ancho fijo. En total de columnas a txt serian 2 Seria asi: COLUMNA A COLUMNA B COLUMNA C ANCHO FIJO 20 ANCHO FIJO 2 COMO DEBE DE QUEDAR EN TXT Costo Costo con 2 decimales …

    • 0

      Reacciones de usuarios

    • 3 respuestas
    • 1.3k visitas
  3. hola expertos buenas noches mi idea es como podremos distribuir 800 numeros que se encuentran en la columna A pasarlos a la columna E en grupos de 40 numeros por columna

    • 0

      Reacciones de usuarios

    • 5 respuestas
    • 1.1k visitas
    • 1 seguidor
  4. Started by Carlos Ocampo Larios,

    Buenos dias Amig@s del foro espero se encuentren muy bien! quisiera solicitarles el apoyo con lo siguiente, tengo un problema con el siguiente código (adjunto), lo que se pretende es realizar una tabla de amortizacion partiendo de ciertos datos, los datos de la tabla son colocados a partir del rango B15 hacía abajo y hacia la derecha hasta la columna G, todo me funciona bien, excepto cuando el plazo de amortizacion es igual a 1, en la columna C,fila 16, se genera una repeticion de la formula ubicada en C15. Tabla de Amortizacion.xlsm

    • 0

      Reacciones de usuarios

    • 2 respuestas
    • 1.4k visitas
    • 1 seguidor
  5. Estimados amigos soy nuevo en el foro y en la programación vba. Sobre el tema de ocultar hojas o como en mi caso es ocultar solamente una, no encuentro una respuesta facil, veo por aqui a grandes expertos y claro no llego a tanto. Os adjunto el fichero y si alguien pe puede ayudar se lo agradezco. muchas gracias de antemano. Por cierto un foro de excel extraordinario labora33333.xlsm

    • 0

      Reacciones de usuarios

    • 2 respuestas
    • 2.9k visitas
  6. Hola a todos; -Llevo un rato a vueltas con la macro que adjunto y no logro avanzar. Consta de un formulario principal y un formulario diríamos auxiliar. En el principal tengo dos textBox con dos botones que a pulsar abren dicho form secundario. En este secundario hago unas operaciones de suma y resta y por medio de un botón me devuelve a los textbox el resultado, pero a los dos. Lo que quiero conseguir es que el resultado vaya para el textbox con el que haya pulsado el botón. Adjunto macro. Saludos a todos y buen finde. MacroS.xlsm

    • 0

      Reacciones de usuarios

    • 6 respuestas
    • 887 visitas
  7. Started by Khalel,

    Buenos días. Me gustaría saber cómo puedo hacer para que una macro que tengo se ejecute todos los días a las 06:00, 14:00 y 22:00. Siempre va a estar abierto. Muchas gracias.

    • 0

      Reacciones de usuarios

    • 6 respuestas
    • 1.5k visitas
  8. Hola de nuevo, Os adjunto un registro de planos para archivos pdf. Quisiera que al generarme el listado automatico de archivos pdf tambien pudiera generarme la fecha de creacion y modificacion de ese archivo pdf. Es posible? X-XXXX-1.zip

    • 0

      Reacciones de usuarios

    • 0 respuestas
    • 586 visitas
    • 1 seguidor
  9. Hola, A ver si alguien me puede ayudar. ¿Esto que planteo es posible? Estoy intentando almacenar el último nombre de la hoja de un libro en una variable para que cuando cree una hoja nueva se me actualicen las fórmulas de mi hoja principal automáticamente a través de la función SUMA. Para ello: Almaceno el nombre de la última hoja en esta variable: Sub Variable() Dim Variable1 As String Variable1 = ActiveWorkbook.Worksheets(Worksheets.Count).Name ActiveWorkbook.Names.Add Name:="ultimahoja", RefersToR1C1:=Variable1 End Sub Y luego lo intento usar de esta manera: =SUMA('semana del 01-01-20:ultimahoja'!A1) Pero …

    • 0

      Reacciones de usuarios

    • 16 respuestas
    • 5.9k visitas
    • 1 seguidor
  10. Buenos dias expertos, necesito pedir una ayuda en un libro tengo varias hojas la cual funcionan casi bien, en la hoja inventario registro los productos para mostrarlo en la hoja Carta de Cargas Sol en la parte inferior mostrarlo pero eso bien cuando registro datos en las diferentes celdas de dicha hoja pero dependiendo de la celda sombreada de color amarillo que va servir para consultar, despues de llenar todo los datos en las celdas vacias mas que todo de color verde y lo pulso registrar me guarda en pdf y limpia toda la celdas para volver a ingresar, hasta ahi todo bien, ahora cuando en la celda de color amarillo ingreso con el dato que ingrese al registrar y pulso cosu…

    • 0

      Reacciones de usuarios

    • 3 respuestas
    • 816 visitas
  11. Started by FPAYNO,

    Buenas tardes. Necesito ayuda para abrir un archivo en modo escritura que ya está siendo usado en la web online. La ruta del archivo es esta..(sustituyendo algunos datos) Workbooks.Open Filename:= _ "https://xxxxxxx-my.sharepoint.com/personal/xxxxxxxxxx_com/Documents/Desktop/MANUAL%20USO%20DE%20LAS%20CAM/ejemplo.%20ejemplo.xlsx" Cuando accedo a el me lanza el siguiente mensaje. Archivo en uso. Usuario - bloqueo la edición del archivo Opciones: Ver una copia. Guardar y editar una copia del archivo. No se si existiría la forma de poder acceder en modo escritura a el sin tener que …

    • 0

      Reacciones de usuarios

    • 1 respuesta
    • 2.5k visitas
  12. Started by FPAYNO,

    Buenas tardes. Necesito ayuda. Necesito que en el momento que activo una celda se ejecute una macro Lo unico que he encontrado es una forma de ejecutarlo cuando das doble Click. pero estoy buscando la forma de activar cuando activas la macro cuando habilitas para escribir o le das doble click. Adjunto el ejemplo con doble click Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) If Not Application.Intersect(Target, Range("D4:D100")) Is Nothing Then Cancel = True Call ENTRADA1 End If Gracias de ante mano y un saludo.

    • 0

      Reacciones de usuarios

    • 4 respuestas
    • 1.1k visitas
  13. Started by jabrajam,

    Buenos dias, No soy capaz que funcione la macro, os explicco: Mi objetvo es: Macro 1: Conseguir que inserte una fila nueva cada cambio de celda de la columna a sea diferente. Despues de muchos dias y copiando ejemplos de la web conseguido Macro 2: Paso 1: que realice sumatorio de la columna J hasta espacio blanco y mantenga formula en la celda,( le llamare en este post obj1 y al range para su obtencion Range1). Despues de muchos dias y copiando ejemplos de la web conseguido Paso 2:que realice sumaproducto de la columna J * la columna K hasta espacio blanco y mantenga …

    • 0

      Reacciones de usuarios

    • 2 respuestas
    • 3.9k visitas
    • 1 seguidor
  14. Started by xinortiz,

    Buenas tardes, les saludo cordialmente deseo me puedan ayudar con lo siguiente: el adjunto tiene un formulario para cambiar contraseña de usuario; estos (usuarios) se almacenan en otro libro el formulario solicita USUARIO, CODIGO (esto para validar la autenticidad), NUEVA CONTRASEÑA y CONFIRMAR NEUVA CONTRASEÑA el problema que tengo es al momento de guardar la nueva contraseña, (No guarda la información del txtnpass2) cambiar contraseña.xlsm usuariosprueba.xlsx

    • 0

      Reacciones de usuarios

    • 4 respuestas
    • 1.1k visitas
  15. Hola a todos los que me puedan ayudar a resolver este problema. Buscando encontré este un código que lee archivos xml de un directorio seleccionado para luego pasarlo a una hoja de excel, el problema surgió cuando quise copiar todo el código en un archivo nuevo y proceder a testear, ya he revisado que tenga estén habilitadas las mismas referencias de las librerías, pero nada que encuentro el detalle. Una parte del código me daba interrupción en esta línea "ruta = LCase(CreateObject([explorador]).BrowseForFolder(0, "selecciona la carpeta a procesar", 0, "").items.Item.Path)" y luego consultando hice este cambio "ruta = LCase(CreateObject("shell.application").…

    • 0

      Reacciones de usuarios

    • 1 respuesta
    • 759 visitas
  16. Buenas Tardes Señores del Foro Quisiera una mano, con lo siguiente, conforme abajo envío una lista de archivos, las cuales se encuentran en una carpeta "ORIGEN", (la cual podría ser otro Driver), que a través de una macro con un formulario, pudiera seleccionar un rango de fechas, (Ej. en un Texbox desde 31/07/2006 y en otro TextBox hasta 18/04/2007) las cuales serían copiadas a la carpeta "DESTINO".. y en caso de que ya existiera me pregunte si quiero reemplazar si o no?.. en caso que "si" reemplazar y por supuesto al darle "no", que continué con los demás.. Desde ya Agradecido

    • 0

      Reacciones de usuarios

    • 1 respuesta
    • 531 visitas
  17. Started by benjarc,

    Buenas noches a todos y a todas, os escribo dado que no encuentro la forma de poder ocultar botones de Command Button en función de un valor de una celda. Me explico, si una celda determinada es diferente a 10, quiero que de forma automática los botones que ejecutan determinadas macros se oculten. Me interesaría que el lanzador del proceso estuviera delimitado al cambio del valor de esa celda en concreto, y no a cualquier modificación que pueda hacerse en la hoja. Por otro lado... ¿es posible que cuando agrupemos filas los botones que están en esas filas también se agrupen y cuando que cuando le volvamos a dar a desagrupar vuelvan a su posición inicial? …

    • 0

      Reacciones de usuarios

    • 1 respuesta
    • 3k visitas
  18. Buenas tardes a todos; -Adjunto una macro con un simple formulario que contiene dos textbox un listbox y un botón. Al poner un dato en el listbox y pulsando el botón pasa el valor al listbox y devuelve el foco al textbox1 Quería conseguir hacer esto mismo pero al pulsar el botón "INTRO" sin tener que recurrir al botón ya que es un incordio estar pulsando cada vez que introduzco datos. Gracias como siempre por su tiempo. Macro.xlsm

    • 0

      Reacciones de usuarios

    • 7 respuestas
    • 1.2k visitas
    • 1 seguidor
  19. Started by Benito Bartolomé,

    Hola a todos; -Adjunto macro contiene un "frm" con un "chek" y un botón. Lo que hace la macro es crear una copia de seguridad. En función de lo que tenga activado en el check la hace de una manera u otra. Activo: Guarda la copia de seguridad en un ruta predeterminada. No Activo: Nos pide la ruta para guardar. Pregunta: ¿Se puede depurar mejor el código o está bien así? Saludos y buen día a todos C.Seguridad.xlsm

    • 0

      Reacciones de usuarios

    • 17 respuestas
    • 2.5k visitas
  20. Started by Khalel,

    Buenos días. Tengo una macro programada para que ejecute una actualización de los datos. El problema es que, dependiendo de los datos, a veces salta un mensaje de error y hasta que no se pulsa aceptar en el mensaje de rror, no continua calculando. Hay alguna forma de hacer que "pulse" el aceptar de forma automática? Gracias.

    • 0

      Reacciones de usuarios

    • 12 respuestas
    • 1.4k visitas
  21. Started by MVelazquez,

    Saludos! He leído de consultas similares, pero en este caso las columnas a seleccionar tienen intervalos de cada 3 columnas (Seleccionar columna 1, 4, 7, 10... etc) en hojas de hasta 500 columnas con información. Posterior pegar estas columnas en otra hoja quedando contiguas. ¿Tendría que seleccionar cada nombre de columna? Range ("A:A", "D:D", "G:G"... Etc ). Adjunto archivo ejemplo. Mil gracias. Elasticidad de Precios Feb 2021.xlsx

    • 0

      Reacciones de usuarios

    • 4 respuestas
    • 2.3k visitas
  22. Buenas noches!Amig@s del foro espero se encuentren muy bien! quisiera solicitarles el apoyo con lo siguiente, tengo un problema con el siguiente código (adjunto) con este lo que se pretende es insertar la formula buscarv en las celdas de las columnas(A,B,C,D,F) en base al valor de la lectura de código de barras (TxtCodigodeBarras_) del formulario (fmrfact) y este valor es colocado a partir del rango G16 hacía abajo. El ingreso de lector del código de barras parece trabajar bien, pero al querer insertar las formulas para traer los datos de este código solamente lo hace con la fila 16, los valores de la búsqueda se obtienen de la hoja BD.Código vba: Sub convertir() On E…

    • 0

      Reacciones de usuarios

    • 2 respuestas
    • 930 visitas
    • 1 seguidor
  23. Started by techcol,

    Amigos buenos dias: Necesito ejecutar el siguiente comando desde excel vba y que el resultado de ejecutar este comando en CMD "oculto" lo guarde en una variable en VBA, tener en cuenta que el resultado se puede componenr de dos lineas o mas dependiendo del numero de monitores que tenga conectados el PC powershell -command ""get-wmiobject wmimonitorid -namespace root\wmi|foreach-object{($_.SerialnumberID|foreach-object{[char]$_}) -join ''}""

    • 0

      Reacciones de usuarios

    • 1 respuesta
    • 1.2k visitas
  24. Hola buenas tardes, para solicitar de su valioso apoyo, encontré un ejemplo en el que se hace una búsqueda de información y el resultado se muestra en un listbox, posterior acople el código a mi macro y la fui delimitando para que funcionara como yo lo necesito, sin embargo después del ultimo cambio y que funcionaba al 100% el código y me sacaba el reporte impreso en PDF de los resultados encontrados, ahora solo crea una hoja en PDF con los encabezados de las columnas pero sin información dentro de estas, no sé porque lo hace, comparto el código: Private Sub ExportaPDF_Click() Application.ScreenUpdating = False Application.DisplayAlerts = False On Error Resume …

    • 0

      Reacciones de usuarios

    • 0 respuestas
    • 568 visitas
  25. Started by eroluis,

    Estimados, Primero que todo muy buenas tardes a todos y les expongo mi duda: Tengo un libro en el que tengo una macro (libro origen), esta macro debe verificar si existe un libro con un nombre definido en una celda del libro origen en la misma ruta que este, en el caso de que exista, debe verificar si existe una hoja con un nombre definido por una celda del libro origen, En el Caso de no existir el libro, debe crearlo con el nombre de la celda, en el caso de existir el libro y la hoja debe crear una nueva hoja llamada "copia" y dar un mensaje de alerta. El caso es que no logro hacer para que valide la existencia del libro o la hoja con mi código: Muchas graci…

    • 0

      Reacciones de usuarios

    • 0 respuestas
    • 569 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.