"Jacques" <none> a écrit dans le message de groupe de discussion : u$ ok mais le 1 de Slides(1) represente quoi? le numéro de slide? si oui peut-on mettre plutôt le nom de la slide?
merci
"Geo" a écrit dans le message de groupe de discussion :
Bonjour,
Je voudrais changer le texte d'une zone texte dont je connais le nom et la slide mais n'y arrive pas
J'ai essayé
ActiveWindow.Selection.SlideRange.Shapes("Closing_Date").Select With ActiveWindow.Selection.TextRange .Text = "test" End With
mais ca ne marche pas si je ne suis pas sur la slide comment modifier le code pour activer la slide?
Evitez d'utiliser les sélections et encore plus les fenêtres.
-- A+
Ca ne marche pas
Et la slide est la 1ère
"Jacques" <none> a écrit dans le message de groupe de discussion :
u$5GbfuhIHA.5260@TK2MSFTNGP03.phx.gbl...
ok mais le 1 de Slides(1) represente quoi? le numéro de slide? si oui
peut-on mettre plutôt le nom de la slide?
merci
"Geo" <Geo@sans.pub> a écrit dans le message de groupe de discussion :
mn.7d5d7d8307d92968.41568@sans.pub...
Bonjour,
Je voudrais changer le texte d'une zone texte dont je connais le nom et la
slide mais n'y arrive pas
J'ai essayé
ActiveWindow.Selection.SlideRange.Shapes("Closing_Date").Select
With ActiveWindow.Selection.TextRange
.Text = "test"
End With
mais ca ne marche pas si je ne suis pas sur la slide comment modifier le
code pour activer la slide?
"Jacques" <none> a écrit dans le message de groupe de discussion : u$ ok mais le 1 de Slides(1) represente quoi? le numéro de slide? si oui peut-on mettre plutôt le nom de la slide?
merci
"Geo" a écrit dans le message de groupe de discussion :
Bonjour,
Je voudrais changer le texte d'une zone texte dont je connais le nom et la slide mais n'y arrive pas
J'ai essayé
ActiveWindow.Selection.SlideRange.Shapes("Closing_Date").Select With ActiveWindow.Selection.TextRange .Text = "test" End With
mais ca ne marche pas si je ne suis pas sur la slide comment modifier le code pour activer la slide?
Ah ? Voici exactement le code qui a marché chez moi : ActivePresentation.Slides(1).Shapes(2).TextFrame.TextRange.Text = "test"
Vous avez une erreur ?
-- A+
Geo
Re Je viens de refaire un essai avec un nom, car il y a quelques collections qui ne fonctionnent pas avec un nom. Avec une autre possibilité, si c'est un titre de la diapo.
With ActivePresentation.Slides(1) .Shapes("Auteurs").TextFrame.TextRange.Text = "Auteurs" .Shapes.Title.TextFrame.TextRange = "Nouveau Titre" End With
Vous n'avez qu'un seule présentation ouverte ?
-- A+
Re
Je viens de refaire un essai avec un nom, car il y a quelques
collections qui ne fonctionnent pas avec un nom.
Avec une autre possibilité, si c'est un titre de la diapo.
With ActivePresentation.Slides(1)
.Shapes("Auteurs").TextFrame.TextRange.Text = "Auteurs"
.Shapes.Title.TextFrame.TextRange = "Nouveau Titre"
End With
Re Je viens de refaire un essai avec un nom, car il y a quelques collections qui ne fonctionnent pas avec un nom. Avec une autre possibilité, si c'est un titre de la diapo.
With ActivePresentation.Slides(1) .Shapes("Auteurs").TextFrame.TextRange.Text = "Auteurs" .Shapes.Title.TextFrame.TextRange = "Nouveau Titre" End With
Vous n'avez qu'un seule présentation ouverte ?
-- A+
Jacques
J'avais une erreur hier soir et ca marche maintenant.. la fatigue peut-être ;-)
merci !
"Geo" a écrit dans le message de groupe de discussion :
Ca ne marche pas
Et la slide est la 1ère
Ah ? Voici exactement le code qui a marché chez moi : ActivePresentation.Slides(1).Shapes(2).TextFrame.TextRange.Text "test"
Vous avez une erreur ?
-- A+
J'avais une erreur hier soir et ca marche maintenant.. la fatigue peut-être
;-)
merci !
"Geo" <Geo@sans.pub> a écrit dans le message de groupe de discussion :
mn.81e27d830e38b0f2.41568@sans.pub...
Ca ne marche pas
Et la slide est la 1ère
Ah ? Voici exactement le code qui a marché chez moi :
ActivePresentation.Slides(1).Shapes(2).TextFrame.TextRange.Text "test"
J'avais une erreur hier soir et ca marche maintenant.. la fatigue peut-être ;-)
merci !
"Geo" a écrit dans le message de groupe de discussion :
Ca ne marche pas
Et la slide est la 1ère
Ah ? Voici exactement le code qui a marché chez moi : ActivePresentation.Slides(1).Shapes(2).TextFrame.TextRange.Text "test"
Vous avez une erreur ?
-- A+
Jacques
oui je n'ai qu'une seule présentation ouverte mais je peux en avoir plusieurs. il faut que ce soir sur la présentation active
"Geo" a écrit dans le message de groupe de discussion :
Re Je viens de refaire un essai avec un nom, car il y a quelques collections qui ne fonctionnent pas avec un nom. Avec une autre possibilité, si c'est un titre de la diapo.
With ActivePresentation.Slides(1) .Shapes("Auteurs").TextFrame.TextRange.Text = "Auteurs" .Shapes.Title.TextFrame.TextRange = "Nouveau Titre" End With
Vous n'avez qu'un seule présentation ouverte ?
-- A+
oui je n'ai qu'une seule présentation ouverte mais je peux en avoir
plusieurs. il faut que ce soir sur la présentation active
"Geo" <Geo@sans.pub> a écrit dans le message de groupe de discussion :
mn.81f27d83331144e4.41568@sans.pub...
Re
Je viens de refaire un essai avec un nom, car il y a quelques
collections qui ne fonctionnent pas avec un nom.
Avec une autre possibilité, si c'est un titre de la diapo.
With ActivePresentation.Slides(1)
.Shapes("Auteurs").TextFrame.TextRange.Text = "Auteurs"
.Shapes.Title.TextFrame.TextRange = "Nouveau Titre"
End With
oui je n'ai qu'une seule présentation ouverte mais je peux en avoir plusieurs. il faut que ce soir sur la présentation active
"Geo" a écrit dans le message de groupe de discussion :
Re Je viens de refaire un essai avec un nom, car il y a quelques collections qui ne fonctionnent pas avec un nom. Avec une autre possibilité, si c'est un titre de la diapo.
With ActivePresentation.Slides(1) .Shapes("Auteurs").TextFrame.TextRange.Text = "Auteurs" .Shapes.Title.TextFrame.TextRange = "Nouveau Titre" End With
Vous n'avez qu'un seule présentation ouverte ?
-- A+
Jacques
Mais j'en avais peut-être bien 2 hier soir quand cela ne marchait pas
"Jacques" <none> a écrit dans le message de groupe de discussion :
oui je n'ai qu'une seule présentation ouverte mais je peux en avoir plusieurs. il faut que ce soir sur la présentation active
"Geo" a écrit dans le message de groupe de discussion :
Re Je viens de refaire un essai avec un nom, car il y a quelques collections qui ne fonctionnent pas avec un nom. Avec une autre possibilité, si c'est un titre de la diapo.
With ActivePresentation.Slides(1) .Shapes("Auteurs").TextFrame.TextRange.Text = "Auteurs" .Shapes.Title.TextFrame.TextRange = "Nouveau Titre" End With
Vous n'avez qu'un seule présentation ouverte ?
-- A+
Mais j'en avais peut-être bien 2 hier soir quand cela ne marchait pas
"Jacques" <none> a écrit dans le message de groupe de discussion :
uETww50hIHA.1168@TK2MSFTNGP02.phx.gbl...
oui je n'ai qu'une seule présentation ouverte mais je peux en avoir
plusieurs. il faut que ce soir sur la présentation active
"Geo" <Geo@sans.pub> a écrit dans le message de groupe de discussion :
mn.81f27d83331144e4.41568@sans.pub...
Re
Je viens de refaire un essai avec un nom, car il y a quelques
collections qui ne fonctionnent pas avec un nom.
Avec une autre possibilité, si c'est un titre de la diapo.
With ActivePresentation.Slides(1)
.Shapes("Auteurs").TextFrame.TextRange.Text = "Auteurs"
.Shapes.Title.TextFrame.TextRange = "Nouveau Titre"
End With
Mais j'en avais peut-être bien 2 hier soir quand cela ne marchait pas
"Jacques" <none> a écrit dans le message de groupe de discussion :
oui je n'ai qu'une seule présentation ouverte mais je peux en avoir plusieurs. il faut que ce soir sur la présentation active
"Geo" a écrit dans le message de groupe de discussion :
Re Je viens de refaire un essai avec un nom, car il y a quelques collections qui ne fonctionnent pas avec un nom. Avec une autre possibilité, si c'est un titre de la diapo.
With ActivePresentation.Slides(1) .Shapes("Auteurs").TextFrame.TextRange.Text = "Auteurs" .Shapes.Title.TextFrame.TextRange = "Nouveau Titre" End With
Vous n'avez qu'un seule présentation ouverte ?
-- A+
Geo
Mais j'en avais peut-être bien 2 hier soir quand cela ne marchait pas
C'est pour ça que maintenant j'affecte systématiquement la présentation à une variable, ou un document Word ou un classeur Excel. On est certain de l'entité sur laquelle on travaille. Surtout si un jour vous voulez faire, par exemple, des copies de diapos d'une présentation à l'autre, ça évite de se prendre les pieds dans le tapis.
Merci pour le retour.
-- A+
Mais j'en avais peut-être bien 2 hier soir quand cela ne marchait pas
C'est pour ça que maintenant j'affecte systématiquement la présentation
à une variable, ou un document Word ou un classeur Excel. On est
certain de l'entité sur laquelle on travaille.
Surtout si un jour vous voulez faire, par exemple, des copies de diapos
d'une présentation à l'autre, ça évite de se prendre les pieds dans le
tapis.
Mais j'en avais peut-être bien 2 hier soir quand cela ne marchait pas
C'est pour ça que maintenant j'affecte systématiquement la présentation à une variable, ou un document Word ou un classeur Excel. On est certain de l'entité sur laquelle on travaille. Surtout si un jour vous voulez faire, par exemple, des copies de diapos d'une présentation à l'autre, ça évite de se prendre les pieds dans le tapis.