Como crear menus al estilo Web ó 'explorador de archivos'

Que tal.

No hay que complicarnos la vida con programas externos (aunque de la misma
suite).
Yo te recomiendo una macro que cuando abras el libro se cree el menú con las
opciones y cada vez que te cambies de libro se muestre o se oculte, para que
solo esté disponible para tu libro de trabajo.

En el módulo "ThisWorkbook" insertamos las siguientes macros:

'Esta macro activa un nuevo menú con 4 opciones.

Private Sub Workbook_Open()
SetupMenus
End Sub

Private Sub Workbook_Activate()
SetupMenus
End Sub

Private Sub Workbook_Deactivate()
DeleteMenus
End Sub

Sub SetupMenus()
With MenuBars(xlWorksheet)
.Menus.Add Caption:="&Pagos y Préstamos", Before:=9
.Menus("&Pagos y Préstamos").MenuItems.Add Caption:="&CalculaPagos",
Before:=1, OnAction:="MacroCalculaPagos"
.Menus("&Pagos y Préstamos").MenuItems.Add Caption:="&PagoImpuestos",
Before:=1, OnAction:="MacroPagoImpuestos"
.Menus("&Pagos y Préstamos").MenuItems.Add Caption:="&Menor5000", Before:=1,
OnAction:="MacroPrestamoMenor5000"
.Menus("&Pagos y Préstamos").MenuItems.Add Caption:="&Mayor5000", Before:=1,
OnAction:="MacroPrestamoMayor5000"
End With
End Sub

Sub DeleteMenus()
For Each MenuName In MenuBars(xlWorksheet).Menus
If MenuName.Caption = "&Pagos y Préstamos" Then
MenuName.Delete
End If
Next
End Sub

Cualquier duda, no dudes en contestar.

A sus órdenes.

Tec. Inf. Sergio A Campos H

"Rene MB" escribió en el mensaje
news:01c601c47b41$6d693a80$
Hola Amigos del Foro,

Como puedo realizar en Excel, un menu al estilo
(Explorador de Windows) ó WEB, para que
pueda tener acceso a 4 Opciones, al seleccionarlo con el
mouse?

Tengo las macros ya hechas que realizan los calculos para
cada opcion:
lo unico que deseo es accesar a estas macros por medio de
un menú al estilo Web.
Será necesario utilizar otro programa como el FrontPage?

1.- MacroCalculaPagos.xls
2.- MacroPagoImpuestos.xls
3.- MacroPrestamoMenor5000.xls
4.- MacroPrestamoMayor5000.xls

Menu
|______Calculo Pagos opc.1
|
|______Pago Impuestos --opc.2
|
|______Prestamos
|_____Menor a 5000 -opc.3
|_____Mayor a 5000 -opc.4

Saludos y gracias de antemano por sus respuestas.