status bar information when updating Power Point from Excel

[Guest]

Hi everybody,
In a VBA routine (in Excel 2000) Power Point slides are updated from Excel
(copy Excel ranges and paste in Power Point. In Excel it´s possible to give
the user information how the routine proceeds with application. statusbar.
I want to have the similar information displayed in the Power Point but i
can´t find something like statusbar in Power Point VBA.
Thanks in advance for any help how the statusbar information could be
displayed in Power Point.
Best Regards
Mats
ESI Update

 

[Steve Rindsberg]

Hi everybody,
In a VBA routine (in Excel 2000) Power Point slides are updated from Excel
(copy Excel ranges and paste in Power Point. In Excel it´s possible to give
the user information how the routine proceeds with application. statusbar.
I want to have the similar information displayed in the Power Point but i
can´t find something like statusbar in Power Point VBA.
Thanks in advance for any help how the statusbar information could be
displayed in Power Point.

Quick version - ask for more details if this doesn't make sense to you:

In PPT2000 and up you can use modeless userforms (it won't work in PPT 97 or in
any Mac version of PPT)

Create a user form.

Put your status text in a label on the form

Show the form modelessly then update the label text from your VBA routine as it
runs.

ex: frmProgress.lblProgressText.Caption = "Slide " & cstr(oSld.SlideIndex)

 

[Guest]

Hi Steve,
Thanks for your answer. i think it can be useful but I have got problems
showing the userform when the Presentation in Power Point is opened.
I use a code like this

"Set PPTApp = CreateObject("PowerPoint.Application")
With PPTApp
.Visible = True
.WindowState = ppWindowMaximized
'Set Pres1 = PPTApp.Presentations.Add
.Presentations.Open
filename:="D:\Minadokument\Officeutveckling\Test4.ppt", ReadOnly:=msoFalse
End With"
Then i have tried
" Load frmStatus
frmStatus.Show"
or
"WithPPTApp
..Load frmStatus
..frmStatus.Show"
End With

I appreciate if you could give me some help how I can get the the userform
loaded and shown in Power Point.
Regards
Mats

 

[Steve Rindsberg]

Hi Steve,
Thanks for your answer. i think it can be useful but I have got problems
showing the userform when the Presentation in Power Point is opened.
I use a code like this

"Set PPTApp = CreateObject("PowerPoint.Application")
With PPTApp
.Visible = True
.WindowState = ppWindowMaximized
'Set Pres1 = PPTApp.Presentations.Add
.Presentations.Open
filename:="D:\Minadokument\Officeutveckling\Test4.ppt", ReadOnly:=msoFalse
End With"
Then i have tried
" Load frmStatus
frmStatus.Show"
or
"WithPPTApp
..Load frmStatus
..frmStatus.Show"
End With

I appreciate if you could give me some help how I can get the the userform
loaded and shown in Power Point.

Hi Mats,

I read over the part about automating PPT *from Excel* too quickly. My mistake
...

One approach might simply be to leave PPT minimized or invisible then use an
Excel form (or Excel's status bar, for that matter).

To load a PPT/VBA form, you'd have to include the form in a PPT add-in and be
certain that the addin's installed (I think you'd be able to automate the
loading and unloading of it from Excel via the PPTApp.Addins object.)