Classe NamedSlideShow (PowerPoint VBA)

A classe NamedSlideShow representa uma apresentação de slides personalizada, a qual é um subconjunto nomeado de slides em uma apresentação.

Set

Para usar uma variável de classe NamedSlideShow, ela primeiro precisa ser instanciada por exemplo

Dim nss as NamedSlideShow
Set nss = ActivePresentation.SlideShowSettings.NamedSlideShows(Index:=1)

Os procedimentos a seguir podem ser usados ​​para definir variáveis ​​do tipo NamedSlideShow: NamedSlideShows.Item, NamedSlideShows.Add e SlideShowSettings.NamedSlideShows

Count

Retorna o número de objetos na coleção especificada. Somente leitura.

Dim lngCount As Long
lngCount = ActivePresentation.SlideShowSettings.NamedSlideShows(1).Count

Delete

Exclui o objeto NamedSlideShow especificado.

ActivePresentation.SlideShowSettings.NamedSlideShows(1).Delete

Name

Não é possível usar essa propriedade para definir o nome de uma apresentação de slides personalizada. Use o método Add para redefinir uma apresentação de slides personalizada com um novo nome. Somente leitura.

Você pode usar o nome do objeto em conjunto com o método Item para retornar uma referência ao objeto se o método Item da coleção que contém o objeto tem um argumento Variant . Por exemplo, se o valor da propriedade Name de uma forma for Rectangle 2, .Shapes("Rectangle 2") retornará uma referência a essa forma.

Dim strName As String
strName = ActivePresentation.SlideShowSettings.NamedSlideShows(1).Name

Parent

Retorna o objeto parente para o objeto especificado.

SlideIDs

Retorna uma matriz de identificação de slide para a apresentação de slides nomeada especificada. Somente leitura.

Dim varSlideIDs As Variant
varSlideIDs = ActivePresentation.SlideShowSettings.NamedSlideShows(1).SlideIDs

NamedSlideShows.Add

Cria uma nova apresentação de slides nomeada e a adiciona à coleção de apresentações de slides nomeadas da apresentação especificada. Retorna um objeto NamedSlideShow que representa a nova apresentação de slides nomeada.

O nome especificado quando você adiciona uma apresentação de slides nomeada é o nome que você usa como um argumento para o método Run para executar a apresentação de slides nomeada.

Sintaxe : expression.Add (Name, safeArrayOfSlideIDs)

Dim strName As String: strName = 
Dim lngsafeArrayOfSlideIDs() As Long: lngsafeArrayOfSlideIDs() = 
Dim nss As NamedSlideShow
Set nss = ActivePresentation.SlideShowSettings.NamedSlideShows.Add(Name:=strName, safeArrayOfSlideIDs:=lngsafeArrayOfSlideIDs())

Arguments

O seguinte argumento é opcional

Name (String) - O nome da apresentação de slides.

safeArrayOfSlideIDs (Long) - Contém as identificações de slides exclusivas dos slides a serem exibidos em uma apresentação de slides.

NamedSlideShows.Count

Retorna o número de objetos na coleção especificada. Somente leitura.

Dim lngCount As Long
lngCount = ActivePresentation.SlideShowSettings.NamedSlideShows.Count

NamedSlideShows.Item

Retorna um único objeto NamedSlideShow da coleção NamedSlideShows especificada.

Sintaxe : expression.Item (Index)

Index: O nome ou número de índice do único objeto NamedSlideShow da coleção a ser retornado.

Dim nss As NamedSlideShow
Set nss = ActivePresentation.SlideShowSettings.NamedSlideShows(Index:=1)

NamedSlideShows.Parent

Retorna o objeto parente para o objeto especificado.