Bonjour a vous,

Actuellement en train de creer une base de donnee, je suis confrontee a un probleme d'une simplicite que c'est surement ridicule de poster un message.
Mais voila j'ai une quinzaine de pages et pour certaine je veux debloquer que certaines cellules.

J'ai donc utilise la ligne de code :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
Range("...:...,...").Select
Selection.Locked
Le message d'erreur 1004 (method range or object worksheet failed) apparait pour la ligne du range.

Ci-dessous le code en question :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
Private Sub CommandButton2_Click()
' Enter document code in document case (G4)
 
    Range("G4").Select
    ActiveCell.FormulaR1C1 = "BS"
 
' Fill Out a new Build Sheet
 
    Sheets("BS_SHEET").Visible = True
    Sheets("NEW REVISION").Visible = False
    Sheets("BS_SHEET").Select
 
    'Range("E6,K6,D9:J9,G11,E21,M29:M91,L92,M94:M104,C109:M109,M111:M118,E122,I134,J134").Select
    'Selection.Locked = False
 
End Sub
J'ai cache les deux dernieres lignes de code car c'est la qu'apparait le probleme.

J'ai beau chercher une reponse sur le net, je trouve rien concernant mon probleme. Je pensais que c'etait la synthaxe mais meme le site de microsoft support ne me donne pas de reponses.

Pourriez vous m'aider ?

Amicalement