En este grupo En todos

Foro de Excel



Presentación de gráficos

Escrito por Sandra
el 08/08/2006

Hola.

La pregunta concreta es cómo puedo generar una especie de presentación en un archivo de excel con 56 gráficas.

Me comentaron que con el uso de formularios en los datos que las generan, se podía mostrar estas gráficas de una en una en pantallla, en el mismo archivo de excel, sin necesidad de vincularlas a powerpoint.

Me podrías dar alguna luz al respecto?

Carlos Martínez Zaragoza
Maestria en finanzas empresariales uni...
Escrito por Carlos Martínez Zaragoza
el 09/08/2006

Una forma de hacer como presentacion de graficos de Excel sin salir de Excel es renombrar una celda de cada hoja para que al presentarla solo tiene que buscar el nombre en IR A, y luego apareceras e la hoja con el grafico.

Para renombrar celda estando en ella ubicado ve a la barra de formulas al extremo izquierdo escribe el nombre de la delca que deseas ponmer y luego Enter, y asi continuas con las otras 55 celdas y hojas.


Abraham Valencia
Computacion e informatica microsoft mv...
Escrito por Abraham Valencia
el 09/08/2006

Esto  es un poquito mas largo, pero creo que tambien te servira. Estoy tomando como si tus graficos estuvieran uno debajo de otro, con una diferencia de unas 10 filas, a la altura de la columna C.

Primero crea un userform (userform 1) y ponle dos botones, uno ser SIGUIENTE y  el otro SALIR. Agregales estos codigos:

Private Sub siguiente_Click()
Call bajando
End Sub

Private Sub salir_Click()
Call salir
End Sub


Ahora , en un modulo coloca esto:

Public referencia As Integer


Sub bajando()
referencia = referencia + 10
  Cells(referencia, 3). Select
    End Sub


Sub salir()
Unload UserForm1
Application.CommandBars.ActiveMenuBar. Enabled = True
 Application. DisplayFullScreen = False
    With ActiveWindow
       . DisplayHeadings = True
       . DisplayHorizontalScrollBar = True
       . DisplayVerticalScrollBar = True
       . DisplayGridlines = True
    End With
    referencia = 0
End Sub


Sub menu()
Range("b3"). Select
  Application. DisplayFullScreen = True
 Application.CommandBars.ActiveMenuBar. Enabled = False
With ActiveWindow
       . DisplayHeadings = False
       . DisplayHorizontalScrollBar = False
       . DisplayVerticalScrollBar = False
       . DisplayGridlines = False
       End With
    UserForm1. Show vbModeless
End Sub

Luego para tu presentacion llama a la macro MENU , y todo se vera a pantalla completa, sin grilla, sin encabezado de columna y fila, y con un menu flotante donde al presionar "siguiente" bajara al otro grafico y al presionar "salir" dehara todo como estaba.

Abraham

Escrito por Sandra
el 09/08/2006
Me aparece lo siguiente al correr la macro y darle salir.

Ficheros adjuntos:
Dibujo1
Abraham Valencia
Computacion e informatica microsoft mv...
Escrito por Abraham Valencia
el 09/08/2006

Cambialo por esto

Private Sub salida_Click()
Call salir
End Sub

Abraham

PD: No olvides en propiedades del boton ponerle SALIDA en el nombre
 PD2: Si te sirve mas, cologare un ejm