MACRO AL ABRIR EXCEL

05/02/2004 - 11:40 por xuank | Informe spam
Hola a todos!


1.Necesitaría una macro que al abrir un archivo de excel
ocultase automáticamente las barras de herramientas activas que tuviera el
usuario (es decir barra estándar,formato,fórmulas,estado...), para que se
vea en pantalla la mayor cantidad de información. Al cerrar el fichero todas
las barras de herramientas deberían restaurarse.
2.En la columna E tengo franjas horarias (8:00,8:15,etc), y en
la columna F tengo % de llamadas. Necesito saber que franja tiene el mayor
porcentaje de llamadas (esto lo he hecho con MAX(rango), pero necesito saber
también a que franja corresponde el máximo). Con un Burcarv no puedo ya que
ya que el rango sobre el que busco está a la izquierda del valor buscado.
Tenéis alguna idea de como podría hacerlo sin cambiar el orden de las
columnas?

Mil gracias

Juan Carlos
 

Leer las respuestas

#1 Fernando Arroyo
05/02/2004 - 12:25 | Informe spam
"xuank" escribió en el mensaje news:w4pUb.3163633$
Hola a todos!


1.Necesitaría una macro que al abrir un archivo de excel
ocultase automáticamente las barras de herramientas activas que tuviera el
usuario (es decir barra estándar,formato,fórmulas,estado...), para que se
vea en pantalla la mayor cantidad de información. Al cerrar el fichero todas
las barras de herramientas deberían restaurarse.



Pega el siguiente código en el módulo del libro:

Private Sub Workbook_BeforeClose(Cancel As Boolean)
Application.DisplayFullScreen = False
End Sub

Private Sub Workbook_Open()
Application.DisplayFullScreen = True
Application.CommandBars("Full Screen").Visible = False
End Sub


2.En la columna E tengo franjas horarias (8:00,8:15,etc), y en
la columna F tengo % de llamadas. Necesito saber que franja tiene el mayor
porcentaje de llamadas (esto lo he hecho con MAX(rango), pero necesito saber
también a que franja corresponde el máximo). Con un Burcarv no puedo ya que
ya que el rango sobre el que busco está a la izquierda del valor buscado.
Tenéis alguna idea de como podría hacerlo sin cambiar el orden de las
columnas?




Suponiendo que los datos comenzaran en la la fila 1, la siguiente fórmula debería servirte:

ÞSREF(E1;COINCIDIR(MAX(F1:F50);F1:F50;FALSO)-1;0)

Un saludo.


Fernando Arroyo
MS MVP - Excel

Mil gracias

Juan Carlos


Preguntas similares