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

    Como se puede adaptar este calendario a un archivo para que se pueda ver en todos los equipos en un userform. Anexo Archivo modelo con userform. Gracias

    • 0

      Reacciones de usuarios

    • 13 respuestas
    • 1.6k visitas
  2. Started by superboy6969,

    Estimados, hace poco estaba trabajando con adecuar un calendario en mi hoja excel mediante macros y vi un tema muy interesante, lo pueden ver en la sigte dirección: Pendiente - Como adaptar calendario? | Ayuda Excel Pues si lo revisaron, en cualquier celda que se posen se mostrará un icono que cuando le haces click se abre un calendario y al clikear una fecha se imprime en la celda seleccionada, intente copiar la idea pero por ejemplo tengo dos campos "fecha de nacimiento" y "Nombres", pues solamente quiero que esta macro se muestre en la columna o campo fecha, intente modificando dentro de la macro/hoja1 lo siguiente: Private Sub Worksheet_SelectionChange(ByVal Target…

    • 0

      Reacciones de usuarios

    • 4 respuestas
    • 763 visitas
  3. Ciao a tutti e il mio problema è questo: con un foglio excel e la sua vba vorrei inviare e-mail con allegati pdf o altri formati che si trovano nella mia sottocartella chiamata (Utility) ma per esigenze personali uso sia (Outlook) che (Thurderbird) Ma anche se provo un mare di soluzioni, mi fa sempre dare un errore e non carico nulla si dà un'occhiata e mi dicono perché? Grazie saluti da A.Maurizio Prova_Email_Con_Allegato_3.rar

    • 0

      Reacciones de usuarios

    • 6 respuestas
    • 2.5k visitas
    • 2 seguidores
  4. Hola, necesito ayuda, soy nuevo en la creación de los userform y tengo una duda en la cual espero ustedes puedan ayudarme, el asunto es que tengo un combobox el cual me dice en que tgurno voy a estar (mañana, tarde o noche), el asunto es que al momento de hacer una elección en el combobox quiero que aparezca automaticamente en un textbox el horario que tiene este turno por ejemplo: 8:00 a 8:59 (son en total 8 textbox), pero con que me den solo el primero los otros los estaría completando yo Muchas gracias

    • 0

      Reacciones de usuarios

    • 1 respuesta
    • 1.1k visitas
  5. ALINEAR CHECK BOX.xlsmBuenos días, mi consulta es que si pueden ayudarme para alinear esos check boxes, centrarlos y que todos me queden uniformemente ordenados en el formlario. Mil gracias.

    • 0

      Reacciones de usuarios

    • 2 respuestas
    • 2.2k visitas
  6. Started by jesuspg,

    Pues eso... Digamos que tengo una hoja repleta de botones con macros y quiero dejarla estática, es decir, que el usuario no se pueda desplazar a través de ella haciendo uso de la ruleta del mouse. Supongo que existirá alguna manera más sencilla de programarlo, pero pienso que lo más lógico sería anular la propiedad SmallScroll del objeto Windows. Muchas gracias de antemano por vuestro tiempo.

    • 0

      Reacciones de usuarios

    • 9 respuestas
    • 1.8k visitas
    • 1 seguidor
  7. Hola a todxs, Me gustaría que los filtros automáticos aparecieran siempre que se activa la hoja, tal y como aparece en la imagen adjunta. Para ello, he desarrollado el siguiente evento: Private Sub Worksheet_Activate() With Sheets("Hoja1") .AutoFilterMode = False ' Desactivamos siempre los filtros automáticos... .Cells.AutoFilter End With End Sub Sin embargo, no me funciona, porque la primera vez se activan los filtros automáticos, pero a la siguiente no. Es casi como poner lo siguiente: Private Sub Worksheet_Activate() Sheets("Hoja1").Cells.AutoFilter End Sub Es decir, se quitan y se ponen cada vez que se acti…

    • 0

      Reacciones de usuarios

    • 2 respuestas
    • 994 visitas
  8. da error de archivo no encontrado; que debo hacer para que se ejecute : WDir1 = "\\DESKTOP-13453GE\C:\Users\ipm20\Desktop\WProces\" WDir2= "F09-CompVda-PC2-20230701.xlsm" Run = "'" & WDir1 & WDir2 & "'!ProcCompVda" Application.Run WRun muchas gracias

    • 0

      Reacciones de usuarios

    • 12 respuestas
    • 538 visitas
    • 2 seguidores
  9. Hola un cordial saludo a todos. Tengo una hoja con un formato de calendario y tengo 365 hojas cada una con nombre de un dia mes y año en especifico agradecería me ayuden a como puedo realizar la vinculacion de cada dia del calendario con cada hoja respectivamente sin hacerlo de forma manual , ya que es muy laborioso dado que lo tengo que hacer de una por una. adjunto coloco un ejemplo de lo que tengo gracias. Libro1.xlsm

    • 0

      Reacciones de usuarios

    • 3 respuestas
    • 546 visitas
  10. Hola buenas tardes, soy nuevo en el grupo y en crear macros en excel , he estado aprendiendo a programar vba en las redes. Actualmente le estoy desarrollando un control de clientes y trabajos al negocio de mi hija y poco a poco le he estado creando formularios, aca les dejo el formulario que estoy desarrollando para visualizar los clientes y el trabajo que amerita cada uno así como sus costos. En la visualización en el listbox no he podido encontrar que me traiga el mismo formato que tiene cada columna en la hoja de calculo. Les agradezco la ayuda que me puedan aportar. Gracias Private Sub Combobox1_Change() Dim vtotal As Currency Dim i As…

    • 0

      Reacciones de usuarios

    • 4 respuestas
    • 7.4k visitas
    • 1 seguidor
  11. Hola amigos, necesitaría que cuando la fecha actual coincidiera con la fecha que he asignado a una celda me saltara algún tipo de aviso, ya sea de outlook del mismo excel si es que tiene alguna opción similar y no se como hacerlo o si es posible hacerlo, que a lo mejor estoy pidiendo que me haga mucho, no se. Gracias de antemano.

    • 0

      Reacciones de usuarios

    • 5 respuestas
    • 939 visitas
  12. Started by quiroz562,

    Hola buena tardes, necesitaría ayuda si es posible. Voy a intentar explicar lo que necesito. Yo trabajo con tres libros diferentes (1, 2, 3), en el numero uno y en la hoja1 cargo datos. En el numero 2, que es creado por intermedio de una macro que esta en libro1. Y en el libro 3 donde guardo al finalizar el trabajo los datos totales. Yo necesito que al cargar nuevo trabajo en libro 1 (hoja listado) se copien automáticamente en el libro 3 (hoja horas) manteniendo el formato del libro 3 Y en la hoja material del libro 3 me cree un lugar para que yo les pueda cargar los materiales. En definitiva, yo actualmente copio los datos del archivo 1 en el archivo 3 manualmente …

    • 0

      Reacciones de usuarios

    • 2 respuestas
    • 1.1k visitas
  13. Hola a todos, Una duda que no he sabido resolver y es como puedo a averiguar cuál es la primera columna con datos sin indicarle al procedimiento ni la fila ni la columna, lo tendría que detectar el procedimiento. Igual no se puede, sí es así hacérmelo saber. Sé la que el código para la última columna es: uC=Cells(1,1).End(xlToRight).Column Pero en el le estamos indicando las coordenadas (fila,columna). He puesto el ejemplo (1,1) pero puedo tenerla en cualquier parte de la hoja. Saludos.

    • 0

      Reacciones de usuarios

    • 14 respuestas
    • 2.2k visitas
    • 3 seguidores
  14. Started by noise56,

    Hola amigos, buenas tardes. Una preguntita quizás un poco tontorrona pero es que, como tengo tantos códigos VBA en el libro, es bastante tedioso cada vez que quiero buscar uno en concreto. Ayá va: Hay alguna forma de buscar un código VBA sin tener que ir pasando uno por uno ??. Oye, el que no sabe es como el... Saludos.

    • 0

      Reacciones de usuarios

    • 5 respuestas
    • 1.1k visitas
  15. Hola a Todos, necesito buscar un nombre dentro de una base de datos. y para eso kiero poner un inputbox, usando la info del inputbox , kiero buscar, ej: nombre direccion edad Pablo Reyes Mexico 26 bueno. poner el input box donde yo ingrese el nombre y en otra hoja, ,me ponga los datos de Pablo ryes,,,--- si me expliko?!?! de antemano les agradezco la a yuda ke me puedan dar

    • 0

      Reacciones de usuarios

    • 0 respuestas
    • 1.3k visitas
  16. hola gente este es mi primer post tengo un cuaderno de trabajo de 15 etiquetas, cada uno es un alumno de un curso. cada curso cambian los nombres de los alumnos. el cuaderno tiene en su primera etiqueta los datos de los alumnos ( nombre, apellido, documentos, etc) mi problemas es que cada vez que empieza un curso nuevo, ( cada semana) me paso el tiempo, cambiando manualmente el nombre de cada etiqueta por el de cada alumno. se que hay una posibilidad de cambiar ( macro) los nombres de acuerdo a la tabla de la primera etiqueta. el problema es que no se hacerlo :uncomfortableness: agradezco de antemano cualquier ayuda gracias

    • 0

      Reacciones de usuarios

    • 3 respuestas
    • 1.6k visitas
  17. Started by danyalix1987,

    Buenas tardes, no se si esta consulta se exponga en esta área, si no pido a los moderadores que la direccionen al sitio correcto: "la cuestión es que me uni al foro y cuando estoy creando un tema, y quiero cambiar de renglón no me deja, ya probe con mil convinaciones de teclas y nada, me ayudan porfa.

    • 0

      Reacciones de usuarios

    • 1 respuesta
    • 1.1k visitas
  18. Hola a todos mi consulta es como cambiar la ruta para cargar las imagenes desde la hoja fotos del libro ,que actualmete lo hacen a travez de un vinculo a una carpeta de escritorio. adjunto proyecto copia.xlsm

    • 0

      Reacciones de usuarios

    • 12 respuestas
    • 3.7k visitas
    • 1 seguidor
  19. Intento abrir un archivo CSV con una macro y quiero cambiar los paramentros de TextFileColumnDataTypes. hice una macro con la que a través de las caracteristicas de cada columna puedo incluir en una variable los parematros que necesito, pero al abrir la QueryTables.Add, no se como suplir el array. Los datos que incluye la variable son: MyVariable = "4,2,2,2,1,2,1,1" With ActiveSheet.QueryTables.Add(Connection:= _ ImpFile, Destination:=Range("$A$1")) ' .CommandType = 1 .Name = "salidas_merc" .FieldNames = True .RowNumbers = False .FillAdjacentFormulas = False .PreserveFormatting = True …

    • 0

      Reacciones de usuarios

    • 0 respuestas
    • 1.1k visitas
  20. Started by yuria,

    Buenas tardes; soy nueva trabajando con macros y tengo una hoja llamada Buscar datos (hoja1)que tiene el combobox1 y necesito que al darle click al combo me cargue los datos de la hoja cooperativas (hoja2) del rango a7;a30 sin repetirme datos o mostrar espacios en blanco ya que en esta columna existen varias veces los mismos nombres o hay celdas vacias. Agradeceria de antemano su ayuda! Copia de Control de Cooperativas.xls

    • 0

      Reacciones de usuarios

    • 1 respuesta
    • 3.5k visitas
  21. Hola tengo un libro que al abrirlo salta un userform y al mismo momento el libro se oculta, pero al cerrar el userform el libro aparentemente se cierra, pero lo mas raro es que queda oculto pero abierto me doy cuenta cuando abro el administrador de tarea. Alguien podrá ayudarme Este es la instrucción para cerrar Private Sub CommandButton8_Click() Dim sino As String sino = MsgBox("Estás seguro de cerrar la Aplicacion?", vbYesNo + vbQuestion, "CONFIRMA") If sino <> vbYes Then Exit Sub MsgBox "Gracias por usar el sistema, hasta la proxima" Application.ScreenUpdating = False Set h = Sheets("Usuarios") u = h.Range("A" & Rows.Count).End(xlUp).…

    • 0

      Reacciones de usuarios

    • 6 respuestas
    • 2.3k visitas
  22. Ciao a tutti, il mio nome è Maurizio E il problema che mi sta facendo impazzire è questo: in un form utente ho inserito una casella di testo1 e un commandbutton1 Ora, lo scopo di questo progetto sarebbe quello di essere in grado di creare almeno 5 caselle di testo (dinamico) sono stato in grado di creare (1) ma non riesco a creare gli altri quattro semplicemente premendo il pulsante. Hai una vaga idea di come questo possa essere fatto. Inoltre, è possibile salvare il testo di ogni "casella di testo" in un file txt separato o meno, la scelta è tua! Alla Deirettory (C:) Grazie per tutto l'aiuto che potete darmi saluti da A.Maurizio ##########…

    • 0

      Reacciones de usuarios

    • 8 respuestas
    • 1.2k visitas
    • 1 seguidor
  23. [TABLE=width: 355] [TR] [TD]0 - 500[/TD] [TD=align: right]0.000231135[/TD] [TD=align: right]12.4%[/TD] [/TR] [TR] [TD]500 - 1000[/TD] [TD=align: right]0.000202582[/TD] [TD=align: right]23.2%[/TD] [/TR] [TR] [TD]1000 - 1500[/TD] [TD=align: right]0.000177557[/TD] [TD=align: right]32.7%[/TD] [/TR] [TR] [TD]1500 - 2000[/TD] [TD=align: right]0.000155623[/TD] [TD=align: right]41.0%[/TD] [/TR] [/TABLE] El valor de la barras es el de la segunda columna y quiero colorearlo basado en la tercera columna. Alguien sabe como hacerlo

    • 0

      Reacciones de usuarios

    • 0 respuestas
    • 929 visitas
  24. Hola a todos, mi nombre es de Y mi nuevo problema es este: Tendría la diversidad de obtener dos listas de artículos en la hoja 1, una en la columna (A) y la otra en la columna (B) Por lo tanto, en la columna (A) puedo escribir "Tabla roja"; "Mesa azul"; "Flor roja"; "Flor azul", etc ...! Ahora lo que me gustaría lograr sería tener la última entrada de color real en color (B) ejemplo si en la columna (A) escribo tabla roja En la columna (B) debe aparecer la palabra (tabla de Roso) pero solo la palabra roja Realmente debería ponerse rojo. eso es todo! Gracias de A.Maurizio Treslation : ############### Hi everyone, my name is de And my new …

    • 0

      Reacciones de usuarios

    • 2 respuestas
    • 813 visitas
    • 1 seguidor
  25. Hola amigos tengo un textbox1 donde quisiera ver si lo que escrito en él, al guardarlo se contatene el formato de una imagen tipo JPG, es decir si escribo Vaso cuando se guarde en la hoja lo haga así Vaso.JPG. estoy usando esto pero no funciona. podrá alguien asesorarme. Sheets(nHoja).Cells(uFinal, 12) = Me.TextBox1 & VBA.Format(.JPG)

    • 0

      Reacciones de usuarios

    • 3 respuestas
    • 844 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.