OVH Cloud OVH Cloud

Insérer une liste de valeur qui se trouve ds un onlget autre que le tableau

15 réponses
Avatar
mandine-69
Bonjour,

Je souhaite insérer une liste de valeur dans un tableau (la liste et le tableau sont dans le même fichier). Cependant, cette liste de valeur est dans un onglet autre que le fichier (= fichier : onglet 1 et liste de valeur : onglet 2)
Merci de bien vouloir m'aider car je n'y arrive pas ^^
Bon week-end

5 réponses

1 2
Avatar
MichD
| ;o)))
| "les meilleures du forum..."
| ;o)))

| ouf... je l'ai échappé belle !

*** Du grand Modeste...Il n'a jamais besoin de rien ;-))
Avatar
Maude Este
Bonsour®

"MichD" a écrit :

Il n'a jamais besoin de rien ;-))

si ... si...
en VBA existe-t-il dans PowerPoint
un évènement Slide_Change ou Slide_Activate???
comme il existe dans Excel
un évènement Worksheet_Change ou Worksheet_Activate

ou bien comment créer un module de classe : Slide ???

nb :
dans le but de piloter et enchainer en VBA une démo multi-applications µSoft
Avatar
MichD
| en VBA existe-t-il dans PowerPoint
| un évènement Slide_Change ou Slide_Activate???
| comme il existe dans Excel
| un évènement Worksheet_Change ou Worksheet_Activate


Quelle est ta version de Microsoft Office?

Dans PowerPoint, les événements se retrouvent essentiellement dans un module
de classe que l'on insère dans un fichier de macros complémentaires .ppa

Si tu ajoutes des contrôles (commandbutton....) la slide contenant le contrôle contient un module
un peu comme une feuille de calcul dont on peut ajouter le code du contrôle. Mais la Slide elle-même
n'a pas des événements que l'on peut définir à l'instar de la feuille de calcul.

Si j'ai un peu de temps, j'essayerai de te faire un petit exemple simple, je ne connais pas vraiment le modèle objet.
As-tu un bon livre sur le sujet ?


Voici quelques événements... la liste n'est pas pas exhaustive, loin de là!

'---------------------------------------------------
Private Sub Pres_AfterNewPresentation(ByVal Pres As Presentation)

Private Sub Pres_AfterPresentationOpen(ByVal Pres As Presentation)

Private Sub Pres_ColorSchemeChanged(ByVal SldRange As SlideRange)

Private Sub Pres_PresentationSync(ByVal Pres As Presentation, ByVal SyncEventType As Office.MsoSyncEventType)

Private Sub Pres_SlideShowNextBuild(ByVal Wn As SlideShowWindow)

Private Sub Pres_PresentationNewSlide(ByVal Sld As Slide)

Private Sub Pres_PresentationOpen(ByVal Pres As Presentation)

Private Sub Pres_SlideSelectionChanged(ByVal SldRange As SlideRange)

Private Sub Pres_SlideShowBegin(ByVal Wn As SlideShowWindow)

Private Sub Pres_SlideShowEnd(ByVal Pres As Presentation)

Private Sub Pres_SlideShowNextSlide(ByVal Wn As SlideShowWindow)

Private Sub Pres_SlideShowOnNext(ByVal Wn As SlideShowWindow)

Private Sub Pres_WindowActivate(ByVal Pres As Presentation, ByVal Wn As DocumentWindow)

'---------------------------------------------------


MichD
------------------------------------------

"Maude Este" a écrit dans le message de groupe de discussion : j8sgv0$ol0$

Bonsour®

"MichD" a écrit :

Il n'a jamais besoin de rien ;-))

si ... si...
en VBA existe-t-il dans PowerPoint
un évènement Slide_Change ou Slide_Activate???
comme il existe dans Excel
un évènement Worksheet_Change ou Worksheet_Activate

ou bien comment créer un module de classe : Slide ???

nb :
dans le but de piloter et enchainer en VBA une démo multi-applications µSoft
Avatar
Maude Este
Bonsour®

"MichD" a écrit
../..
Quelle est ta version de Microsoft Office?
2007
../..
Si j'ai un peu de temps, j'essayerai de te faire un petit exemple simple, je ne
connais pas vraiment le modèle objet.
;o))) il n'y a ni impératif ni délais ! merci quand même...

As-tu un bon livre sur le sujet ?
hélas non hormis Excel...
;o))
cela fait partie de mes élucubrations et "geedesqueries"
dans le cadre de notre club de modélisme ferroviaire, j'envisageais une
présentation "unique en boucle" et automatique de nos activités et réalisations
mélangeant images, animations et vidéos.
pour l'instant les applis (EXCEL, PPT, WMP) sont séparées et pilotées
manuellement à la demande
(nécessité de ma présence, les collègues (retraités...) étant hermétiques,
ignares et réfractaires aux outils PC)
;o))

