Supprimer des feuilles

[Marion]

Je voudrais qu'à la suite de sélection dans un formulaire certaines feuille d'un fichier Excel soit supprimées.

Le problème est que certaines feuilles ne sont pas supprimer
Est-ce que la présence de macro dans la feuille peut en empêcher la suppression ?
Merci

 

[@+Thierry]

Bonjour Marion, le Forum


Le fait qu'il y ait des macros dans le Private Module d'une Feuille n'empêche en rien sa suppression.

Que cette suppression se fasse manuellement ou par ce genre de code VBA :
Sub KillSheet()
FeuilToKill = InputBox("Nom de la feuille à supprimer ?")
Application.DisplayAlerts = False
On Error GoTo Out
Sheets(FeuilToKill).Delete
Application.DisplayAlerts = True
Exit Sub
Out:
MsgBox "La Feuille : " & FeuilToKill & " n'existe pas"
End Sub

Donc je ne vois pas où ce trouve ton problème ? Ou alors c'est que tu as le Classeur en mode de Protection ?

De plus je ne suis pas sûr de bien saisir "qu'à la suite de sélection dans un formulaire" qu'entends-tu par là ? tu passes par un UserForm ?

...@Suivre...
@+Thierry

 

[Marion]

Copier une feuille dans un autre fichier

Merci thierry

J'ai essayer une autre méthode mais la encore un autre probléme (dsl de vous embéter avec des pb de débutante)
Quand je fais

MonClasseur.sheets(I).SaveAs "C:\test.xls"


MonClasseur.sheets(I) étant égale à une feuille d'un classeur Excel (Qui n'est pas Test.xls), ca me copie tout le classeur au lieu de me copier uniquement la feuille en question.
Comment faire pour copier seulement une feuille ?

PS: je manipule un fichier Excel à partir d'un formulaire Access.

Merci
Marion