Salut à tous,
Dans une feuille j'ai un bouton macro et qlq graphiques, je souhaite effacer
tous mes graphiques et texte sauf mon bouton que je place en tete de page et
qui contient une macro.
J'ai pas trouvé
Merci d'avance
Youky
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 Youky
Salut à tous, Dans une feuille j'ai un bouton macro et qlq graphiques, je souhaite effacer tous mes graphiques et texte sauf mon bouton que je place en tete de page et qui contient une macro. J'ai pas trouvé
Tu peux rien effacer ? ou tu effaces tout ? J'ai pas bien compris. Tu me diras que s'il n'y a que moi, ce n'est pas grave.
--
A+
Bonjour Youky
Salut à tous,
Dans une feuille j'ai un bouton macro et qlq graphiques, je souhaite
effacer tous mes graphiques et texte sauf mon bouton que je place en
tete de page et qui contient une macro.
J'ai pas trouvé
Tu peux rien effacer ? ou tu effaces tout ?
J'ai pas bien compris.
Tu me diras que s'il n'y a que moi, ce n'est pas grave.
Salut à tous, Dans une feuille j'ai un bouton macro et qlq graphiques, je souhaite effacer tous mes graphiques et texte sauf mon bouton que je place en tete de page et qui contient une macro. J'ai pas trouvé
Tu peux rien effacer ? ou tu effaces tout ? J'ai pas bien compris. Tu me diras que s'il n'y a que moi, ce n'est pas grave.
--
A+
Youky
Merci Geo, Je veux tout effacer sauf mon bouton VBA J'arrive à tout effacer mais le bouton disparait aussi.... A savoir, ce bouton est placé en 1er sur la page. Youky "Geo" a écrit dans le message news:
Bonjour Youky
Salut à tous, Dans une feuille j'ai un bouton macro et qlq graphiques, je souhaite effacer tous mes graphiques et texte sauf mon bouton que je place en tete de page et qui contient une macro. J'ai pas trouvé
Tu peux rien effacer ? ou tu effaces tout ? J'ai pas bien compris. Tu me diras que s'il n'y a que moi, ce n'est pas grave.
--
A+
Merci Geo,
Je veux tout effacer sauf mon bouton VBA
J'arrive à tout effacer mais le bouton disparait aussi....
A savoir, ce bouton est placé en 1er sur la page.
Youky
"Geo" <Geo@sans.pub> a écrit dans le message news:
OsoYoH5PFHA.1096@TK2MSFTNGP12.phx.gbl...
Bonjour Youky
Salut à tous,
Dans une feuille j'ai un bouton macro et qlq graphiques, je souhaite
effacer tous mes graphiques et texte sauf mon bouton que je place en
tete de page et qui contient une macro.
J'ai pas trouvé
Tu peux rien effacer ? ou tu effaces tout ?
J'ai pas bien compris.
Tu me diras que s'il n'y a que moi, ce n'est pas grave.
Merci Geo, Je veux tout effacer sauf mon bouton VBA J'arrive à tout effacer mais le bouton disparait aussi.... A savoir, ce bouton est placé en 1er sur la page. Youky "Geo" a écrit dans le message news:
Bonjour Youky
Salut à tous, Dans une feuille j'ai un bouton macro et qlq graphiques, je souhaite effacer tous mes graphiques et texte sauf mon bouton que je place en tete de page et qui contient une macro. J'ai pas trouvé
Tu peux rien effacer ? ou tu effaces tout ? J'ai pas bien compris. Tu me diras que s'il n'y a que moi, ce n'est pas grave.
--
A+
Oliv'
Youky que je salut a écrit dans
Salut à tous, Dans une feuille j'ai un bouton macro et qlq graphiques, je souhaite effacer tous mes graphiques et texte sauf mon bouton que je place en tete de page et qui contient une macro. J'ai pas trouvé Merci d'avance Youky essaye cela, ca supprime tous les objets inlineshapes
Sub macro4()
For Each s In ActiveDocument.InlineShapes s.Select toto = s.Field.Index If toto <> 1 Then s.Delete End If
Next s
End Sub
il faut que ton bouton ait bien l'index 1 (à priori si c'est le premier a avoir été créé) sinon change dans if toto <> x
-- ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ Have a nice day Oliv' Pour me joindre : http://cerbermail.com/?V8r2o1YHl4 ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Youky <bruno.jeune-nospam@wanadoo.fr> que je salut a écrit dans
OgTdXK4PFHA.2680@TK2MSFTNGP09.phx.gbl
Salut à tous,
Dans une feuille j'ai un bouton macro et qlq graphiques, je souhaite
effacer tous mes graphiques et texte sauf mon bouton que je place en
tete de page et qui contient une macro.
J'ai pas trouvé
Merci d'avance
Youky
essaye cela, ca supprime tous les objets inlineshapes
Sub macro4()
For Each s In ActiveDocument.InlineShapes
s.Select
toto = s.Field.Index
If toto <> 1 Then
s.Delete
End If
Next s
End Sub
il faut que ton bouton ait bien l'index 1 (à priori si c'est le premier a
avoir été créé)
sinon change dans if toto <> x
--
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Have a nice day
Oliv'
Pour me joindre : http://cerbermail.com/?V8r2o1YHl4
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Salut à tous, Dans une feuille j'ai un bouton macro et qlq graphiques, je souhaite effacer tous mes graphiques et texte sauf mon bouton que je place en tete de page et qui contient une macro. J'ai pas trouvé Merci d'avance Youky essaye cela, ca supprime tous les objets inlineshapes
Sub macro4()
For Each s In ActiveDocument.InlineShapes s.Select toto = s.Field.Index If toto <> 1 Then s.Delete End If
Next s
End Sub
il faut que ton bouton ait bien l'index 1 (à priori si c'est le premier a avoir été créé) sinon change dans if toto <> x
-- ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ Have a nice day Oliv' Pour me joindre : http://cerbermail.com/?V8r2o1YHl4 ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Youky
Désolé d'être aussi tardif, Merci Olivier cela va m'aider
"Oliv'" <(supprimerceci) a écrit dans le message news: #
Youky que je salut a écrit dans
Salut à tous, Dans une feuille j'ai un bouton macro et qlq graphiques, je souhaite effacer tous mes graphiques et texte sauf mon bouton que je place en tete de page et qui contient une macro. J'ai pas trouvé Merci d'avance Youky essaye cela, ca supprime tous les objets inlineshapes
Sub macro4()
For Each s In ActiveDocument.InlineShapes s.Select toto = s.Field.Index If toto <> 1 Then s.Delete End If
Next s
End Sub
il faut que ton bouton ait bien l'index 1 (à priori si c'est le premier a avoir été créé) sinon change dans if toto <> x
-- ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ Have a nice day Oliv' Pour me joindre : http://cerbermail.com/?V8r2o1YHl4 ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Désolé d'être aussi tardif,
Merci Olivier cela va m'aider
"Oliv'" <(supprimerceci)catteau@ricour-assurances.fr> a écrit dans le
message news: #rvs4MBQFHA.3880@tk2msftngp13.phx.gbl...
Youky <bruno.jeune-nospam@wanadoo.fr> que je salut a écrit dans
OgTdXK4PFHA.2680@TK2MSFTNGP09.phx.gbl
Salut à tous,
Dans une feuille j'ai un bouton macro et qlq graphiques, je souhaite
effacer tous mes graphiques et texte sauf mon bouton que je place en
tete de page et qui contient une macro.
J'ai pas trouvé
Merci d'avance
Youky
essaye cela, ca supprime tous les objets inlineshapes
Sub macro4()
For Each s In ActiveDocument.InlineShapes
s.Select
toto = s.Field.Index
If toto <> 1 Then
s.Delete
End If
Next s
End Sub
il faut que ton bouton ait bien l'index 1 (à priori si c'est le premier a
avoir été créé)
sinon change dans if toto <> x
--
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Have a nice day
Oliv'
Pour me joindre : http://cerbermail.com/?V8r2o1YHl4
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Désolé d'être aussi tardif, Merci Olivier cela va m'aider
"Oliv'" <(supprimerceci) a écrit dans le message news: #
Youky que je salut a écrit dans
Salut à tous, Dans une feuille j'ai un bouton macro et qlq graphiques, je souhaite effacer tous mes graphiques et texte sauf mon bouton que je place en tete de page et qui contient une macro. J'ai pas trouvé Merci d'avance Youky essaye cela, ca supprime tous les objets inlineshapes
Sub macro4()
For Each s In ActiveDocument.InlineShapes s.Select toto = s.Field.Index If toto <> 1 Then s.Delete End If
Next s
End Sub
il faut que ton bouton ait bien l'index 1 (à priori si c'est le premier a avoir été créé) sinon change dans if toto <> x
-- ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ Have a nice day Oliv' Pour me joindre : http://cerbermail.com/?V8r2o1YHl4 ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~