Classe DocumentWindow (PowerPoint VBA)

La classe DocumentWindow représente une fenêtre de document. L’objet DocumentWindow est membre de la collection DocumentWindows . La collection DocumentWindows contient toutes les fenêtres de document ouvertes.

Les procédures principales de la classe DocumentWindow sont Activate et Close

Set

Pour utiliser une variable de classe DocumentWindow, elle doit d'abord être instanciée, par exemple

Dim dww as DocumentWindow
Set dww = ActiveWindow

Les procédures suivantes peuvent être utilisés pour définir des variables de la classe DocumentWindow : Application.ActiveWindow, NewWindow, DocumentWindows.Item, Presentation.NewWindow, Application.Windows et Presentation.Windows

Thèmes

Les procédures suivantes de cette classe ont été regroupées et sont décrites sur une page thématique séparée

Format with its procedures Height et Width

Méthodes

Les méthodes principales de la classe DocumentWindow sont

Activate - Active l’objet spécifié.

ActiveWindow.Activate

Close - Ferme la fenêtre de document spécifiée.

ActiveWindow.Close

Autre Méthodes

ExpandSection - Développe la section dans le DocumentWindowactif.

Dim lngsectionIndex As Long: lngsectionIndex = 
ActiveWindow.ExpandSection sectionIndex:=lngsectionIndex, Expand:=True

LargeScroll - Fait défiler la fenêtre de document spécifiée d’une ou de plusieurs pages.

ActiveWindow.LargeScroll Down:=3

RangeFromPoint - Renvoie l’objet Shape qui se trouve au point spécifié par la paire de coordonnées de position à l’écran. Si aucune forme ne se trouve à l’emplacement spécifié par la paire de coordonnées, la méthode renvoie la valeur Nothing.

Dim lngX As Long: lngX = 240
Dim lngY As Long: lngY =  300
Dim shpRangeFromPoint As Shape
Set shpRangeFromPoint = ActiveWindow.RangeFromPoint(X:=lngX, Y:=lngY)

ScrollIntoView - Fait défiler la fenêtre de document afin que les éléments d’une zone rectangulaire spécifiée soient affichés dans la fenêtre ou le volet du document.

ActiveWindow.ScrollIntoView Left:=, Top:=, Width:=, Height:=

SmallScroll - Fait défiler la fenêtre de document spécifiée d’une ou de plusieurs lignes ou colonnes.

ActiveWindow.SmallScroll  Down:=3

Propriétés

Active Indique si le volet ou la fenêtre spécifié est actif. En lecture seule.

Dim mtsActive As Office.MsoTriState
mtsActive = Windows(2).Active

ActivePane Renvoie un objet Pane qui représente le volet actif dans la fenêtre de document. En lecture seule.

Dim panActivePane As Pane
Set panActivePane = ActiveWindow.ActivePane

BlackAndWhite Détermine si l’affichage de la fenêtre de document est en noir et blanc. Lecture-écriture.

ActiveWindow.BlackAndWhite = msoTrue

Caption Renvoie le texte qui apparaît dans la barre de titre de la fenêtre du document. En lecture seule.

Dim strCaption As String
strCaption = ActiveWindow.Caption

Left Renvoie ou définit une valeur de type Single qui représente la distance en points entre le bord gauche des fenêtres de document, d’application et de diaporama et le bord gauche de la zone cliente de la fenêtre de l’application. Si vous donnez à cette propriété une très grande valeur positive ou négative, vous risquez de positionner la fenêtre totalement hors de l’application. Lecture-écriture.

ActiveWindow.Left =

Panes Renvoie une collection Panes qui représente les volets de la fenêtre de document. En lecture seule.

Dim pnsPanes As Panes
Set pnsPanes = ActiveWindow.Panes

Parent Renvoie l’objet parent de l’objet spécifié.

Dim objParent As Object
Set objParent = ActiveWindow.Parent

Presentation Renvoie un objet Presentation qui représente la présentation dans laquelle la fenêtre de document ou de diaporama spécifiée a été créée. En lecture seule.

Dim prsPresentation As Presentation
Set prsPresentation = ActiveWindow.Presentation

Selection Renvoie un objet Selection qui représente la sélection dans la fenêtre de document spécifiée. En lecture seule.

Dim slcSelection As Selection
Set slcSelection = ActiveWindow.Selection

SplitHorizontal Renvoie ou définit le pourcentage de largeur de la fenêtre de document que le volet de plan occupe en mode Normal. Correspond à la position de la ligne de séparation entre les volets de diapositive et de plan. Lecture-écriture.

ActiveWindow.SplitHorizontal =

SplitVertical Renvoie ou définit le pourcentage de hauteur de la fenêtre de document que le volet de diapositive occupe en mode Normal. Correspond à la position de la ligne de séparation entre les volets de diapositive et de commentaires. Lecture-écriture.

ActiveWindow.SplitVertical =

Top Renvoie ou définit une valeur de type Single qui représente la distance en points entre le bord supérieur des fenêtres de document, d’application et de diaporama et le bord supérieur de la zone cliente de la fenêtre de l’application. Lecture-écriture.

ActiveWindow.Top = 10

View Renvoie un objet View qui représente l’affichage dans la fenêtre de document spécifiée. En lecture seule.

Dim vwView As View
Set vwView = ActiveWindow.View

ViewType Renvoie ou définit le type de l’affichage contenu dans la fenêtre de document spécifiée. Lecture-écriture.

ActiveWindow.ViewType = ppViewHandoutMaster

WindowState Renvoie ou définit l’état de la fenêtre spécifiée. Lecture-écriture.

ActiveWindow.WindowState = ppWindowMaximized

DocumentWindows.Count Renvoie le nombre d'objets de la collection spécifiée. En lecture seule.

Dim lngCount As Long
lngCount = ActivePresentation.Windows.Count

DocumentWindows.Parent Renvoie l’objet parent de l’objet spécifié.

Dim objParent As Object
Set objParent = ActivePresentation.Windows.Parent