Como va? acá les comparto un sencillo efecto de desplazamiento de botones dentro de un formulario. Consiste en el deslizamiento de los botones dependiendo de la cercanía del puntero del mouse, funciona a través del evento mousemove del userform. El único problema que estoy teniendo es que el efecto se corta cada vez que el mouse pasa por algún botón o imagen dentro del mismo formulario (lógicamente porque corta el evento que lo dispara). Si alguien conoce alguna manera de conseguir que el efecto continué de manera fluida por todo el formulario les estare eternamente agradecido. Desde ya muchas gracias a todos ya que no lo habría podido conseguir sin el aporte de todos ust…

Buenas tardes Forista Por favor necesito ayuda con macro para poder cruzar bases de datos, para identificar que persona esta repetida en estas. Los campos que se deben de mirar son nombre y numero de identificacion que pueden estar en diferentes filas y a su vez poder organizar los listados sepados en nombres y apellidos. Si es posible que se pueda seleccionar o escoger el archivo asi mismo la fila a buscar y comparar. Muchas gracias, Anexo dos archivos como ejemplo Aprobados.rar YUMBO.rar

Hola a todos, soy primeriza pero me gustaría saber si me pueden ayudar con lo siguiente: Tengo un solo archivo en el que he grabado en hojas diferentes la información correspondiente a la captura de una serie de datos provenientes del movimiento de tierras en una obra, desde numero de conciliación, fecha, placas, tipo de material, etc. Semanalmente concilio estos volúmenes tanto con Sindicato (encargados del cobro del acarreo, es decir los camiones que transportan los materiales) como con los bancos (propietarios de los bancos o minas de donde se extrae el material para la estructura de los caminos), me gustaría saber si hay una manera de conciliar estos volúmenes con un…

Buen dia expertos recurro a ustedes con esta consulta que espero no les quite mucho de su valioso tiempo y en espera me puedan ayudar, y es que requiero que un textbox acepte solo caracteres que yo quiera como en este caso requiero el textbox solo acepte letras mayusculas y minusculas, y los caracteres exceptuados son el guion bajo, el espacio y los dos puntos ":" y tengo el siguiente codigo pero no logro adecuarlo Private Sub Textbox1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger) ' osea Esto es para que el Textbox1 solo acepte números ' If KeyAscii < 48 Or KeyAscii > 57 Then ' KeyAscii = 0 ' End If ' del 32 al 126 son caracteres imprimibles …

Hola a todos: Quisiera su ayuda respecto al tema arriba citado. Soy novato en VBA y de la escuela tengo esta tarea, ya lo he desarrollado con formulario directo del excel que traslada todos los registros a la respectiva tabla. Sin embargo el ejercicio me lo están pidiendo usando UserForm y la verdad no se como entrarle. He subido el archivo para muestra. De antemano muy agradecido por su ayuda!!! Gestión de Inventario de Mercaderías.zip

Buenos días a toda la comunidad de AyudaExcel, soy nuevo en el foro, actualmente trabajo en un proyecto, y me surgió una duda acerca de términos como "Cuentas por cobrar", "Cuentas por pagar", etc. aplicados a una aplicación en excel, tengo una tabla en excel con un botón el cual me calcula los anticipos que dieron los clientes , pero el detalle esta en que hago una suma "acumulativa", es decir si quiero que me calcule los anticipos que dio otro cliente, va a seguir sumando... adjunto el archivo para que se den una idea de lo que estoy haciendo.... si alguien me puede orientar lo agradecería mucho, de antemano muchas gracias.. cuentasporcobrar.rar

Buenas tardes aquí solicitando de su apoyo, alguien me puede corregir de favor tengo los siguientes variables Tengo establecido estos variables para determinar mi última columna puesto que a veces mi base de datos trae 10 columnas y otras veces mas (cantidad variable) hasta aquí parece funcionar 1.- uc = Sheets("Hoja1").Range(Sheets("Hoja1").Range("a8"), Sheets("Hoja1").Range("a8").End(xlToRight)).Columns.Count 2 .-Tengo esto para determinar mi ultima fila referenciando la ultima columna , no se por que pero en otras columnas no puedo usarlos para determinar mi ultima fila ocupada , me imagino que ha de traer caracteres ocultos o de color blanco pero no …

