Bonjour
Sur ton premier sujet, tu demandais juste de transformer ton adresse en L2 en adresse active.
Je n'ai donc pas pris garde à tes macros.
Le Code est à modifier avec
.Range("L" & Ligne) = Me.TextBox12.Value & "@" & Me.TextBox13.Value
.Hyperlinks.Add .Cells(Ligne, 12), Address:="mailto:" & TextBox12.Value & "@" & TextBox13.Value 'Email actif sur la feuille
Par contre, comme ton N° de ligne dépends de la ligne de code
Ligne = .Range("C" & Rows.Count).End(xlUp).Row + 1
Ce n'est qu'en mettant à mesure une saisie en colonne C que tu décaleras les adresses mail.
Cordialement