OVH Cloud OVH Cloud

supprimer

2 réponses
Avatar
dede2801
re bonjour

je voudrai supprimer par macro une feuille et un lie
ex :
feuille(sommaire) range "a5" = nom de la feuille lié
donc il faudrai que je supprime la feuille et son lien par un cli
merci a tous

2 réponses

Avatar
Ellimac
Bonjour,

Sub titi()
laf = Left(Range("a8"), Len(Range("a8")) - 3)
If Right(laf, 1) = "'" Then laf =
Application.Substitute(laf, "'", "")
Application.DisplayAlerts = False
Sheets(laf).Delete
Application.DisplayAlerts = True
Range("a8") = ""
End Sub

Camille

-----Message d'origine-----
re bonjour,

je voudrai supprimer par macro une feuille et un lien
ex :
feuille(sommaire) range "a5" = nom de la feuille liée
donc il faudrai que je supprime la feuille et son lien
par un clic

merci a tous
.



Avatar
Nicolas B.
Salut,

La macro suivante supprime la feuille dont le nom est inscrit dans la
cellule sélectionnée et vide cette même cellule.

Sub SuppFeuille()
Application.DisplayAlerts = False
Sheets(ActiveCell.Value).Delete
ActiveCell.ClearContents
Application.DisplayAlerts = True
End Sub


A+
--
Nicolas B.

Adresse @adresse.bidon.com invalide,
E-mail : www.cerbermail.com/?gAAILfkPsC


re bonjour,

je voudrai supprimer par macro une feuille et un lien
ex :
feuille(sommaire) range "a5" = nom de la feuille liée
donc il faudrai que je supprime la feuille et son lien par un clic
merci a tous