Buenos dias. Cree una hoja de calculo con bastantes ecuaciones / funciones, botones de comando y un checkbox. Es parecido a un sistema de facturacion donde un boton crea una nueva hoja para un nuevo dia copiando la actual y borrando ciertos datos. El problema es que, casualmente y en operaciones diferentes como abrir otro archivo o al crear una nueva hoja (dia) se redimensionan y se mueven de su lugar los botones de comando y el checkbox haciendose mas pequeños y desplazandose a la izquierda y arriba de la hoja. En ciertas ocasiones, una vez presentado este error, para el siguiente dia (un tercero) se copia bien, otras se copia con el error, y otras se siguen haciendo m…

Buenas tardesa todos Solicito de todos de sus finas atenciones, ya que yo soy nuevo en esto, tengo poca o casi nula experiencia en VBa para Excel y poco a poco estoy creando un programa, ya tengo nos Userform logrados y me falta un tercero, en el cual quisiera extraer la informacion de una base de datos de excel, utilizando un userform y filtrando como si fuera los autofiltros de excel despues tenerlos en un resumen (como fuese) y despues crear ese resumen un pdf para poder mandarlo por pdf. Espero con la breve explicacion que coloque se entienda. Anexo tambien el userform del modulo de consulta que me necesito por favor me ayuden a realizar. Creo con estos datos y s…

