Abrir Power Point con contraseña

[kaliman]

Tengo un boton de comando que al hacer click debe abrir la
presentacion en power point
Supervision.ppt, el problema es que tiene contraseña y no lo puede
abrir si no ingreso la contaseña. Se podra colocar un codigo para
poder abrirlo, e intentado y nada hasta el momento.

Saludos,

Cesar

Private Sub CmdPoint_Click()
Dim DbPath As String
Dim oPowerPoint As PowerPoint.Application
Dim Password As String
DbPath = "D:\Cesar\Liderman Premiun\Power Point\Supervision.pps"
Password = "Gehova"
' instanciamos una nueva ventana de Power Point
On Error Resume Next

Set oPowerPoint = GetObject(, "PowerPoint.Application")
If Err Then
Set oPowerPoint = New PowerPoint.Application
PPTWasNotRunning = True
End If
With oPowerPoint
' la hacemos visible
.Visible = True
' abrimos la Presentacion
.Presentations.Open DbPath, msoTrue
' Documents.Open DbPath, True, False, True, Password
End With
Set oPowerPoint = Nothing

End Sub

[Enric Mañas [PowerPoint MVP]]

Kaliman,

Puedes mirar:

http://www.microsoft.com/communities/newsgroups/list/en-us/default.aspx?&query=shyam+password&lang=en&cr=us&guid=&sloc=en-us&dg=microsoft.public.powerpoint&p=1&tid=d0976d09-e6f9-40f4-b0e1-48566933ed79

y

http://groups.google.es/group/microsoft.public.powerpoint/browse_thread/thread/e92fb3f18e84b8db/dd0efc091cae10cc?hl=es&lnk=st&q=powerpoint+password+macro#dd0efc091cae10cc

¿Versión de PowerPoint?

¿Con contraseña de apertura o de escritura?

¿Vas a usar PowerPoint o el Visor?

¿Has probado lo que pasa en cada caso?

¿Has probado a hacerlo con un *simple* Botón de acción” para que abra
Supervision.pps?

¿Lo has probado haciéndolo así y usando el Visor?

Y... lo más importante...

¿*QUÉ* quieres conseguir *EXACTAMENTE*?

;-)

Cordialmente

Enric
--
Enric Mañas [MS MVP Office - PowerPoint]

"kaliman" escribió:

[kaliman]

On 20 jun, 07:49, Enric Mañas [PowerPoint MVP]
<enlamadriguera...@powerpoint.es> wrote:
> Kaliman,
>
> Puedes mirar:
>
> http://www.microsoft.com/communities/newsgroups/list/en-us/default.as...
>
> y
>
> http://groups.google.es/group/microsoft.public.powerpoint/browse_thre...

> > End Sub- Ocultar texto de la cita -
>
> - Mostrar texto de la cita -

No he probado con lo que me dices, voy a hacerlo.
La version es Power Point 2002
Contraseña de Apertura
Quiero usar Power Point
lo quiero para que no modifiquen el archivo.
Bueno tengo un programa en excel arhivos.xls con contraseña, desde
alli abro las aplicaciones de todos mis archivos tanto en word, excel
y tambien quiero hacerlo desde Power Point, no he podido.
Para los archivos word y excel tienen que ingresar con el
archivo.xls, pueden tener acceso, pero si lo hace directamente por el
explorador windows le pide contraseña.

Saludos,
Cesar

[Enric Mañas [PowerPoint MVP]]

César,

> No he probado con lo que me dices, voy a hacerlo.

Ya nos dirás...

> La version es Power Point 2002

PowerPoint es *una* palabra...

> Contraseña de Apertura

Ufff...

> Quiero usar Power Point

PowerPoint es *una* palabra...

> lo quiero para que no modifiquen el archivo.

Para que no lo modifiquen... con “Contraseña de Escritura” habría
*suficiente*... ¿no?

> Bueno tengo un programa en excel arhivos.xls con contraseña, desde alli abro las aplicaciones de todos mis archivos tanto en word, excel y tambien quiero hacerlo desde Power Point, no he podido.

Lo siento pero sigo sin enterarme de lo que quieres conseguir
*EXACTAMENTE*... (de “los pasos” que sigues y lo que quieres conseguir...
explicándolos uno a uno, uno tras otro...)

> Para los archivos word y excel tienen que ingresar con el archivo.xls, pueden tener acceso, pero si lo hace directamente por el explorador windows le pide contraseña.

...lo mismo... No sé si estás hablando de tu equipo, de otro equipo, de algo
que vas a distribuir de alguna manera... de ti, de un usuario que tiene que
abrir *tus* archivos, etc., etc. etc... sin *verlo* y con las explicaciones
que ofreces...

;-)

Muy cordialmente