Est-il possible de redémarér la numérotation d'une série à l'aide de VBA?
cela m'est nécessaire car j'insère plusieurs instances d'un même fichier en
tant que lien et séparé par des sections (toujours par code VBA), ce fichier
peut contenir une numérotation.
Et lors de la deuxième insetion du même fichier, la numérotation continue au
lieu de recommencer à 1.
Mannuellement, je clickerai avec le bouton droit de la sourie et redémarerai
la numérotation simplement, mais comment avoir le même résultat par code?
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
Warrio
Merci pour toute suggestion!
"Warrio" a écrit dans le message de news: 46aa50cc$0$3801$
Bonjour,
Est-il possible de redémarér la numérotation d'une série à l'aide de VBA?
cela m'est nécessaire car j'insère plusieurs instances d'un même fichier en tant que lien et séparé par des sections (toujours par code VBA), ce fichier peut contenir une numérotation. Et lors de la deuxième insetion du même fichier, la numérotation continue au lieu de recommencer à 1. Mannuellement, je clickerai avec le bouton droit de la sourie et redémarerai la numérotation simplement, mais comment avoir le même résultat par code?
Merci pour toute suggestion!
"Warrio" <warrio@hotmail.com> a écrit dans le message de news:
46aa50cc$0$3801$5402220f@news.sunrise.ch...
Bonjour,
Est-il possible de redémarér la numérotation d'une série à l'aide de VBA?
cela m'est nécessaire car j'insère plusieurs instances d'un même fichier
en tant que lien et séparé par des sections (toujours par code VBA), ce
fichier peut contenir une numérotation.
Et lors de la deuxième insetion du même fichier, la numérotation continue
au lieu de recommencer à 1.
Mannuellement, je clickerai avec le bouton droit de la sourie et
redémarerai la numérotation simplement, mais comment avoir le même
résultat par code?
"Warrio" a écrit dans le message de news: 46aa50cc$0$3801$
Bonjour,
Est-il possible de redémarér la numérotation d'une série à l'aide de VBA?
cela m'est nécessaire car j'insère plusieurs instances d'un même fichier en tant que lien et séparé par des sections (toujours par code VBA), ce fichier peut contenir une numérotation. Et lors de la deuxième insetion du même fichier, la numérotation continue au lieu de recommencer à 1. Mannuellement, je clickerai avec le bouton droit de la sourie et redémarerai la numérotation simplement, mais comment avoir le même résultat par code?
Anacoluthe
Bonjour !
'Warrio' nous a écrit ...
Est-il possible de redémarér la numérotation d'une série à l'aide de VBA? cela m'est nécessaire car j'insère plusieurs instances d'un même fichier en tant que lien et séparé par des sections (toujours par code VBA), ce fichier peut contenir une numérotation. Et lors de la deuxième insetion du même fichier, la numérotation continue au lieu de recommencer à 1. Mannuellement, je clickerai avec le bouton droit de la sourie et redémarerai la numérotation simplement, mais comment avoir le même résultat par code?
With Selection.Range.ListFormat .ApplyListTemplate .ListTemplate, ContinuePreviousList:úlse End With
Ce code redémarre la numérotation à 1 d'une liste au niveau de la sélection.
( Notez que ce code ne vérifie pas que votre sélection se trouve bien dans une liste numérotée..... )
Anacoluthe « Toute liste est perfectible » - Ludwig WITTGENSTEIN
Bonjour !
'Warrio' nous a écrit ...
Est-il possible de redémarér la numérotation d'une série à l'aide de VBA?
cela m'est nécessaire car j'insère plusieurs instances d'un même fichier en
tant que lien et séparé par des sections (toujours par code VBA), ce fichier
peut contenir une numérotation.
Et lors de la deuxième insetion du même fichier, la numérotation continue au
lieu de recommencer à 1.
Mannuellement, je clickerai avec le bouton droit de la sourie et redémarerai
la numérotation simplement, mais comment avoir le même résultat par code?
With Selection.Range.ListFormat
.ApplyListTemplate .ListTemplate, ContinuePreviousList:úlse
End With
Ce code redémarre la numérotation à 1 d'une liste au niveau de la sélection.
( Notez que ce code ne vérifie pas que votre sélection se trouve bien
dans une liste numérotée..... )
Anacoluthe
« Toute liste est perfectible »
- Ludwig WITTGENSTEIN
Est-il possible de redémarér la numérotation d'une série à l'aide de VBA? cela m'est nécessaire car j'insère plusieurs instances d'un même fichier en tant que lien et séparé par des sections (toujours par code VBA), ce fichier peut contenir une numérotation. Et lors de la deuxième insetion du même fichier, la numérotation continue au lieu de recommencer à 1. Mannuellement, je clickerai avec le bouton droit de la sourie et redémarerai la numérotation simplement, mais comment avoir le même résultat par code?
With Selection.Range.ListFormat .ApplyListTemplate .ListTemplate, ContinuePreviousList:úlse End With
Ce code redémarre la numérotation à 1 d'une liste au niveau de la sélection.
( Notez que ce code ne vérifie pas que votre sélection se trouve bien dans une liste numérotée..... )
Anacoluthe « Toute liste est perfectible » - Ludwig WITTGENSTEIN
Warrio
Merci Anacoluthe pour ta réponse!
mais sans savoir ou se trouve ma numérotation, je ne pourrais rien faire... Puis-je alors parcourir le document à la recherche de numérotation?
Merci encore!
"Anacoluthe" a écrit dans le message de news: uYiJm%
Bonjour !
'Warrio' nous a écrit ...
Est-il possible de redémarér la numérotation d'une série à l'aide de VBA? cela m'est nécessaire car j'insère plusieurs instances d'un même fichier en tant que lien et séparé par des sections (toujours par code VBA), ce fichier peut contenir une numérotation. Et lors de la deuxième insetion du même fichier, la numérotation continue au lieu de recommencer à 1. Mannuellement, je clickerai avec le bouton droit de la sourie et redémarerai la numérotation simplement, mais comment avoir le même résultat par code?
With Selection.Range.ListFormat .ApplyListTemplate .ListTemplate, ContinuePreviousList:úlse End With
Ce code redémarre la numérotation à 1 d'une liste au niveau de la sélection.
( Notez que ce code ne vérifie pas que votre sélection se trouve bien dans une liste numérotée..... )
Anacoluthe « Toute liste est perfectible » - Ludwig WITTGENSTEIN
Merci Anacoluthe pour ta réponse!
mais sans savoir ou se trouve ma numérotation, je ne pourrais rien faire...
Puis-je alors parcourir le document à la recherche de numérotation?
Merci encore!
"Anacoluthe" <nopub_anacoluthe@Ouanadoo.fr> a écrit dans le message de news:
uYiJm%23I0HHA.4816@TK2MSFTNGP04.phx.gbl...
Bonjour !
'Warrio' nous a écrit ...
Est-il possible de redémarér la numérotation d'une série à l'aide de VBA?
cela m'est nécessaire car j'insère plusieurs instances d'un même fichier
en tant que lien et séparé par des sections (toujours par code VBA), ce
fichier peut contenir une numérotation.
Et lors de la deuxième insetion du même fichier, la numérotation continue
au lieu de recommencer à 1.
Mannuellement, je clickerai avec le bouton droit de la sourie et
redémarerai la numérotation simplement, mais comment avoir le même
résultat par code?
With Selection.Range.ListFormat
.ApplyListTemplate .ListTemplate, ContinuePreviousList:úlse
End With
Ce code redémarre la numérotation à 1 d'une liste au niveau de la
sélection.
( Notez que ce code ne vérifie pas que votre sélection se trouve bien
dans une liste numérotée..... )
Anacoluthe
« Toute liste est perfectible »
- Ludwig WITTGENSTEIN
mais sans savoir ou se trouve ma numérotation, je ne pourrais rien faire... Puis-je alors parcourir le document à la recherche de numérotation?
Merci encore!
"Anacoluthe" a écrit dans le message de news: uYiJm%
Bonjour !
'Warrio' nous a écrit ...
Est-il possible de redémarér la numérotation d'une série à l'aide de VBA? cela m'est nécessaire car j'insère plusieurs instances d'un même fichier en tant que lien et séparé par des sections (toujours par code VBA), ce fichier peut contenir une numérotation. Et lors de la deuxième insetion du même fichier, la numérotation continue au lieu de recommencer à 1. Mannuellement, je clickerai avec le bouton droit de la sourie et redémarerai la numérotation simplement, mais comment avoir le même résultat par code?
With Selection.Range.ListFormat .ApplyListTemplate .ListTemplate, ContinuePreviousList:úlse End With
Ce code redémarre la numérotation à 1 d'une liste au niveau de la sélection.
( Notez que ce code ne vérifie pas que votre sélection se trouve bien dans une liste numérotée..... )
Anacoluthe « Toute liste est perfectible » - Ludwig WITTGENSTEIN
Anacoluthe
Bonjour !
'Warrio' nous a écrit ...
mais sans savoir ou se trouve ma numérotation, je ne pourrais rien faire... Puis-je alors parcourir le document à la recherche de numérotation?
Il suffit de parcourir les paragraphes et de voir si on y trouve un objet ListFormat du ListType qu'on recherche. Il faudra ensuite savoir à quoi on reconnait ceux qu'il faut renuméroter.
Anacoluthe « Toute liste est perfectible » - Ludwig WITTGENSTEIN
Bonjour !
'Warrio' nous a écrit ...
mais sans savoir ou se trouve ma numérotation, je ne pourrais rien faire...
Puis-je alors parcourir le document à la recherche de numérotation?
Il suffit de parcourir les paragraphes et de voir si on y trouve un
objet ListFormat du ListType qu'on recherche. Il faudra ensuite savoir
à quoi on reconnait ceux qu'il faut renuméroter.
Anacoluthe
« Toute liste est perfectible »
- Ludwig WITTGENSTEIN
mais sans savoir ou se trouve ma numérotation, je ne pourrais rien faire... Puis-je alors parcourir le document à la recherche de numérotation?
Il suffit de parcourir les paragraphes et de voir si on y trouve un objet ListFormat du ListType qu'on recherche. Il faudra ensuite savoir à quoi on reconnait ceux qu'il faut renuméroter.
Anacoluthe « Toute liste est perfectible » - Ludwig WITTGENSTEIN
Warrio
Salut Anacoluthe!
Merci beaucoup pour ta réponse, mais j'ai trouvé une solution beaucoup plus simple: transformer les numérotation en texte brut à l'aide de la méthode ConvertNumbersToText
j'aurais du me torturer l'esprit sinon...
Merci encore pour ton aide! Meilleures salutations
"Anacoluthe" a écrit dans le message de news:
Bonjour !
'Warrio' nous a écrit ...
mais sans savoir ou se trouve ma numérotation, je ne pourrais rien faire... Puis-je alors parcourir le document à la recherche de numérotation?
Il suffit de parcourir les paragraphes et de voir si on y trouve un objet ListFormat du ListType qu'on recherche. Il faudra ensuite savoir à quoi on reconnait ceux qu'il faut renuméroter.
Anacoluthe « Toute liste est perfectible » - Ludwig WITTGENSTEIN
Salut Anacoluthe!
Merci beaucoup pour ta réponse, mais j'ai trouvé une solution beaucoup plus
simple: transformer les numérotation en texte brut
à l'aide de la méthode ConvertNumbersToText
j'aurais du me torturer l'esprit sinon...
Merci encore pour ton aide!
Meilleures salutations
"Anacoluthe" <nopub_anacoluthe@Ouanadoo.fr> a écrit dans le message de news:
ut6nuTJ0HHA.3768@TK2MSFTNGP06.phx.gbl...
Bonjour !
'Warrio' nous a écrit ...
mais sans savoir ou se trouve ma numérotation, je ne pourrais rien
faire...
Puis-je alors parcourir le document à la recherche de numérotation?
Il suffit de parcourir les paragraphes et de voir si on y trouve un
objet ListFormat du ListType qu'on recherche. Il faudra ensuite savoir
à quoi on reconnait ceux qu'il faut renuméroter.
Anacoluthe
« Toute liste est perfectible »
- Ludwig WITTGENSTEIN
Merci beaucoup pour ta réponse, mais j'ai trouvé une solution beaucoup plus simple: transformer les numérotation en texte brut à l'aide de la méthode ConvertNumbersToText
j'aurais du me torturer l'esprit sinon...
Merci encore pour ton aide! Meilleures salutations
"Anacoluthe" a écrit dans le message de news:
Bonjour !
'Warrio' nous a écrit ...
mais sans savoir ou se trouve ma numérotation, je ne pourrais rien faire... Puis-je alors parcourir le document à la recherche de numérotation?
Il suffit de parcourir les paragraphes et de voir si on y trouve un objet ListFormat du ListType qu'on recherche. Il faudra ensuite savoir à quoi on reconnait ceux qu'il faut renuméroter.
Anacoluthe « Toute liste est perfectible » - Ludwig WITTGENSTEIN
