Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

RAZ

  • Initiateur de la discussion NAT
  • Date de début
N

NAT

Guest
Bonsoir a vous

jai un petit probléme je cherche par un bouton raz a mettre une feuil a zero
sur cette page jai des wordart et text box
comment les sup
ma macro ne marche pas
merci pour votre aide

ActiveSheet.Shapes('WordArt 20').Select
Selection.Delete
ActiveSheet.Shapes('Text Box 21').Select
Selection.Delete
End Sub :unsure:
 
L

loic38

Guest
re-bonsoir Nat
dans mon exemple la macro s'effectue sur la Feuil1 (worsksheet1)
la feuille sur laquelle doit être supprimé tes wordart se trouve en quelle position ? 1,2,3 ?
 
L

loic38

Guest
re bonsoir
tu ne réponds pas à ma question tu m'as donné le nom de la feuille
pas son N° dans la liste

peut tu zipper ton fichier et le déposer sur un prochain post ?
merci
 
L

loic38

Guest
re bonsoir

essayes avec cette macro

Sub macro2()
Set myDocument = Sheets('Wordart32') 'à adapter
myDocument.Shapes.SelectAll

Selection.Delete
End Sub

wordart32 étant le nom de la feuille sur laquelle se trouvent les wordart
 
N

nat

Guest
escuse lol [file name=tp.zip size=2280]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/tp.zip[/file]
 

Pièces jointes

  • tp.zip
    2.8 KB · Affichages: 25
  • tp.zip
    2.8 KB · Affichages: 21
  • tp.zip
    2.8 KB · Affichages: 23
L

loic38

Guest
re- bonsoir
ci joint fichier zippé avec macro RAZ
j'espère qu'elle marchera
dans le cas on en reparle demain
[file name=tpbis.zip size=9076]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/tpbis.zip[/file]
 

Pièces jointes

  • tpbis.zip
    8.9 KB · Affichages: 23
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…