../..
Voici quelques événements... la liste n'est pas pas exhaustive, loin de là!
'---------------------------------------------------
Private Sub Pres_AfterNewPresentation(ByVal Pres As Presentation)
Private Sub Pres_AfterPresentationOpen(ByVal Pres As Presentation)
Private Sub Pres_ColorSchemeChanged(ByVal SldRange As SlideRange)
Private Sub Pres_PresentationSync(ByVal Pres As Presentation, ByVal
SyncEventType As Office.MsoSyncEventType)
Private Sub Pres_SlideShowNextBuild(ByVal Wn As SlideShowWindow)
Private Sub Pres_PresentationNewSlide(ByVal Sld As Slide)
Private Sub Pres_PresentationOpen(ByVal Pres As Presentation)
Private Sub Pres_SlideSelectionChanged(ByVal SldRange As SlideRange)
Private Sub Pres_SlideShowBegin(ByVal Wn As SlideShowWindow)
Private Sub Pres_SlideShowEnd(ByVal Pres As Presentation)
Private Sub Pres_SlideShowNextSlide(ByVal Wn As SlideShowWindow)
Private Sub Pres_SlideShowOnNext(ByVal Wn As SlideShowWindow)
Private Sub Pres_WindowActivate(ByVal Pres As Presentation, ByVal Wn As
DocumentWindow)
'---------------------------------------------------
Avatar
MichD
Bonjour,

Un exemple très basique, question de mettre le pied à l'étrier!

http://cjoint.com/?AKdpx5us3dt

C'est un fichier .rar qui contient 4 fichiers.

"Fichier pour ppa.ppa" c'est le fichier de macros complémentaires. Sous windows 7, tu dois
le copier dans le répertoire suivant : C:Users"ton profil"AppDataRoamingMicrosoftAddIns

"Fichier pour ppa.ppt", Cela te permet de voir le code dans la fenêtre de l'éditeur de code que
tu retrouves dans le fichier "Fichier pour ppa.ppa"

"Spiritualité Indienne.ppt" Le fichier de présentation. Si tu fais dérouler les diapo. un petit message s'affiche

"Spiritualité Indienne.pps" La présentation manuelle.

L'objectfit est simplement pour démontrer comment s'imbrique les éléments du code.

À toi de t'amuser maintenant ! ;-))



MichD
------------------------------------------



MichD
------------------------------------------
"Maude Este" a écrit dans le message de groupe de discussion : j8tusu$2pq$

Bonsour®

"MichD" a écrit
../..
Quelle est ta version de Microsoft Office?
2007
../..
Si j'ai un peu de temps, j'essayerai de te faire un petit exemple simple, je ne
connais pas vraiment le modèle objet.
;o))) il n'y a ni impératif ni délais ! merci quand même...

As-tu un bon livre sur le sujet ?
hélas non hormis Excel...
;o))
cela fait partie de mes élucubrations et "geedesqueries"
dans le cadre de notre club de modélisme ferroviaire, j'envisageais une
présentation "unique en boucle" et automatique de nos activités et réalisations
mélangeant images, animations et vidéos.
pour l'instant les applis (EXCEL, PPT, WMP) sont séparées et pilotées
manuellement à la demande
(nécessité de ma présence, les collègues (retraités...) étant hermétiques,
ignares et réfractaires aux outils PC)
;o))

../..
Voici quelques événements... la liste n'est pas pas exhaustive, loin de là!
'---------------------------------------------------
Private Sub Pres_AfterNewPresentation(ByVal Pres As Presentation)
Private Sub Pres_AfterPresentationOpen(ByVal Pres As Presentation)
Private Sub Pres_ColorSchemeChanged(ByVal SldRange As SlideRange)
Private Sub Pres_PresentationSync(ByVal Pres As Presentation, ByVal
SyncEventType As Office.MsoSyncEventType)
Private Sub Pres_SlideShowNextBuild(ByVal Wn As SlideShowWindow)
Private Sub Pres_PresentationNewSlide(ByVal Sld As Slide)
Private Sub Pres_PresentationOpen(ByVal Pres As Presentation)
Private Sub Pres_SlideSelectionChanged(ByVal SldRange As SlideRange)
Private Sub Pres_SlideShowBegin(ByVal Wn As SlideShowWindow)
Private Sub Pres_SlideShowEnd(ByVal Pres As Presentation)
Private Sub Pres_SlideShowNextSlide(ByVal Wn As SlideShowWindow)
Private Sub Pres_SlideShowOnNext(ByVal Wn As SlideShowWindow)
Private Sub Pres_WindowActivate(ByVal Pres As Presentation, ByVal Wn As
DocumentWindow)
'---------------------------------------------------
1 2