Hola, Tengo que crear Frame con OptionButton dentro, como no se la cantidad de Frame que tengo que crear, lo configure con el bucle For "i", el problema es que, al querer crearlos no me deja, me tira un error. este es el codigo: [FONT=Courier New]For n = 1 To i : t = t + 1 : g = g + 1 With Me.Controls.Add("Forms.Frame.1") .Name = "Name" & t: .Name = t .Top = 82.5 + ((n - 1) * 60): .Height = 49.5 .Left = 12: .Width = 246 .Add ("Forms.OptionButton.1") .Name = "Value" & g: .Value = False .Top = 18: .Height = 17.25 .Left = 12: .Width = 57 End With[/FONT] next[/CODE…

Hola, requiero hacer una macro de captura automática en Excel 2007 y 2010, pero no se como lograr que espere en la celda para la entrada de datos y que al momento de dar enter, automáticamente se vaya a la celda de la derecha. Agradezco mucho su ayuda.

Estimados Mi problema es el siguiente, Tengo una planilla de excel con un formulario para ingresar datos, estos se guardan en una fila hacia el lado, usando varias columnas. Estos datos están registrados según un número "orden de taller" (OT). Hay varias OT con cantidad de piezas mayor a 7. Por lo que tendría que ingresar la cantidad de veces, según piezas tenga la OT (los mismos datos). Realize un nuevo número de OT para este problema. N°OT - correlativo - Cantidad de piezas. EJ: N° OT: 45102, Cantidad pieza:3 N°OT: 45102-1-3; 45102-2-3; 45102-3-3. A mi me gustaría ingresar los datos solo una vez en el formulario y que al decir que son “x” cantidad, se genere …

Buenas, me encuentro con el siguiente inconveniente: Tengo un archivo con diferentes hojas, las cuales quiero imprimir en PDF es un orden diferente, por lo cual cree un codigo para ello, donde puedo definir el orden de impresion segun se requiera, y asi mismo, seleccionar el rango de impresion. El problema que cuentro que es quiero que se genere un solo archivo PDF, con el codigo que desarrolle imprime N cantidad de archivos en PDF. Sub Imprimir() Dim Hoja As String Dim Rango As String Dim i As Integer Application.Dialogs(xlDialogPrinterSetup).Show For i = 1 To 5 Hoja = Worksheets("Print").Range("A" & i) Rango = Worksheets("Print").Range("B" & i) Workshe…

Buenas Tardes amigos, Un gran servicio, creen que me puedan ayudar, necesito formatear la columna leída desde la macro a texto, y evitar que los valores 01, 04, 0009 los muestre como 1, 4, 9 he probado con la grabadora de macros y no lo he logrado, sale un error de depuración: adjunto ejemplos, he intentado hasta personalizar los tipos de datos a nivel de celda (@, ####, RRRR, etc. )en la plantilla pero nada, creo que la solución está en hacer referencia a los valores pero no sé cómo. Adjunto ejemplo, crear la carpeta "carpeta" en c:\ y ejecutar la macro. En la prueba ver la columna AJ (cuenta bancaria) Graaaaaciaaaaas !!!!!!! WALTER. CPE_MAESTRO_PER_PERSONAL.txt …

Error de codigo para copiar y pegar de una hoja a otra Bueno días foristas: En anteriores ocasiones me a sido de mucha importancia su ayuda y sus conocimientos por lo que vengo ahora a pedirle auxilio de nuevo. En un archivo de Excel tengo un código en la hoja "PARA SUBIR" que se supone me ayudaría a copiar unos datos de la hoja "CONVERTIR" y las pasaría en formato de texto (sin formulas) a la hoja "PARA SUBIR", pero me esta mostrando un error de procedimiento y no me deja correr la macro. Acá dejo el Código que estoy usando, si alguno de ustedes me puede ayudar estaría eternamente agradecida. Private Sub CommandButton1_Click() Application.ScreenUpdating = False '…

Necesito ayuda con esta macro. Estoy empezando en esto de la programacion vba y no estoy muy ducho. No consigo resolver el error que me da el mensaje. Estoy trabajando con una hoja de excel con la finalidad de exportar datos de una web de empleo americana a excel categorizando ciertas informaciones en dos columnas. La hoja tiene dos módulos. Al ejecutar la macro aparece un mensaje en relación con el modulo 1 donde se dice "error de compilación el procedimiento externo no es valido ". A continuación se subraya en el código la línea Columns("A:D").Select. Aqui adjunto el código de módulo 1 ------------------------- ' Macro1 Macro ' formatting imported data ' ' Col…

Hola de nuevo espero me podais ayudar con esta nueva duda. Para colocar una imagen en un boton de comando en un UserForm, voy a picture elijo la ruta de la imagen y la pongo en el botón, hasta ahi todo bien, mi problema empieza cuando quiero quitar la imagen de ese mismo botón de comando, que no se como hacerlo. Gracias por vuestra atención. Un saludo.

Buenas! Soy bastante novatillo en vba (hace unas 2 semanas que empecé), la idea es que yo tengo una macro hecha que cambia un valor en una base de datos, es decir, tengo un userform, el cual pregunta una serie de datos y si el cambio será temporal o no, al aceptar si los cambios son temporales a las 24 horas la macro debe ejecutar una función para cambiar ese valor, mi duda o problema viene en como hacerlo. Es decir debo dejar ese documento excel abierto siempre? Existe alguna forma por la cual una vez haga los cambios le diga que son temporales y cierre ese archivo, Windows (a traves de tareas programadas o similar), abra ese documento y ejecute la función correspondien…

Hola, Estoy buscando como resolver este tema. Actualmente para importar archivos de texto, estoy utilizando esta macro: https://www.ayudaexcel.com/foro/macros-programacion-vba-10/convertir-varios-archivos-texto-concentrar-sola-hoja-excel-28481/ Mi problema es que necesito que en los archivos de texto, todos tienen la primer fila con los nombres del campo, lo cual no deseo importar más que una sola vez, y por otro lado, necesito poner el nombre del archivo de donde viene ese registro en un campo de cada uno de los registros. Primero estoy importando los archivos a excel, pero despues los importare desde access para manejarlos en una bd. Alguna sugerencia? Saludos !

Estoy trabajando en una macro de forma que me permita extraer de una pagina de ofertas de empleo americana la información de ofertas según el código postal y la zona. Creo que la macro está bien pero cuando intento ejecutarla, nada más empezar, en el módulo 2 me subraya en azul la linea Macro 1 y aparece un aviso diciendo "error de compilación, No se ha definido Sub o Funcioo" He revisado la hoja de excel y no sé donde puedo equivocarme. La macro del módulo 1 es la que tendría que activarse si funcionase bien la macro Aquí tenéis el codigo de programacion del módulo 2. Pongo en rojo la línea donde excel se detiene y aparece el mensaje antes indicado -----------------…

Hola he mirado de ocultar ciertas filas segun la informacion de una celda, pero ahora quiero que al cambiar de valor se vean de nuevo las celdas que no se refieren a la variable o que se vean todas si es un valor diferente a cualquiera declarado. Gracias por su ayuda oculta_celdas.zip

Buenas. Tengo un problema con el separador de miles y decimal en un textbox Poniendo este codigo me muestra correctamente en los label pero en los textbox me salen tanto para el separador de miles como para el decimal un punto "." Por mas vueltas que le doy no consigo que se muestre correcto. Ni con un replace ni con nada. Me.lblImporteTarifa = Format$(Tarifa, "#,0.00") Me.lblImporteNeto = Format$(Neto, "#,0.00") Me.txtDescuento = Format(Tarifa - Neto, "#,0.00")

Hola chic@s! Ante todo muchas gracias por leer este posts. Necesitaba un poco de ayuda en este tema: Lo que quiero es hacer una pequeña macro en la que en un mismo libro con varias pestañas, a través de un control activex poder cortar la fila seleccionada y pasarla a otra hoja en la primera fila vacia. La idea es hacer como un pequeño libro donde por un lado en la primera hoja vea los pedidos nuevos, que al usar el "boton" pasen a la siguiente hoja que sería los preparados y por ultimo otro "boton" para pasarlo a la hoja de entregados a cliente. Espero haberme explicado bien Muchas gracias

Estoy trabajando en una macro de forma que me permita extraer de una pagina de ofertas de empleo americana la información de ofertas según el código postal y la zona. Creo que la macro está bien pero cuando intento ejecutarla, nada más empezar, en el módulo 2 me subraya en azul la linea Macro 1 y aparece un aviso diciendo "error de compilación, No se ha definido Sub o Funcioo" He revisado la hoja de excel y no sé donde puedo equivocarme. Aquí tenéis el codigo de programacion del módulo 2. Pongo en rojo la línea donde creo que está el problema ---------------------------------------- Sub test() Dim eROW As Long Dim ELE As Object Set STH = Sheets("SHEET1") Ro…

Buenas. Vereis quiero realizar una macro que, cuando el usuario clickee el botón de guardar como aparezca en el diálogo un nombre de archivo, a modo de sugerencia, distinto al que posee el propio archivo. He intentado lo siguiente: Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean) Application.Dialogs(xlDialogSaveAs).show ("Nombre sugerido.xlsx") End Sub [/CODE] pero lo que obtengo es que, una vez guardado el archivo, me pide volverlo a guardar y me gustaría evitar eso. También había pensado en, por medio de la macro, guardar el archivo en alguna parte (windows/temp por ejemplo) con el nombre que yo sugiero y luego hacer aparecer …

Un placer saludarlos, estimados foristas. Estoy realizando un proyecto de un kardex y estoy buscando la forma de insertar formulas con una macro, he buscado en el foro y no encuentro algo que se ajuste a mi necesidad. Adjunto un archivo en donde hay una hoja con el nombre de EJEMPLO ahi en las columnas "H" y "N" hay formulas que estan resaltadas en rojo, cada formulas como podran ver se ajustan a los rangos de cada articulo. Tengo mas de mil articulos y necesito aplicar las formulas a cada articulo que son los costos promedios y los saldos de la cantidad. Cada articulo estan separados por dos filas en blanco y establecen rangos propios. En la hoja2 esta la hoja de tr…

Buenas Maestros Tengo una duda eh visto la macro de importación de imagen a excel, pero mi pregunta es si existirá un código donde la Imagen de Macro VBA puede ser importado a IMAGEN (Control ActiveX) ya así sea manejable la imagen en el excel (Manejable en sentido de tamaño), espero su respuesta maestros. gracias. Imagen desde formulario.rar

Hola a Todos, Pues esta vez quisiera hacerles la consulta de como puedo hacer que un TextBox solo Ingrese Numeros con separador de Miles y 2 decimales (Ej. 2,300.00), tal vez sea muy simple pero no se como hacerlo:( Gracias de Antemano. Saludos

Tengo 10 filas en las que quiero agrupar unos 1000 valores en grupos mas o menos uniformes de 100, pero no siempre va ser posible porque a veces un mismo valor se repite supongamos unas 200 veces. Yo tengo una macro para cada fila que es algo como esto los valores alto y bajo dependen si hay mas de 125 y menos de 75, pero si tengo 200 nunca va saltar "bien" y la macro se queda en el mismo punto Sub Porcentajes() Do If Range("af24").Value = "Bajo" Then Range("ao24").Copy Range("u24").PasteSpecial xlPasteValues End If If Range("af24").Value = "Alto" Then Range("an24").Copy Range("u24").PasteSpecial xlPasteValues End If Loop Until Range("af24").Value = "Bien" E…

Hola tengo un problema estoy haciendo un macro para registrar las facturas, el problema es que todavia no lo tengo muy claro con los macros el tema es asi, tengo una factura que despues de imprimir tengo que generar un macro que me copie la informacion a otra hoja. el tema es que tengo varios productos para una sola factura entonces pasa que en una sola filas no queda todos los items sino que queda en maximo 10 filas entonces pasa 2 cosas si grabo el macro no se luego como hacer para que los nuevos datos los grabe abajo de los antiguos si alguien tiene alguna idea gracias dejo lo que tengo grabado en el macro Sub Macro4() ' ' Macro4 Macro ' ' ActiveCell.FormulaR…

Buenas Tardes, Soy nuevo en el foro y tengo una duda ojala me puedan echar la mano a reslver este lio que se me ha presentado o saber si hay solución, Tengo una macro para envío de correos electrónicos , es muy sencilla y me funciona perfectamente, solo que el día de hoy me pidieron que el cuerpo del correo que se esta enviando tenga un formato en algunas palabras que toma de unas celdas, les envío el código y señalo que celdas son las que se necesitan cambiar a negritas en el cuerpo del correo, ojala me puedan ayudar. Muchas gracias de ante mano. Sub enviar() Sheets("Envios_mail").Select ufila = Range("a" & Rows.Count).End(xlUp).Row For i = 1 To ufila If Cell…

Buenos días, al realizar una macro con una tabla dinámica y un grafico dinámico y al segmentar el grafico me sale el error 1004 en la siguiente línea de mi macro: ActiveWorkbook.SlicerCaches.Add(ActiveSheet.PivotTables("Tabla dinámica1"), _ "PER").Slicers.Add ActiveSheet, , "PER", "PER", 9, 57.75, 144, 198.75, ustedes me podrían decir por que?