jrgces

No parece necesario recurrir a macros. Para sumar la columna completa de "hoja1" se puede usar la fórmula: =SUMA(hoja1!F:F) y para saber el número de celdas: =CONTAR(hoja1!F:F)

Por ejemplo, si los nombres de las ciudades están en A1:A10 y los valores en B1:B10, la fórmula podría ser: =PROMEDIO.SI(A1:A10;"Bogotá";B1:B10)

¿Y tiene que ser con una macro? Porque (si he entendido el problema), me parece que con una fórmula se puede conseguir lo que necesita: =SI.ERROR(INDICE(A:A;K.ESIMO.MENOR(SI(A1:A30<>"";FILA(A1:A30));FILA()));"") teniendo en cuenta que La fórmula iría...

En principio no parece necesario utilizar VBA. Prueba poniendo la siguiente fórmula en E2, y copiándola y pegándola hacia abajo hasta donde haya datos: =SI(Y(C3<>"PAGADAS";C3<>"");SUMA($B$2:B2);"")

Prueba asociando al botón un sub parecido a: Sub prueba() Dim vFichero As Variant vFichero = Application.GetOpenFilename(filefilter:="Ficheros de Texto (*.txt), *.txt,Libros de Excel (*.xls*), *.xls*", Title:="Seleccionar fichero") If vFichero =...

Yo preparé este ejemplo hace tiempo para una consulta similar. Quizás te sirva de inicio.

Puedes averiguar cual es la propiedad CodeName de la hoja mediante ¿? worksheets("nombre_actual_de_la_hoja"). Codename en la ventana de depuración o en un sub o function, y luego activarla directamente desde el código usando el método Activate. Por...

Si utilizas la fórmula =CONTAR($B$9:$B$589)<31 como validación para el rango B9:B589, Excel no admitirá ningún dato en ese rango si ya hay 30 celdas con datos. Eso sí, sería cualquier tipo de datos. Si sólo tuviese que tener en cuenta números, la...

En A1: =INDIRECTO("Hoja"&FILA()&"!Y48") Copiar y pegar hacia abajo.

Si la imagen está creada usando un control ActiveX, puedes utilizar su evento MouseMove. En el módulo de la hoja donde esté la imagen: Private Sub Image1_MouseMove(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)...