Bonjour,

Je voudrais savoir si quelqu'un a déjà essayé de protéger les cellules d'une spreadsheet par la fonction Validation.

Sous Excel

le code suivant fonctionne tres bien

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
With  Sheets(1).Range("A1", "B2").Validation
        .Delete
        .Add Type:=xlValidateDecimal, AlertStyle:=xlValidAlertStop, Operator _
        :=xlBetween, Formula1:="0", Formula2:="100"
        .IgnoreBlank = True
        .InCellDropdown = True
        .InputTitle = ""
        .ErrorTitle = ""
        .InputMessage = ""
        .ErrorMessage = ""
        .ShowInput = True
        .ShowError = True
End With


Sous Access

Code : Sélectionner tout - Visualiser dans une fenêtre à part
Me.SpreadSheet0.Sheet(1).Range("A1","B2").Validation
ne fonctionne pas.

Je me demande si l'object spreadsheet supporte cette fonction?
Si non, auriez vous une autre alternative?


Merci d'avance.