Help with VBA
Solved/Closed
amedotero
Posts
7
Registration date
Thursday November 29, 2012
Status
Member
Last seen
December 5, 2012
-
Nov 29, 2012 at 01:02 PM
amedotero Posts 7 Registration date Thursday November 29, 2012 Status Member Last seen December 5, 2012 - Dec 2, 2012 at 11:43 AM
amedotero Posts 7 Registration date Thursday November 29, 2012 Status Member Last seen December 5, 2012 - Dec 2, 2012 at 11:43 AM
Related:
- Help with VBA
- Vba case like - Guide
- Number to words in excel formula without vba - Guide
- Vba check if value is in array - Guide
- Vba color index - Guide
- How to open vba in excel - Guide
2 responses
aquarelle
Posts
7141
Registration date
Saturday April 7, 2007
Status
Moderator
Last seen
December 19, 2024
491
Nov 30, 2012 at 05:59 PM
Nov 30, 2012 at 05:59 PM
Hello,
I put as password "12345" and I took a plage of cells "A2:C30" for example (you can change them into the macro) :
Regards
"Pour trouver une solution à ses problèmes, il faut s'en donner la peine."
I put as password "12345" and I took a plage of cells "A2:C30" for example (you can change them into the macro) :
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("A2:C30")) Is Nothing Then
ActiveSheet.Unprotect Password:="12345"
Target.Locked = True
ActiveSheet.Protect Password:="12345"
End If
End Sub
Regards
"Pour trouver une solution à ses problèmes, il faut s'en donner la peine."
amedotero
Posts
7
Registration date
Thursday November 29, 2012
Status
Member
Last seen
December 5, 2012
Dec 2, 2012 at 11:43 AM
Dec 2, 2012 at 11:43 AM
It was perfect! Thanks a lot for your help! :)
