Bonjour,
J'ai un petit soucis sur un code VBA, j'ai suite à un UserForm, ou il y à deux zones de texte
(un s'appelle T_B l'autre T_C) .
Je souhaite que ce texte saisie aille ce coller dans une colonne donné, et que l'opération continue jusqu'à la dernière ligne non vide de la colonne D.
Par exemple :
La colonne D à des infos jusqu’à la ligne 15.
Copie de la valeur de T_B dans la colonne B de B2 : B15
Copie de la valeur de T_C dans la colonne C de C2 : C15
Mais je veux qu'il me détecte la dernière cellule non vide de C automatiquement..
J'espère avoir était clair, voici mon code : (en rouge la ou ça pose problème)
__________________
Sub Test1(ByVal T_B As Variant, ByVal T_C As Variant)
If T_B = "" Or T_C = "" Then Exit Sub
Range("B62536").End(xlUp).Offset(1, 0).Select
ActiveCell.Value = T_B
Range("C62536").End(xlUp).Offset(1, 0).Select
ActiveCell.Value = T_C
Dim d As Variant
d = Range("D65536").End(xlUp).Row.Count
Range("C62536").End(xlUp).Offset(1, 0).Select
Selection.AutoFill Destination:=Range("C2:C" & d & "")
End Sub
__________________
Merci par avance,
Bonne journée
Rom1