Discussion :

[cati_78]

Bonjour,

Je me permets de solliciter votre aide sur le point suivant :

Je ne sais pas comment faire pour afficher un message lorsque l'utilisateur supprime ou ajoute des lignes ou colonnes sur une feuille EXCEL

Merci d'avance pour votre aide.

[cati_78]

Bonjour,

Y-t-il une méthode simple pour faire cette détection : protection de feuille, worksheet_change,... ?

Merci d'avance pour votre aide.

[ouskel'n'or]

Protège ta feuille.
Dans Excel -> Menu Outils -> Protection
Dans VBA, regarde à Protect dans l'aide en ligne

[cati_78]

La fonction protect entraîne une protection totale de la feuille : on ne peut pas écrire dans les cellules.

Je souhaite que la protection soit partielle : dans une plage de cellule données
, l'utilisateur peut modifier le contenu des cellules mais ne peut pas ajouter ou supprimer lignes et colonnes.

Je ne sais pas comment faire pour faire cette détection.

Merci d'avance pour votre aide.

[ouskel'n'or]

Ça, c'est parce que tu n'es pas allée au bout de ta lecture. Tu as plein de paramètres... paramétrables
Par exemple :

UserInterfaceOnly Argument de type Variant facultatif. Cet argument a la valeur True pour protéger l'interface utilisateur, mais pas les macros. Si cet argument n'est pas spécifié, la protection s'applique à la fois aux macros et à l'interface utilisateur.

ou bien

AllowInsertingColumns Argument de type Variant facultatif. La valeur True permet à l'utilisateur d'insérer des colonnes dans une feuille de calcul protégée. La valeur par défaut est False.

AllowInsertingRows Argument de type Variant facultatif. La valeur True permet à l'utilisateur d'insérer des lignes dans une feuille de calcul protégée. La valeur par défaut est False.

Et tu en as encore plein dans l'aide en ligne à "Protect appliqué à Worksheet"
Bonne lecture et Bonne soirée

[cati_78]

En utilisant la fonction protect et en précisant la valeur des divers paramètres associés, l'utilisant ne peut pas, en effet, supprimer ou ajouter des lignes ou colonnes.

Le souci réside dans le fait que même si l'utilisateur est autorisé à saisir des données dans les cellules, certaines d'entre elles restent protégées (cellules vides et remplies).

Y-a-t-il une méthode pour simuler un "undo" (Ctrl +Z) ou bloquer l'action "supprimer" ou "ajouter" à chaque fois que l'utilisateur veut le faire ?

Je ne sais pas comment faire pour résoudre ce problème.

Merci d'avance pour votre aide.

[ouskel'n'or]

La difficulté dans la formulation de ce type de discussion est de finir par comprendre le but de la manoeuvre...
Je reformule ce que j'ai compris de nos échanges :
Tu veux que les utilisateurs puissent compléter les données d'une feuille de calculs sans qu'il puisse modifier les données précédemment saisies. Apparemment... ils doivent pouvoir modifier leurs propres saisies.
Si je ne commets pas d'erreur...

Quant à Undo ? Pourquoi faire ?... Puisqu'une annulation peut se faire par Excel et que Undo ne peut pas supprimer une commande VBA.

[cati_78]

Oui, je souhaite que l'utilisateur puisse modifier les feuilles du classeur EXCEL en terme de saisie. Mais le code doit leur interdire d'ajouter ou supprimer ligne et colonne.

Je ne sais pas comment faire pour bloquer ces actions, pour griser les actions "supprimer" et "ajouter" du menu édition : avec protect, on ne peut pas saisir dans certaines cellules de la feuille.

Merci d'avance pour votre aide.

[ouskel'n'or]

Pour saisir des données dans une feuille protégée, les cellules doivent être "déverrouillées".
Dans Excel, il suffit, avant protection de la feuille, de sélectionner les cellules à renseigner, de les déverrouiller (-> Menu Format -> Cellules -> Onglet Protection -> dévalider l'option "verrouillée") Enfin tu protéges ta feuille.
Si tu enregistres la macro en faisant, tu auras "un" code qu'il te restera à nettoyer de tous les selects ou à nous le soumettre pour qu'on te montre comment faire

[cati_78]

J'ai déverrouillé les cellules de la feuille EXCEL et j'ai activé la protection de la feuille.

Code :

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

1
2
3
Sub test()
    ActiveSheet.Protect AllowInsertingRows:=False AllowInsertingColumns:=False
End Sub

Je ne sais pas si cela suffit car j'ai déjà utilisé protect et cela n'a pas fonctionné.

Merci d'avance pour votre aide.

[ouskel'n'or]

cela n'a pas fonctionné

Peux-tu être plus explicite ? Erreur ? sur quel code ? Protection des cellules non verrouillées maintenues ? Protection inopérante sur cellules verrouillées ?

[cati_78]

Il n'y avait pas d'erreur dans le code mais je n'obtenais pas le résultat que je souhaitais.

Le problème était le suivant : saisie possible dans certaines cellules mais pas dans toutes car elles étaient protégées.

Je me demande si la syntaxe que j'ai donné est correcte ou quels sont les facteurs possibles expliquant ce résultat.

Merci d'avance pour votre aide.

[ouskel'n'or]

Je me demande si la syntaxe que j'ai donné est correcte ou quels sont les facteurs possibles expliquant ce résultat.

Si tu déverrouilles certaines cellules et en laisses verrouillées d'autres il est normal que tu puisses écrire dans les cellules déverrouillées et inversement...

[cati_78]

Cela fonctionne. Merci encore pour votre aide.