Mdr !
Re Romfret, jean-marie, Dan, et tout ceux qui lieront ce "post".Et bien d'abord je vous remerci pour les lignes que vous m'avez filé ca m'a été bien utile.
Je vais commencer par Dan, effectivement ".mergecells = true" fonctionne, j'avais fais une boulette, que j'ai d'ailleurs répéter ensuite avec le ".locked". N'étant pas un habitué du code VB (du - pa encore...), j'ai répéter mon range à l'intérieur du select, forcement VB était perdu...
Je suis revenu sur le forum, et j'ai pu découvrir grace à romfret mon erreur de syntaxe, mais surtout avec le message de jean marie que défusionner les cellules pour les refusionner ensuite ne servait à rien.
Du coup ca marche très bien maintenant, je vous en remerci tous , surtout à tous les 3, Dan Romfret et JeanMarie.
PS: Pr répondre à ta question Jean Marie, je pensais qu'il fallait défusionner les cellules car j'avais eut un message d'erreur m'indiquant que la feuille étant protégée, je ne pouvais déverrouiller deux cellules fusionnées. alors malin comme je suis, au lieu de retirer la protection j'ai tenter de les défusionner...voilà ce que ca donne la chaleur sur mon cerveau, pa bo à voir !!!
Pr ceux ke cela intéresse ou intéressera lol, voici ce que sa donne dans mon code:
Unprotect
Y = "A" & Ligne + 1 & ",B" & Ligne + 1
Range(Y).Select
With Selection
.Locked = False
End With
Protect
@+ et merci.