Fusionner ligne par ligne dans une feuille protégée
Bonjour,
Je souhaite fusionner des cellules ligne par ligne quand je fais ma sélection dans une feuille excel que j'ai protégée.
J'ai entré le code ci-dessous qui est génial puisqu'il me fait la fusion uniquement sur les cellules que j'ai déverrouillé avant la protection de ma feuille et donc m'interdit bien de fusionner où mes cellules sont protégées.
Par contre, cela fusionne le bloc de cellules sélectionnées alors que j'aimerai que ça sélectionne chaque ligne des cellules sélectionnées. Comment dois-je modifier le code ci-dessous?
Merci d'avance.
Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As Boolean)
Dim Cel As Range
If Target.Count > 1 Then
For Each Cel In Target
If Cel.Locked Then
'Cellule verrouillée
'éventuellement mettre un message
Exit Sub
End If
Next
ActiveSheet.Unprotect "mot de passe"
Target.Merge
ActiveSheet.Protect "mot de passe"
End If
End Sub
Bonjour,
Les cellules fusionnées n'ont pas beaucoup d'amateurs chez les macroteurs !
A+
Oui, malheureusement ...