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 Klever Duran,

    Buenas tardes Les pido de favor me ayuden con este asunto. Tengo un formulario de busqueda de datos de proveedores que devuelve los datos del proveedor de acuerdo al dato seleccionado. El problema es que cuando se ingresa un dato que no consta en la base de datos sale error en ejecución. Hay alguna manera de escribir el dato sin que salga este error? o que al salir el error se ejecute una macro que ingrese el nuevo proveedor?. Les agradezco por su atención. Adjunto ejemplo. BUSQ.zip

    • 0

      Reacciones de usuarios

    • 5 respuestas
    • 691 visitas
  2. Started by jues,

    Saludos amigos espero estén bien Estoy intentando hacer un formulario que me convierta unidades de masa sin embargo en el mejor de los casos solo he podido lograr la conversión de una unidad a la vez en los TextBox 1, 3, 5, 7, 9, 11 y 13 y cuando lo logro el resultado que se copia en la celda no se corresponde con el obtenido originalmente en el Textbox del Formulario (frmconv) ejemplo al convertir 1900 Kg a Lb el resultado en el TextBox1 =4188,78298142 sin embargo al guardar el resultado lo que se copia en la Celda "F11" es 418.878.298.142,00, adicionalmente el resultado de la conversión no se visualiza inmediatamente por lo que debo de hacer click en los TextB…

    • 0

      Reacciones de usuarios

    • 5 respuestas
    • 1.1k visitas
    • 2 seguidores
  3. Started by akukso,

    Muy buenos dias estoy intentanto realizar un excel que me permita copiar aquel rango de celdas seleccionado con el mouse. No establecidas previamente como ej: A1:K5, Sino seleccionar el rango que yo deseo. En el archivo adjunto quiero marcar con el mouse las alertas verdes y luego con la macro copiarlas y enviarlas por correo. Alertas de Servicio2013.rar

    • 0

      Reacciones de usuarios

    • 5 respuestas
    • 882 visitas
  4. Started by juanchot81,

    Hola a todos, gracias por tomarse la molestia de leer mi caso. La cuestion es la siguiente, intento hacer la siguiente validacion: If Range("W" & i & ":AP" & i).Value = Range("A" & j & ":T" & j).Value Then Range("A" & j & ":T" & j).Select Selection.Interior.ColorIndex = 3 ' Color fondo Exit For End If[/CODE] pero me marca el siguiente error: "Se ha producido un error '13' en tiempo de ejecucion: No coinciden los tipos", me podrian decir cual es mi error!!! Gracias anticipadas!!!

    • 0

      Reacciones de usuarios

    • 5 respuestas
    • 2.6k visitas
  5. Started by nixonlyo,

    Este simple problema, al parecer, me ha vuelto loco jajaja la cosa es esta tengo en excel una hoja con 4 columnas A -------- B -------- C -------- D MOTOR -- BOMBA -- INYECTOR MOTOR --CARTER FRENOS --BANDAS FRENOS --VALVULA --RACOR --TORNILLO FRENOS --VALVULA -- SIS. T CAJA --CONJ. VAL CAJA -- DISCOS tengo un userform con 4 combobox Combobox1 Combobox2 Combobox3 Combobox4 Lo que necesito es que al elegir, por ejemplo, en el combobox1 FRENOS, en el combobox2 muestre "BANDAS Y VALVULA" y si elijo "VALVULA" del combobox2 muestre en el combobox3 "RACOR Y SIS. T" y el mismo proceso para el combobox4 No he dado aun con la form…

    • 0

      Reacciones de usuarios

    • 5 respuestas
    • 762 visitas
  6. Buenas noches señores AyudaExcel Espero que alguien con conocimientos en programación Vba me pueda ayudar. Paso el siguiente código en vba en word para habilitar automaticamente cuando ejecuto la macro un complemento de plantilla llamado "PlantillaEmailLotus.dotm" Sub Plantilla() ' ' Plantilla Macro AddIns( _ "D:\local\My Documents\Importar a Lotus Notas\LOTUS CORRESPONDENCIA\Add in\PlantillaEmailLotus.dotm" _ ).Installed = True With ActiveDocument .UpdateStylesOnOpen = False .AttachedTemplate = "Normal" .XMLSchemaReferences.AutomaticValidation = True .XMLSchemaReferences.AllowSaveAsXMLWithoutVal…

    • 0

      Reacciones de usuarios

    • 5 respuestas
    • 5.7k visitas
  7. Started by rhg_83,

    hola amigos del foro, estoy realizando una macro en donde tengo un formulario con un combobox y me carga en un listbox los datos, cada vez que selecciono alguna opcion en el combobox me habre un archivo y asi susesivamente. pero el detalle es que me quedan los libros abiertos cada vez que selecciono en el combobox. la pregunta seria como puedo hacer para que al seleccionar en el combobox cierre el libro que tengo actual y me abra el otro y pueda estar cargando en el listbox?? anexo el codigo que tengo actualemnte sub nombre ckick() 'indicar para habilitar la hoja nombre Workbooks.Open Filename:=ThisWorkbook.Path & "\Nuevo_Usuario\" & nombre & ".xlsx" …

    • 0

      Reacciones de usuarios

    • 5 respuestas
    • 1.5k visitas
  8. Estimados: Estos datos salen de una tabla dinamica (por cuestiones de peso del archivo, he pegado los datos como valores). Los mismos son extraidos de una tabla de mas o menos 15000 registros, donde cada valor de la columna A puede tener varios registros en la columna B, sin duplicar los de la columna B, pero si los de la A. Lo que necesito hacer es lo siguiente: Extraer de todos estos datos, los que cumplan con ciertos criterios, verificando otros criterios. Es decir: necesitaria que el sistema verifique todos los registros que sean NN. Siendo NN = Verdadero, que seleccione aquellos registros de la columna A, la columna E, la mas alta, y el valor de la column…

    • 0

      Reacciones de usuarios

    • 5 respuestas
    • 2.2k visitas
  9. Started by Torpedo63,

    Quiero copiar un rango de una hoja y pegarlo en otra, todo va bien hasta la instruccion paste, que da "error en el método paste de la clase Woksheet". Alguien me puede ayudar? Gracias. Sub CargaCCH2() Dim dia1 As Date Dim dia2 As Date dia1 = #1/2/2013# dia2 = #1/3/2013# Worksheets("CHT").Select uf = Range("a1000000").End(xlUp).Row Set busco = ActiveSheet.Range("a1", "a" & uf).Find(dia1) fi = busco.Row Set busco = ActiveSheet.Range("a1", "a" & uf).Find(dia2) ff = busco.Row ff = ff + 23 Range("a" & fi, "d" & ff).Copy Worksheets("CH").Activate uf2 = Range("a1000000").End(xlUp).Row Range("a1", "d" & uf2).ClearContents Cells(1, 1).Select …

    • 0

      Reacciones de usuarios

    • 5 respuestas
    • 1.7k visitas
  10. Started by versaka21,

    Hola a todos, Tengo un archivo en .xlsx y me han encomendado convertirlo a XML a través de una macro, nunca se me había presentado algo parecido por lo que recién estoy investigando el tema. Actualmente tengo un ejemplo de como es un archivo .xlsx y su correspondiente XML, lo que me dicen es que el proceso tardan demasiado en hacerlo "manualmente" y quieren automatizarlo. Tengo alguna idea por lógica de programación de como hacer el proceso mas no tengo nada concreto aún. El archivo .xlsx que dejo aquí contiene una parte del archivo real, solo necesito saber como hacer esa parte para adelantar lo demás; las etiquetas tienen unas especificaciones, por lo cua…

    • 0

      Reacciones de usuarios

    • 5 respuestas
    • 1.3k visitas
  11. Started by lphant,

    Buenas tardes; Estoy intentando sacar por vba la fecha de captura o la fecha que aparece en un explorador ( Windows ) de unas fotos pero no lo consigo. Los datos que saco son: La fecha de creación. ( .DateCreated ) La fecha de modificación. ( .DateLastModified. ) La fecha del ultimo acceso. ( DateLastAccessed ) y ninguna de esas fechas es ( adjunto pantallazo en el Excel adjunto de las fechas que salen en el explorador ). alguien sabe como lo puedo sacar??. muchísimas gracias. Libro2.xlsx

    • 0

      Reacciones de usuarios

    • 5 respuestas
    • 3.3k visitas
  12. Started by RubenDario,

    Buenas tardes a todos: No se puede trabajar con rangos protegidos y otros no (editables) en las tablas. (O quizás desconozca la forma de hacerlo). Me han dicho en el foro que con las tablas la única forma de hacerlo es a través de VBA. Y por supuesto recibí con satisfacción la forma de hacerlo. Sin embargo se trataba de una tabla sencilla con apenas 5 columnas. Ahora tengo que hacerlo con una tabla de entre 20 y más columnas y se me complica mucho con el condicional IF y todos los operadores lógicos que hay que escribir. ¿Existe otra forma de hacerlo y que además evite la lentitud que crea tantos operadores lógicos? Muchas gracias Rubén …

    • 0

      Reacciones de usuarios

    • 5 respuestas
    • 1.4k visitas
    • 1 seguidor
  13. Started by alexanderch,

    Hola buenas tardes La presente es para solicitar de su ayuda en el siguiente trabajo necesito hacer un reporte presupuesto en el cual tengo desde enero hasta diciembre , en la hoja "Presupuesto" es en donde se va a realizar el resumen de las hojas antes mencionada, donde cada hoja seria una columna, en cada hoja de los meses hay una columnas que se llaman Localidad y Unidad además que me lo debe de transformar según unas cuentas que están en la hoja de "Descripción Cuentas" Ejemplo la unidad GCIA.DE RECURSOS HUMANOS de la localidad de CCS me la cambie por AT010604 , en descripción va el nombre de los conceptos que están desde la columna "G" hasta la "AL" que se encue…

    • 0

      Reacciones de usuarios

    • 5 respuestas
    • 687 visitas
    • 1 seguidor
  14. En el archivo que envío, son cuentas que llevo de una banco, en ellas llevo diferentes obras. Lo que deseo es crear un macro que copie una rango de celdas, con una condición que verifique en la columna "J" si dice EBYSA, entonces que copie el rango de celdas. Por ejemplo: si encuentra en la columna J, EBYSA entonces copia la fila pero desde la columna A hasta la columna G de la misma fila que encuentra EBYSA, y ponerlo en una nueva hoja que se llame EBYSA. Y esto seria repetitivo con los diferentes datos que tengo.(CK, EBYSA, QRO, TORIB, PRESTAMO, PTEKIMB., PEDESA, SHAP) - Ademas que cada vez que ejecuto la macro se limpie la hoja donde se pegan las celdas. (Esto me s…

    • 0

      Reacciones de usuarios

    • 5 respuestas
    • 1.8k visitas
  15. Started by MACA,

    estimados amigos me podrían apoyar con crear macros que mé, al capturar en la primera pagina al dar anexar actualizara la pagina gdo 1, dependiendo de la fecha de captura y del bloque que este trabajando. agradesco, su apoyo, inserto el archivo. calificaciones dd.xls

    • 0

      Reacciones de usuarios

    • 5 respuestas
    • 1.7k visitas
  16. Buenas Noches Los Master del Excel, por favor su gran ayuda nuevamente para filtrar con 2 Combobox dentro de un listbox primer combobox filtra por Herrammienta ( esta ok) y el segundo combobox debiera firtrar por MARCA que es lo que me estaria faltando " por favor me pueden ayudar con esto? desde ya muy agradecido atte Meduvilla existencias ayuda Excel 1.xlsm

    • 0

      Reacciones de usuarios

    • 5 respuestas
    • 1.3k visitas
  17. Buenos dias expertos: Solicitando su apoyo para poder resolver mi problema, el cual explico brevemente a continuacion Tengo una relacion de pagos y una relacion de facturas la cuastion es que cada factura se conforma de varios pagos y necesito identificarlos. Armando Montes subio un archivo para apoyar a otro usuario que funciona pero esta limitado a pocas lineas y yo requiero muchas mas, mucho agradecere la ayuda que me puedan prestar. Incluyo archivo con un ejemplo de los datos que tengo y el link del tema anterior Pendiente - Macro borra aleatoriamente segun varios criterios: selección columna, valores y sumatorio de otra co | Ayuda Excel Armando Montes comento que …

    • 0

      Reacciones de usuarios

    • 5 respuestas
    • 941 visitas
  18. Started by JoaoM,

    Tengo un ListBox con datos, los datos son numéricos con signo moneda Bs 1.234,56 Quiero al dar clic en una determinada línea del ListBox pasar esos datos al TextBox y que también quede en este ultimo con signo moneda también, tal como está e el listBox algún experto me puede suministrar dicha línea o líneas? Gracias

    • 0

      Reacciones de usuarios

    • 5 respuestas
    • 1.3k visitas
  19. Hola gente del foro AyudaExcel Escribo este post para solicitar su apoyo con la adaptación de este código VBA, Trasfondo: Excel tiene la funcion incorporada de filtrar dentro de una tabla o rango de datos por el valor de la celda seleccionada. El problema es que esto solo es posible para una sola celda seleccionada. La idea es conseguir la misma funcionalidad de filtro pero tomando como parámetro mas de una celda. Adjunto lo que tengo al día de hoy. Este codigo VBA puede filtrar por varias celdas en diferentes columnas pero al mismo nivel de fila: El VBA filtra por ejemplo por "A1:C1" los valores que aparezcan en estas filas son los que se utilizan par…

    • 0

      Reacciones de usuarios

    • 5 respuestas
    • 7k visitas
  20. buenas noches consejeros de macros vuelvo a necesitar ayuda, es posible cargar un formulario con listbox con datos de una hoja oculta he estado buscando pero no encuentro el código de antemano muchas gracias por la ayuda PRUEBA4.1.xlsm

    • 0

      Reacciones de usuarios

    • 5 respuestas
    • 1.6k visitas
  21. Started by linacg96,

    Hola! Necesito por favor de su ayuda. No se de programación pero he intentado guiarme de una macro que creó un conocido para aplicárselo a un archivo que tengo. El tema es que la macro me funciona bien hasta copiar el libro de Excel y crear uno nuevo pero no he podido hacer que se guarde con el nombre de la ruta de archivo. Agradecería me ayuden. Esta es la macro usada, adjunto archivo. Sub control2558() Application.ScreenUpdating = False Dim I As Integer I = 4 While Hoja10.Cells(I, 102) <> "" Hoja10.Cells(6, 82) = Hoja10.Cells(I, 102) Dim NombreArchivo, RutaArchivo As String …

    • 0

      Reacciones de usuarios

    • 5 respuestas
    • 529 visitas
    • 2 seguidores
  22. Started by Victor Villalobos,

    Buenos Días Necesito ayuda con una macro que utiliza un Userform y necesito crear un combox dependiente de otro. Es decir que si en uno selecciono Mercadeo en el otro me indiquen las opciones de Mercadeo Gracias No me deja subir el archivo con la extensiòn .xlsm

    • 0

      Reacciones de usuarios

    • 5 respuestas
    • 964 visitas
  23. Hola: No soy muy experto en Excel, y estoy volviéndome loco para intentanr generar un archivo .txt de una de las hojas de un libro. Lo que intento hacer es lo siguiente: Ejecutar la macro al pulsar le Botón de la primera página (Generar Archivo para Baan), es decir que solo con pulsar se genere el .txt. Generar un archivo .txt que contenga los campos de una página concreta (en mi caso BAAN), pero separados por |. Ejemplo: TH317115R01|150|1|A1120122|170119|0|0.00 En la página de la que quiero generar el .txt tengo formulas condicionales en las celdas, pero en archivo de salida me gustaría sacar solo las que estén rellenas con valor (es decir hayan c…

    • 0

      Reacciones de usuarios

    • 5 respuestas
    • 5.9k visitas
  24. Started by manuelillo,

    Tengo una hoja que copie de este foro sobre contabilidad casera, la estoy adaptando para mi casa, pero el combobox no sale lo que quiero, cuándo le doy al botón asiento , sale el formulario, pero no se queda lo que escribo en las celdas que le digo,el caso es que si selecciona la celda pero no escribe. Supongo que viendo el archivo será mejor. Este es código : Private Sub UserForm_Click() Private Sub aceptar1_Click() If Not IsNumeric(TextBox2) Then MsgBox "EEEhhhh!!!!. En el apartado Cantidad debe indicar sólo números", vbOKOnly Or vbCritical Else Hide End If End Sub Private Sub Cancelar1_Click() Hide End Sub Private Sub gasto1_Initialize(…

    • 0

      Reacciones de usuarios

    • 5 respuestas
    • 1.2k visitas
  25. Started by Johan.rico,

    Buenas tardes amigos, los felicito x tan excelente foro. Necesito con caracter de urgencia la ayuda de ustedes, requiero una macro que se ejecute de acuerdo a algunas condiciones, en un rango de celdas si agrego en una celda la letra P se ejecute la macro 1, si escribo una letra R en cualquier celda del rango, se ejecute la macro 2, y si escribo una I, se ejecute la macro 3. Muchas gracias de ante mano.

    • 0

      Reacciones de usuarios

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