Discussion :

[stargates]

Bonjour,

j'ai fait un petit bout de code pour pouvoir supprimer la feuille courante

Pour cela j'ai créer une petite forme qui demande à l'utilisateur,s'il veut vraiment supprimer la feuille courante avec deux boutons oui et non.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
Private Sub cmdOui_Click()
 
Dim feuille as Worksheet
Set feuille = ActiveSheet
Application.DisplayAlerts = False
feuille.delete
frmSupprimer.Hide
Application.DisplayAlerts = True
 
End Sub

Il me retourne une erreur

Run-time error '-2147417848(80010108)
Automation error

Une idée ,merci

[SfJ5Rpw8]

il y as quoi dans ton classeur Excel... ? que des feuilles de calculs .? des graphiques .? ... que ce passe-t'il si tu essai de supprimer la fameuse feuille à la main ?

[stargates]

résolu, il y avait des cellules bloquées, donc en les débloquant pas de problème

merci quand même

[SfJ5Rpw8]

résolu, il y avait des cellules bloquées, donc en les débloquant pas de problème

merci quand même

: c'est quoi des cellules bloquées ?

[stargates]

Des cellules dont l'utilisateur ne peut modifier le contenu,en anglais "lock cell" cellules protégées?