vba-pp macro power point

Version imprimable

13/09/2007, 16h50
porc-bouc

vba-pp macro power point

Bonjour,

Comment faire une macro qui se lance à l'ouverture d'une présentation et qui gère la durée de cette présentation ex: je lance un pps et je quittel'appli au bout de 2h ?
CDt
15/09/2007, 00h43
annedeblois

Bonjour,

Bienvenue sur les forums developpez.com. Que désires-tu faire au juste avec ta macro? Il serait bien que tu nous donnes le plus de détails possible.
16/10/2007, 11h11
porc-bouc

Bjr,

Lancer un diaporama(pps) dans une plage horaire donnée ex:

Le pps se lance à 08h tous les matins et s'arrete à 20h00 tous les soirs.
cdt
16/10/2007, 13h01
ouisansdoute

lancer un diraporama dans une plage planifiée

Bonjour,

Une solution hors macro est de passer par une tache planifiée de windows (Démarrer/Programmes/accessoires/Outils système/taches planifiées)

Mais avant cela, il faut que ton diaporama soit complètement automatisé, minuté et programmé pour tourner en boucle (s'il ne tourne pas en boucle, il faudra programmer des lancements à intervalle régulier). par ailleurs il faut qu'il soit au format pps et non ppt sinon c'est Powerpoint qui va s'ouvrir sur la première diapo et il ne fera rien.
17/10/2007, 14h23
porc-bouc

Bjr,
Le blèm c'est que je n'ai pas les droits nécessaires pour les tâches planifiées win.
cdt
17/10/2007, 14h46
ouisansdoute

Bonjour,

Alors, je ne vois pas trop comment tu peux le faire automatiquement à l'intérieur même du diapo. La seule solution que je vois est d'automatiser complètement ton diapo (minutage et paramétrer le passage du diapo en boucle). l'enregistrer en pps, le placer sur le bureau et le lancer à la main le matin et l'arrêter à la main le soir.
Ou encore, le mettre dans le menu démarrer pour qu'il se lance à l'ouverture du PC...

j'ai pas mieux. Désolée.

Automatiser diaporama

Bonjour,

Une petite piste en utilisant la valeur de NOW pour limiter le temps maxi d'un diaporama.

Code:

1
2
3
4
5
6
7
8
9
10
11
Sub TempsMax()
  HeureFermeture = Now + TimeValue("00:00:10")
While Now < HeureFermeture<div style="margin-left:40px"> With ActivePresentation.SlideShowSettings<div style="margin-left:40px">.ShowType = ppShowTypeSpeaker
.LoopUntilStopped = msoTrue
.ShowWithNarration = msoTrue
.ShowWithAnimation = msoTrue
.RangeType = ppShowAll
.AdvanceMode = ppSlideShowUseSlideTimings
.PointerColor.RGB = RGB(Red:=255, Green:=0, Blue:=0)
.Run</div>End With</div>ActivePresentation.Close
End Sub

A explorer...

17/10/2007, 17h41
porc-bouc

Merci, c'est toujours ça pour le fermer mais il faut le relancer tous les matins.
Cdt
19/10/2007, 16h48
annedeblois

Citation:

Envoyé par porc-bouc

Bjr,
Le blèm c'est que je n'ai pas les droits nécessaires pour les tâches planifiées win.
cdt

Au pis aller, tu peux demander à ton responsable informatique de programer une tâche planifiée pour toi. Sinon, l'idée de ouisansdoute concernant un raccourci vers ton PPS dans le menu Démarrer serait à essayer.