FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
||||
|
||||
Excel en TOleContainer
Hola a todos, tengo una aplicación que muestra un documento excel en un TOleContainer. El usuario no debe poder hacer ninguna modificación, para lo que desactivo el contenedor OleContainer.Enabled := False. Lo que ocurre es que aunque no se puede acceder directamente a las celdas, las barras de herramientas son visibles y están activas. Mi pregunta es ¿cómo hacerlas desaparecer?
He mirado la ayuda de VBA de Excel y he probado cosas cómo: Código:
OleContainer.OleObject.Application.CommandBars('EuroValue').Enabled := False; OleContainer.OleObject.Application.CommandBars('EuroValue').Visible := False; OleContainer.OleObject.Application.CommandBars.Item['EuroValue'].Set_Enabled(False); OleContainer.OleObject.Application.CommandBars.Item[1].Set_Enabled(False); ¿Alguien puede ayudarme? Muchas gracias de antemano. |
#2
|
|||
|
|||
No se si lo has podido solucionar pero quizas estas instrucciones te sirvan
Olecontainer1.OleObject.application.CommandBars['Standard'].Visible:=false; Olecontainer1.OleObject.application.CommandBars['Formatting'].Visible:=false; Olecontainer1.OleObject.application.CommandBars['Reviewing'].Visible:=false; Con esto desaparecen las barras del excel, lo que necesito es que aparezcan estas barras pero con las opciones imprimir y guardar habilitadas |
|
|
|