Empêcher modifications cellule

IRSJ Messages postés 21 Date d'inscription Statut Membre Dernière intervention -
Patrice33740 Messages postés 8561 Date d'inscription Statut Membre Dernière intervention - 10 août 2015 à 19:23

Bonjour tout le monde, voilà je vais y aller directement :lol: .

J'utilise quotidiennement Excel, j'aimerai une application y incluse (Excel 2013) ou une autre méthode qui me permettrait d'écrire une et une seule fois pour toute sans posibilité de modification dans une se ses colonnes.

Je sais si une telle option existe mais j'en ai vraiment besoin car ayant cherché sur tous les forums en vain :??: . Je m'en remet à vous. Merci.

Afficher la suite

A voir également:

Comment empêcher la modification d'une cellule excel
Comment aller à la ligne dans une cellule excel - Guide
Excel cellule couleur si condition texte - Guide
Liste déroulante excel - Guide
Suivi de modification word - Guide
Proteger cellule excel - Guide

2 réponses

Réponse 1 / 2

via55 Messages postés 14512 Date d'inscription Statut Membre Dernière intervention 2 746

Bonjour

Une possibilité par macro

En premier lieu déverrouiller toutes les cellules de la feuille ( Format de cellue - Protection - Décocher Verrouillé)

Ensuit copier coller la macro dans le worksheet de la feuille (ALT+F11 pour ouvrir éditeur VBA, Double-clic sur feuille concernée dans arborescence)

Private Sub Worksheet_Change(ByVal Target As Range)
'recupèration lettre de la colonne d'entrée d'une valeur
col = Split(Target.Address, "$")(1)
'selection de la colonne
Columns(col & ":" & col).Select
' déprotection de la feuille
ActiveSheet.Unprotect
' Verouillage de la colonne selectionnée
Selection.Locked = True
' Reprotection de la feuille
ActiveSheet.Protect
End Sub

Cdlmnt
Via

"L'imagination est plus importante que le savoir." A. Einstein

IRSJ Messages postés 21 Date d'inscription Statut Membre Dernière intervention

Bonjour Via55, je vais essayer ta méthode et t'en dire prochainement des nouvelles. Merci.

Patrice33740 Messages postés 8561 Date d'inscription Statut Membre Dernière intervention 1 780

Bonjour via55,

Plus simplement :

Private Sub Worksheet_Change(ByVal Target As Range)
' Déprotection de la feuille
ActiveSheet.Unprotect
' Verrouillage de la ou des colonnes concernées 
Target.EntireColumn.Locked = True
' Reprotection de la feuille
ActiveSheet.Protect
End Sub

fonctionne aussi en cas de sélection multiple (et validation par Maj+Crtl+Entrée)

Edit : j'ai aussi répondu trop vite, en réalité il vaut mieux écrire :

Private Sub Worksheet_Change(ByVal Target As Range)
' Déprotection de la feuille
Me.Unprotect
' Verrouillage de la ou des colonnes concernées
Target.EntireColumn.Locked = True
' Reprotection de la feuille
Me.Protect
End Sub

car la feuille peut ne plus être active au moment du change, c'est le cas lorsqu'on valide la saisie en cliquant sur un autre onglet.

Cordialement

Réponse 2 / 2

Raymond PENTIER Messages postés 58988 Date d'inscription Statut Contributeur Dernière intervention 17 353

Bonjour IRSJ.
"ayant cherché sur tous les forums en vain"
-> tu cherchais quoi, très précisément ?
Car, même sans la macro de mon ami via55, une fois ta colonne renseignée tu déverrouilles toute la feuille comme indiqué, puis tu verrouilles la colonne et tu fais Révision/Protéger la feuille
(le mot de passe n'est pas indispensable).

IRSJ Messages postés 21 Date d'inscription Statut Membre Dernière intervention

Merci Raymond, mais le problème est que je veux qu'on puisse travailler à plusieurs sur un mème fichier avec une mème base de données. Pour que une fois on a saisi quelque chose dans une cellule ou case, on ne puisse plus le changer. Sans intervention de personne ou du logiciel mème.

Raymond PENTIER Messages postés 58988 Date d'inscription Statut Contributeur Dernière intervention 17 353 > IRSJ Messages postés 21 Date d'inscription Statut Membre Dernière intervention

Ah ! Ce n'était pas aussi clairement expliqué au départ !
J'ignore si ce sera faisable (sauf peut-être par macro) ...

Discussions similaires

Excel:récupérer le contenu d'une cellule en fonction d'une autre

Range en VB Excel C'est quoi exactement ?

Masquer une ligne sous conditions

ListBox: récupérer des valeurs précises

recherche de feuille dans un classeur excel

Compter dans VBA le nombre de cellule non vide dans une colonne

Votre réponse

Discussions similaires