Hola a todos, Tengo un problema con VBA. He creado una macro que me genera un gráfico de tipo Chart (xlLineMarkers). Cuando asigno los valores a los valores del eje X con una variable de tipo array (de string) funciona. Pero cuando quiero asignar los valores del eje y con otra variable de tipo array (de double) me da un error. A qué puede ser debido? Dim bays_arr() as String Dim ratios_arr() as double ReDim bays_arr(1 to 18) 'Los valores son: (R03, R04, R05.......R19, R20) ReDim ratios_arr(1 to 18) ActiveChart.ChartType = xlLineMarkers ActiveChart.SeriesCollection.NewSeries ActiveChart.SeriesCollection(1).Name = "=""Skin""" …

Hola, soy nuevo en el foro y estoy buscando ayuda para crear una macro la cual tome los datos ingresados a las celdas de una hoja y calcule la media, Limite superior, limite inferior y genere una tabla de frecuencias y un histograma, apreciare mucho su ayuda sea cual sea.

Hola amigos, como estan espero que todo bien. Tengo una situación. lo que pretendo hacer, esque desde un archivo txt me convierta a excel y que me ponga la información en cada columna. y al final de cada importe me ponga un total adjunto como esta mi información en txt y como debe de quedar en excel de antemano , muchas gracias. TXT.txt TXT.rar

Buenas tardes colegas. Espero se encuentren bien de salud. En un Proyecto que terminé hace un par de meses me está dando el Error 91 en Tiempo de ejecución... Este Error lo está dando en el FrmRetenciones (cuando se va a Cargar). Dicho Formulario prácticamente lo hizo el profesor Antoni a solicitud de una ayuda de mi parte. Trabajaba perfecto hasta hoy, que traté de hacerle una modificación al Sistema, porque necesito que las cuentas que Agregue al Clasificador General (FrmACuenta) en el Rango de las 460 001 a la 460 007 me las imprima en la HojaBase (E28) y en la Hoja Comprobante1 (A16). Estuve revisando y no me doy cuenta de dónde está el error. Por…

hola quisiera saber si mediante este ejemplo de datos adjuntos en esta hoja excel se puede reemplazar los datos en forma masiva mediante alguna formula por ejemplo: carpeta cualquiera que contiene archivos de fotos enumeradas asi, (101.JPG, 102.jpg, 103.jpg, 105.jpg. etc ) y que mediante una accion se pueda cambiar quede asi 7.991.437-k.jpg en el fondo quiero renombrar una gran cantidad de archivos cambiandole el numero por el rut (numero unico de carne para los chilenos). la esencia de mi consulta es poderle poner el rut a cada foto que se encuentra en una carpeta mediante una formula que me permita llevarme los datos que se encuentra en una hoja excel. gracias por …

Hola buenas. Necesitaria una macro para copiar pegra de una hoja a otra con un criterio. Copiar pegar L:R si en R >0 Salud2.

Hello, My Friends:I have a workbook with several sheets, some of which are going to be printed at once, eighther to a .pdf file or to a paper. Doing so, there are several dialogs that are shown, for example: Dialog PrinterSetup to choose the printer.Dialog Save PDF file as, in the case of a .pdf, to choose where to save the document.Dialog Confirm Save to confirm the operation, of course.Dialog Adobe PDF that shows the addition of sheets to the final document.I am not sure, but only the first one is really an Application.Dialogs, the others are not, at least they do not appear in the VBA list as one.All of the dialogs have a "Cancel" button, to cancel the printing. My cod…

Buenas noches a todos y todas, tengo un formulario muy sencillo con diferentes campos que se activan en cascada. Los dos últimos campos son ListBox que se cargan a partir de unas listas en función de la selección que hemos ido haciendo antes. Me funciona todo bien... el problema que tengo es que se modifica el alto de los cuadros del listbox y quiero que quede fijo, como la he diseñado en el formulario "original". En el caso que las listas ocupen más espacio del tamaño del ListBox, se activan los scrolls tanto vertical como horizontal para que el usuario pueda ver todo el contenido. Al modificar su alto lo que hace es que el ListBox me tape unos botones que nec…

Alguien tiene un ejemplo de como alinear a la derecha una cantidad numerica en una columna de listbox. Gracias de antemano por su ayuda

