J'ai un souci de vb sous PPoint 2002. Je cr=E9=E9 une macro=20
automatisant un sommaire dans la 2eme diapo du mod=E8le.
Seulement lorsque j'utilise les commandes d'insertion de=20
N=B0 dans le VBA il me donne une puce en r=E9sultat.
losrque j'effectue l'enregistrement automatique voici ce=20
qu'il donne :
=20
With ActiveWindow.Selection.ShapeRange. _
TextFrame.TextRange.Paragraphs(Start:=3D3, _
Length:=3D1).ParagraphFormat.Bullet
.Visible =3D msoTrue
.UseTextFont =3D msoTrue
.UseTextColor =3D msoTrue
.Character =3D 8226
End With
Par contre =E0 l'=E9xecution il donne une puce POINT
Je souhaiterais un chiffre romain (comme on peut le faire=20
manuellement par le menu format - Puce et N=B0 - onglet N=B0 -
choix 4)
Comment faire Please ...? Je p=E8te les plombs ...
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Geo
Bonjour Cervolent
Salut à tous,
J'ai un souci de vb sous PPoint 2002. Je créé une macro automatisant un sommaire dans la 2eme diapo du modèle. Seulement lorsque j'utilise les commandes d'insertion de N° dans le VBA il me donne une puce en résultat. losrque j'effectue l'enregistrement automatique voici ce qu'il donne :
With ActiveWindow.Selection.ShapeRange. _ TextFrame.TextRange.Paragraphs(Start:=3, _ Length:=1).ParagraphFormat.Bullet .Visible = msoTrue .UseTextFont = msoTrue .UseTextColor = msoTrue .Character = 8226 End With Par contre à l'éxecution il donne une puce POINT Je souhaiterais un chiffre romain (comme on peut le faire manuellement par le menu format - Puce et N° - onglet N° - choix 4) Comment faire Please ...? Je pète les plombs ...
C'est curieux ce texte, l'enregistreur de macros ne serait plus notre ami ? remplace la ligne Character par : .Style = ppBulletRomanUCParenRight Il y a a plusieurs formes de numérotation en romain possible, tu trouveras les valeur dans l'aide de "Style, propriété" Méfie toi que Paragraphs(Start:=3, Length:=1). ne numérote que le paragraphe 3.
--
A+
Bonjour Cervolent
Salut à tous,
J'ai un souci de vb sous PPoint 2002. Je créé une macro
automatisant un sommaire dans la 2eme diapo du modèle.
Seulement lorsque j'utilise les commandes d'insertion de
N° dans le VBA il me donne une puce en résultat.
losrque j'effectue l'enregistrement automatique voici ce
qu'il donne :
With ActiveWindow.Selection.ShapeRange. _
TextFrame.TextRange.Paragraphs(Start:=3, _
Length:=1).ParagraphFormat.Bullet
.Visible = msoTrue
.UseTextFont = msoTrue
.UseTextColor = msoTrue
.Character = 8226
End With
Par contre à l'éxecution il donne une puce POINT
Je souhaiterais un chiffre romain (comme on peut le faire
manuellement par le menu format - Puce et N° - onglet N° -
choix 4)
Comment faire Please ...? Je pète les plombs ...
C'est curieux ce texte, l'enregistreur de macros ne serait plus notre
ami ?
remplace la ligne Character par :
.Style = ppBulletRomanUCParenRight
Il y a a plusieurs formes de numérotation en romain possible, tu
trouveras les valeur dans l'aide de
"Style, propriété"
Méfie toi que
Paragraphs(Start:=3, Length:=1).
ne numérote que le paragraphe 3.
J'ai un souci de vb sous PPoint 2002. Je créé une macro automatisant un sommaire dans la 2eme diapo du modèle. Seulement lorsque j'utilise les commandes d'insertion de N° dans le VBA il me donne une puce en résultat. losrque j'effectue l'enregistrement automatique voici ce qu'il donne :
With ActiveWindow.Selection.ShapeRange. _ TextFrame.TextRange.Paragraphs(Start:=3, _ Length:=1).ParagraphFormat.Bullet .Visible = msoTrue .UseTextFont = msoTrue .UseTextColor = msoTrue .Character = 8226 End With Par contre à l'éxecution il donne une puce POINT Je souhaiterais un chiffre romain (comme on peut le faire manuellement par le menu format - Puce et N° - onglet N° - choix 4) Comment faire Please ...? Je pète les plombs ...
C'est curieux ce texte, l'enregistreur de macros ne serait plus notre ami ? remplace la ligne Character par : .Style = ppBulletRomanUCParenRight Il y a a plusieurs formes de numérotation en romain possible, tu trouveras les valeur dans l'aide de "Style, propriété" Méfie toi que Paragraphs(Start:=3, Length:=1). ne numérote que le paragraphe 3.
--
A+
Cervolent
Un gros merci Géo ... aide géniale. Celle de PPoint comporte plusieurs "Style, Propriété" mais j'ai pu trouver celui qui m'intéressait ... "ppBulletRomanUCPeriod" Chiffres romains en majuscules avec un point.
Encore merci ..
Un gros merci Géo ... aide géniale.
Celle de PPoint comporte plusieurs "Style, Propriété"
mais j'ai pu trouver celui qui m'intéressait ...
"ppBulletRomanUCPeriod" Chiffres romains en majuscules
avec un point.
Un gros merci Géo ... aide géniale. Celle de PPoint comporte plusieurs "Style, Propriété" mais j'ai pu trouver celui qui m'intéressait ... "ppBulletRomanUCPeriod" Chiffres romains en majuscules avec un point.