macro excel sur power point

rainbow69006 · 20 Février 2008

Bonjour

J'aurais aimer inserer cette macro sur power point.

le problme c'est qu'il n'y a pas de "thisworkbook" sur power point est ce qu'il y a une solution?

merci

Private Sub Workbook_BeforeClose(Cancel As Boolean)
ThisWorkbook.Save
Application.DisplayAlerts = False
ActiveWorkbook.SaveAs FileName:= _
"P:\Pierre\save\" & ThisWorkbook.Name & " " & Environ("UserName") & ".PPT"
Application.DisplayAlerts = True
Application.Quit
End Sub

phlaurent55 · 20 Février 2008

Re : macro excel sur power point

Salut rainbow69006

en utilisant l'enregistreur de macro, tu aurais eu ceci

Code:

Sub Macro1()
'
' Macro enregistrée le 20/02/2008 par .........
'

    ActivePresentation.SaveAs FileName:="C:\Documents and Settings\none\Mes documents\Présentation1.ppt"
End Sub

macro excel sur power point

rainbow69006

XLDnaute Occasionnel

phlaurent55

Nous a quittés en 2020

Discussions similaires

macro excel sur power point

rainbow69006

XLDnaute Occasionnel

phlaurent55

Nous a quittés en 2020

Discussions similaires

Privacy & Transparency

Privacy & Transparency