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

    Ya realice un codigo en donde ya manda el correo y manda un rango de celdas pero necesito que ese mismo archivo de donde saco el rango de celdas se adjunte en el correo. Espero me puedan ayudar ya que llevo casi 2 dias intentandolo. rivate Sub Si_Click() Dim NSession As Object Dim NDatabase As Object Dim NUIWorkSpace As Object Dim NDoc As Object Dim NUIdoc As Object Dim quienes(0) As Variant Set NSession = CreateObject("Notes.NotesSession") Set NUIWorkSpace = CreateObject("Notes.NotesUIWorkspace") Set NDatabase = NSession.GetDatabase("", "") If Not NDatabase.IsOpen Then NDatabase.OPENMAIL End If …

    • 0

      Reacciones de usuarios

    • 1 respuesta
    • 869 visitas
  2. Started by campi,

    Hola , Quiero hacer una macro para solucionar el siguiente problema. Tengo un archivo con varios datos en 3 columnas name, amount y quality. Quiero poner una 4a columna con el numero de cuenta. Adjunto el archivo. la idea es agregar la columna D con una macro. muchas gracias. Account # : 6BQ10987 name amount quality 6BQ10987 lorena 1234 good 6BQ10987 patricio 9876 normal 6BQ10987 camilo 7654 bad 6BQ10987 Account # : 6BQ10787 name amount quality 6BQ10787 andrea 765 good 6BQ10787 javier 9879 normal 6BQ10787 francisco 34…

    • 0

      Reacciones de usuarios

    • 3 respuestas
    • 2.6k visitas
  3. Buenas tardes a todos.. MI duda ahora es. como poder agregar columnas con un macro, después de un texto en una celda adjunto la hoja donde esta lo que se quiere hacer y lo el original es agregar 2 columnas en blanco o mas dependiendo después de la celda con contenido "Total" agradezco desde ya el tiempo dedicado.. Ayuda.xls

    • 0

      Reacciones de usuarios

    • 4 respuestas
    • 1.3k visitas
  4. Buenas tardes, no tengo ni idea de como hacerlo, si pudieran hecharme un cable, se lo agradeceria mucho. Factura Prueba.rar

    • 0

      Reacciones de usuarios

    • 0 respuestas
    • 557 visitas
  5. Started by rapo12,

    Hola Quisiera de su apoyo!! Resulta que tengo un filtr que busca entre fechas eso lo tengo pero quisiera agregar mas criterios para la filtracion los criterios se sacarian de la columna F que son nombres para luego copiarlos en la hoja2.. Ej Presiono el boton que esta en la hoja1 aparece el userform y selecciono fechas en los dos combobox ese filtro deja los datos en la hoja2 pero me gustaria agregar mas criterios para el filtro que aparte de la fecha sea tambien con la columna F de la hoja1 .. Busco las fechas y solo me filtre los que sean con nombre Hola1 y hola2 de la columna F de la hoja1... Por favor gracias Agregar criterios de busqueda.zip

    • 0

      Reacciones de usuarios

    • 1 respuesta
    • 795 visitas
  6. Started by roa30,

    Hola a todos, estoy nuevamente trabada en algo que pareciera facil pero me ha estado complicando la vida absoluta... tengo el siguiente codigo, que lo que DEBERIA HACER, es por cada celda que este vacia "celda.Offset(0, 36)= empty" me ejecute = hD.Cells(ufo, 36) = celda.Offset(0, 4) + celda.Offset(0, 5). Lo unico que LOGRE es que me haga esa funcion en la ultima fila... no se como hacerlo para cada celda vacia ?. Porque la idea es que la hoja se va a ir cargando con nuevos valores, y las celdas que estan vacias significa que aun no hice el proceso fechaJuliana...Perdonen mi igorancia total pero probe varias formulas. y la unica que me ha funcionado parcial…

    • 0

      Reacciones de usuarios

    • 4 respuestas
    • 634 visitas
  7. Started by EdgarLora,

    Esta es la macro que agrege para insertar una fila y agrega el valor de un combobox, pero como ago que mi valor acepte valores alfanumericos, Selecciona propuesta.xls

    • 0

      Reacciones de usuarios

    • 1 respuesta
    • 1k visitas
  8. hola buen dia. quisiera ayuda en este proyecto para guardar datos en rangos diferentes de celdas y que al guardar los coloque al inicio de la base datos y no al ultimo como lo hace ahora esta es la macro Sub GUARDAR_DATOS() Dim NombreHoja As String Dim HojaDestino As Range Dim NuevaFila As Integer Dim FilasFactura As Integer Dim i As Integer …

    • 0

      Reacciones de usuarios

    • 2 respuestas
    • 1.1k visitas
  9. Started by 6luishao6,

    Buenas nuevamente por este lugar, tengo un problema en la programación de VBS de Excel; el problema es el siguiente: Tengo 6 hojas: EV1_1 (1er trimestre) EV1_2 (2do trimestre) EV1_3 (3er trimestre) --------------------------------- OBS1_1 (1er trimestre) OBS1_2 (2do trimestre) OBS1_3 (3er trimestre) Al momento de registrar observaciones en la hoja EV1_1 buscándolo con el número de la lista automáticamente me captura el nombre del estudiante tendría que agregarse en la hoja OBS1_1, las observaciones que escribí en EV1_1 con el número que tiene el estudiante en la lista, la fecha de registro y el nombre más, cada que registre se …

    • 0

      Reacciones de usuarios

    • 18 respuestas
    • 1.3k visitas
    • 2 seguidores
  10. Llevo varios días leyendo preguntas y respuestas en estos foros sobre macros y he visto que ayudas mucho y por lo tanto te hacen muchas preguntas, nunca creí que tendría yo el honor de que me contestaras a alguna pregunta, muchas gracias me ha ayudado bastante. Soy nuevo en el foro, he estado buscando dentro del foro e indagando pero hasta ahora no logro solucionar la traba que tengo. mi problema es el siguiente: En una hoja de excel un boto abre un formulario para pedir datos de equipo y herramientas a prestar, ese mismo formulario tiene otro boton que abre otro formulario con listbox mostrando, la clave del equipo, otro la descripcion, y otro la disponibilidad, quisie…

    • 0

      Reacciones de usuarios

    • 2 respuestas
    • 1.9k visitas
  11. Buenas a todo el foro. En una macro para enviar correos mediante outlook como esta. With OutMail .To = "[email protected]" '.To = "[email protected]" .CC = "" .BCC = "" .Subject = "Correo de prueba" .Body = "" En el rango J2:J20 tengo correos diferentes y aplicando un filtro, me gustaria agregar a CC los correo/s que resulten en ese rango del filtro aplicado, no se si me explico. Gracias por adelantado ejemplo.xlsm

    • 0

      Reacciones de usuarios

    • 3 respuestas
    • 526 visitas
    • 2 seguidores
  12. Started by aprendiz,

    buenas estoy intentando sacar el total a un resultado filtrado, tengo una base de datos en una hoja y desde otra hoja filtro los datos obteniendo los resultados, lo que quisiera saber si se puede hacer que en la ultima linea del resultado del filtro salgan los totales de hora salario etc, com se puede hacer eso? por ejemplo me salieron tres filas del resultado del filtro al final me salga el total y una linea encima de un nombre cualquiera que fue previamente seleccionado al hacer el filtro para firmar - - - -hora - salario - - - -5 - - - - 1000 - - - -4 - - - - 1200 - - - -7 - - - - 700 --------------------- total 16 - - - - 2900 - - - - - __________ - - - - - …

    • 0

      Reacciones de usuarios

    • 2 respuestas
    • 750 visitas
  13. Hola a tod@s En el siguiente código lee información del archivo "ConsultaSQL.txt": Sub opentxt() Dim fileName As String, textData As String, textRow As String, fileNo As Integer Dim CodCliente As String fileName = "C:\Users\PC\Usuario\ConsultaSQL.txt" fileNo = FreeFile CodCliente = UserForm.TextBox1.Value Open fileName For Input As #fileNo Do While Not EOF(fileNo) Line Input #fileNo, textRow textData = textData & textRow Loop Close #fileNo End Sub Sin embargo, necesito que mediante un Textbox ingresar el código del cliente y este insertarse en la SQL que se encuentra en el archivo .txt para que haga el filtro correspondiente. El objetivo …

    • 0

      Reacciones de usuarios

    • 4 respuestas
    • 1.1k visitas
  14. Started by juan Ignacio,

    Estimados, Junto con saludar y esperando que se encuentren bien, tengo el siguiente problema, necesito traer el código que se encuentra en la columna C9 a la B9 con la extensión (Dos últimos caracteres) que se encuentra en la columna V9 siempre y cuando cumpla las condiciones que se encuentran en las columnas W9 - X9 - Y9. Adjunto archivo para su revisión donde hay una formula pero algo le falta para que cumpla las condiciones. Gracias por todo !! Juan Ignacio. CONDICION_PAYER (2).xlsx

    • 0

      Reacciones de usuarios

    • 9 respuestas
    • 1.6k visitas
    • 1 seguidor
  15. Tengo una duda de, como podria hacer para agregar una linea nueva, con ciertas celdas con formato. Por ejemplo Cuando se agrega una fila nueva, teniendo en cuenta que en A revise cual es el ultimo valor agregado a la cotizacion y ahi se agregra una fila por ejemplo en 3,A bordes y negrita; en 3,B bordes; y en 3,C bordes, luego en d ,e ,f .. nada la finalidad es para agregar un item en una cotizacion, y tenidneo cuenta que en la 3,C debe de multiplicar b*precio; b = cantidad A B C D ... 1 2 3 4 . . .

    • 0

      Reacciones de usuarios

    • 0 respuestas
    • 922 visitas
  16. Como puede hacer para que al mismo tiempo de agregar una fila me copie las formulas de la celda superior. Saludos Selecciona propuesta.xls

    • 0

      Reacciones de usuarios

    • 2 respuestas
    • 896 visitas
  17. Hola tengo un excel con muchos datos (adjunto un ej más reducido) en el que tengo una columna "numeros" y cada número contiene una serie de datos, me gustaría entonces realizar una macros en la que pueda insertar esta serie de datos debajo o al lado de cada numero, pude insertar filas debajo de cada dato, pero no logro copiar los datos que me corresponden, quizás con el excel se entienda mejor. Libro2.xlsx

    • 0

      Reacciones de usuarios

    • 1 respuesta
    • 569 visitas
    • 1 seguidor
  18. Started by smart27,

    Buenas noches!! Escribo buscado ayuda, tengo una lista en donde en una columna tengo descripcion del producto y e la otra la temperatura. lo que pntend hacer esque cuando escribo la temperatura del producto escriba automaticamente "°C" es decir si yo escribo 20 aparesca 20°C anexo archivo Gracias!!! formato.xlsm

    • 0

      Reacciones de usuarios

    • 2 respuestas
    • 1.1k visitas
  19. Started by AngelaMar,

    Hola, Tengo el siguiente código para copiar varias hojas y pegarlas a otro libro, el libro Peajes tiene 58 hojas y quiero copiar todas la hojas en el libro Peajes Nuevos, con el nombre de hoja igualito. Pero no se como hacer lo que quiero en forma dinámica que me cree las hojas con el nombre y que me copie la información. En el List Box esta el nombre de la hoja. Mi libro peajes lo estoy bajando de esta pagina Portal INVÍAS - Colombia se llama Listado Tarifas peajes [/hr]With Workbooks("Peajes.xls") For i = 0 To ListBox1.ListCount - 1 If ListBox1.Selected(i) = True Then With .Sheets(ListBox1.List(i)) .Range("A2:J" & .[…

    • 0

      Reacciones de usuarios

    • 0 respuestas
    • 728 visitas
  20. Started by jotaeme,

    Estimada(o) Junto con saluda y quizás sea básico para algunos, no logro agregar una hoja al final de la última que exista, estoy escribiendo .... actual ---> variable string que contiene el texto con el cual se nombrará la nueva hoja Worksheets.Add(after:=Worksheets(Worksheets.Count)).Name = actual .... error 1004---me indica gracias de antemano

    • 0

      Reacciones de usuarios

    • 2 respuestas
    • 617 visitas
  21. Buen día estimados Encontré un cronograma de visitas que me es de mucha utilidad, pero tengo el problema que tiene el horario solamente hasta las 13 Hs y lo necesito con mas horarios. Me podrán ayudar? Adjunto el archivo y le coloque una hoja nueva para que vean en color naranja los horarios que necesito agregar y que me funcione como esta originalmente pero con mas horarios. Cualquier duda me consultan. Saludos! Cronograma de visitas.rar

    • 0

      Reacciones de usuarios

    • 2 respuestas
    • 1k visitas
  22. Started by Chukonaso,

    Estimados: Espero esten todos muy bien, les comento que eh desarrollado una pequeña base de datos y eh copiado un poco tambien, quiero saber como puedo ingresar una imagen a un userfrom que este asociada a un codigo, osea si yo quiero buscar al codigo 5 y me aparecen todos los datos y tambien quiero que aparesca la foto del 5 en ese userfrom y tambien que sea de un tamaño estandar. favor ayudadme y os agradecere atento a sus comentarios Chukonaso Base De Datos.rar

    • 0

      Reacciones de usuarios

    • 4 respuestas
    • 1.3k visitas
  23. Hola muy buenas, quisiera consultarles si es posible agregar o mostrar y ocultar una imagen (hoja destacado(horizontal) image.png dependiendo si es que existe un valor (columna múltiplo, hoja base(horizontal)) la idea es que la imagen solo se muestre si existe un valor en el campo múltiplo. cualquier sugerencia se agradece de antemano. PUBLICIDAD_CUGAT(horizontal).xlsm

    • 0

      Reacciones de usuarios

    • 2 respuestas
    • 426 visitas
    • 2 seguidores
  24. Started by Benjamin007,

    Hola, Recientemente estoy en esto de las macros, y me gustaría particularmente ayuda para un trabajito que tengo por ahí, en el cual es: Crear un botón, donde al precionarlo, pueda agregar las calificaciones de una persona (permitiendo únicamente numeros cerrados del 5 al 1o) y que cuando quiera agregar las calificaciones de otra persona, automáticamente se coloque la información debajo de la anterior persona. A ver si me pueden ayudar, les dejo mi archivo del avance que llevo. Libro1.xls

    • 0

      Reacciones de usuarios

    • 1 respuesta
    • 639 visitas
  25. 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
    • 837 visitas
    • 1 seguidor

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.