Buenas tardes. Tengo un ListBox creado con un rango actual seleccionado de RowSource = 'Hoja'!'A1:C20 Dicho rango es una base de datos que irá aumentando en filas, como puedo hacer que dicho rango se adapte a la ultima fila con valores?? Por ejemplo si la ultima es la fila es la 25 que el rango sea 'Hoja'!'A1:C25 y así sucesivamente. Si pongo un rango muy grande me aparecen muchas filas vacias en el ListBox y queria evitarlo. Gracias Esta lista

Hola! Supongamos que tengo la tabla que les adjunto, como hago para crear una macro que me permita crear una cita en el Outlook 3 días antes a la fecha que me figura en E2. ¿Cómo hago también para que se me creen otras citas cada vez que yo ingresando más datos? Gracias!

Hola amigos espero me puedan ayudar, tengo una archivo de excel con macro con el codigo vba protegido con contraseña y con compartir, pero detecte que cuando el usuario usa el administrador de tareas para cerrar a la fuerza el archivo de excel, este se abre como si no le hubiese puesto protección de bloqueo al projecto vba. La opción más adecuada que encontre fue modificar el registro de windows con CMD, en esta web encontre un buen código: using command prompt from VBA Sub x() Dim Par As String Par = "dir c:\ /s/p" Call Shell("C:\WINDOWS\system32\cmd.exe /c " & Par, 1) End Sub yo lo he transformado de la siguiente manera Sub Deshabilitar() Dim…

Tengo un gráfico de dispersión con dos series, cuando quiero cambiar el color de una de ellas lo he realizado de la siguiente manera, pero la cuestión es que no me lo cambia, ¿Alguien sabe cuál es el motivo? ActiveChart.SeriesCollection.NewSeries ActiveChart.SeriesCollection(2).Name = "=""Datos ajustados""" ActiveChart.SeriesCollection(2).XValues = "='Principal'!$A$1:$A$30" ActiveChart.SeriesCollection(2).Values = "='Principal'!$F$1:$F$30" ActiveChart.SeriesCollection(2).Select Saludos y muchísimas gracias.

Hola que tal amigos programadores por favor me podrían ayudar con una macro que me genere un archivo CSV delimitado por comas, la estructura del archivo CSV no deberá llevar encabezado, los datos del archivo CSV serán obtenidos de la hoja “Datos”. En la columna A: deberá tener la clave clues que se toma de la columna B de la hoja Datos En la Columna B: el Código (son 230 codigos que van del rango G1:IB1 de la hoja datos) En la Columna C: el valor almacenado a su correspondiente al código y clues En la Columna D: el número del mes que se obtendrá de la de la columna E de la hoja Datos En la Columna E: el año que se tomará de la columna F de la hoja…

Hola, por favor si pudieran ayudarme, vengo realizando una macro con filtros, pero aun mis conocimientos en VBA son incipientes y no logro avanzar a completar el objetivo total de esta Macro, que es traer a un cuadro principal, las sumatorias en cada recuadro, de acuerdo a la edad, el sexo y el lugar de origen, que previamente se filtraron en otra hoja dentro del mismo archivo. Y por ultimo, en caso figure la denominacion "No hubo casos", para la fecha seleccionada, se debera rellenar con el Cero osea "0", los recuadros restantes. Gracias de antemano, por su noble apoyo. CONSOLIDADO por dia.xlsm

Hola, Tengo una macro para quitar la letra "h", por favor me podrian indicar como puedo hacer para quitar cualquier tipo de letra o caracter que encuentre en el rango de la tabla y solo deje los numeros? Gracias Borar Letra H.xlsm

hola amigos tengo una pregunta que no se porque me causa confusion y espero ustedes me ayuden ¿como puedo hacer para que si una celda esta llena el checkbox esté checkeado y si esta vacia no lo este? gracias y saludos

Hola amigos, buenos dia: Tengo un userform donde doy de alta a los artículos, pero quisiera ver si se puede colocar un control de Imagen donde con un CommandButton se pudiera insertar la imagen en el control Imagen y al dar guardar a la alta la imagen se guarde en la carpeta imagen. Dejo la macro que tengo hasta ahorita para su análisis y apoyo. Private Sub Imagen1_Click() If TextBox1 <> 0 And TextBoxId <> "" Then VerImagen.RenglonImagen = TextBox1 Set VerImagen.ImageAltas.Picture = FormaCodigos.ImagenPrincipal.Picture VerImagen.Top = FormaCodigos.Top VerImagen.Left = FormaCodigos.Left VerImagen.Show End…