Bonjour tout le monde
que de beaux mondes sur ce post.
guy, si je peux me permettre :
ce code : DerCol = Mid(Range('IV1').End(xlToLeft).Address(0, 0), 1, 1)
ne va renvoyer la lettre de la derniere colonne que jusqu'au Z, au dela, on peux utiliser ceci par exemple :
With Range('IV1').End(xlToLeft)
dercol = Left(.Address(0, 0), IIf(Len(.Address(0, 0)) > 2, 2, 1))
End With
salut