Luis Mondelo

Te mando mi solución con estas dos macros, una para cada textbox1 y 2 Con estas macros ya no es necesario pulsar ningún botón. Private Sub TextBox1_AfterUpdate() If TextBox1.Value <> "" And TextBox2.Value <> "" Then If CDbl(TextBox1.Value) >...

Utiliza esta macro al pulsar un botón Private Sub CommandButton1_Click() TextBox1.Value = Application.WorksheetFunction.RandBetween(1, 50) End Sub no olvides finalizar la consulta

En el siguiente enlace te dejo un ejemplo ya construido http://es.tbox.ws/2BE67I No olvides finalizar la consulta

Te mando mi solución: -Partimos de la base que los dos archivos están abiertos. -Esta macro tiene que estar copiada dentro del archivo1. -El nombre del archivo2 tiene que estar entre comillas y con su extensión. En este ejemplo yo lo he llamado...

Utiliza esta rutina: Sub solucion() 'por luismondelo For Each hoja In ActiveWorkbook.Sheets hoja.Select ActiveWindow.DisplayHeadings = False Next End Sub

Te mando un ejemplo de como se haría. Sub ejemplo() 'por luismondelo Range("c5").Formula = "=average(f4:f" & Range("f65000").End(xlUp).Row & ")" End Sub recuerda finalizar la consulta

Te mando la solución y supongo que estás trabajando dentro de un form -Tenemos 3 textbox y un botón: Textbox1 es la base imponible Textbox2 es el porcentaje de iva Textbox3 es el importe del iva Al pulsar el botón nos realizará el calculo Private Sub...

Te mando mi solución y sigue mis pasos en este ejemplo: Me voy a suponer que tenemos las fechas grabadas en la columna B desde B2 hacia abajo (en B1 tenemos el encabezado). En la columna C tenemos los importes desde C2 hacia abajo (en C1 tenemos el...

Te mando la solución. Posiciónate en la primera fecha de esa columna y ejecuta esta macro: Esta macro revisará todas las fechas y cuando coincida con la fecha del día sumará el valor que tiene a la derecha. Sub fecha() 'Por Luismondelo Do While...

Te mando mi solución, sigue mis instrucciones: Selecciona con el ratón el rango de celdas de las columnas A y B (en este caso hubiera sido seleccionar el rango A1:B2 pero puede ser más grande). Seguidamente ejecuta esta macro y todo listo! Sub...