James Bond

Prueba con esta macro Sub TOTALIZAR() Set TOTALES = Range("I2").CurrentRegion Set GASTOS = Range("C2").CurrentRegion With TOTALES R = .Rows.Count: C = .Columns.Count Set TOTALES = Range("I3").Resize(R - 2, C) For I = 1 To R GASTO = .Cells(I, 1) If...

El problema es que con ese tamaño debes ajustar también el tamaño de la letra al menos en 4 puntos solo que aquí viene un detalle la letra se ve solo que no vas a distinguir que signo es, necesitas aumentar el zoom de la hoja para ver el signo, esta...

De entrada tienes mal la fórmula si pones 20 esta sera verdadero para todos los valores como 30 y 60 lo tienes que poner en intervalos como en este fórmula si el valor por ejemplo 35, arrojara un valor 2 el cual esta asignado a la empresa mediana...

Este es el resultado de la macro y esta es la macro lo de la doble fórmula con, y von ; si va a ser un problema ya que esta maquina esta diseñada para poner como primera opción ; si la PC tiene un formato diferente colocara la segunda opción, no se...

Lo que pides esta canijo por fórmula o por formato condicional ya que este solo te coloreara la palabra domingo y nada más, para ello te propongo dos macros, esta macro la colocalas en el modulo de la hoja1 de VBA y lo que hace es que en cuanto...

Esta es la macro con el cambio de texto en el botón Private Sub CommandButton1_Click() v = Rows("238:267").EntireRow.Hidden If v Then Rows("238:267").Hidden = False CommandButton1.Caption = "-" Else Rows("238:267").Hidden = True...

No mencionas si vas a usar el botón a través de un formulario o de un botón en la hoja te paso las macros para que tu las anexes al botón, la primera cada que presiones el botón ira haciendo visible la fila partiendo de la A10 antes del 10 y después...

Cancelar la copia a USB, predeterminar a que carpeta se va a guardar la información y que cancele cualquier otra opción, desactivar el cortar y pegar vía teclado y ratón, anular los menús contextuales que traen estas opciones, una vez que terminen de...

Has considerado usar usar =+SUMAR.SI(A1:A30,"enero",B1:B30)+SUMAR.SI(A1:A30,"febrero",B1:B30)

Esta instrucción a partir de la celda b2 crea una región de datos hacia arriba, hacia abajo, izquierda y derecha se detendrá hasta donde encuentre una fila o columna vacía Worksheets("hoja1").Range("b12").CurrentRegion.Name = "pendientes" Y si...