Microsoft 365 Remplir TextBox

[Francky79]

Bonjour,

Avec le code ci-dessous je remplie la TextBox57 avec le cellule W de la ligne active

TextBox57 = ActiveSheet.Range("W" & Ligne)

Est il possible de la remplir avec le cellule de la ligne active +1 ?
Ligne 35 active remplir TextBox avec le cellule W de la ligne 36.

Merci pour votre aide.

 

[sylvanu]

Bonjour Francky,
Essayez avec :

TextBox57 = ActiveSheet.Range("W" & Ligne).Offset(1, 0)

ou encore avec :

TextBox57 = ActiveSheet.Range("W" & Ligne+1)

ou encore directement sans calcul de Ligne :

TextBox57 = ActiveSheet.Range("W" & ActiveCell.Row + 1)

 

[Francky79]

Merci sylvanu impeccable.
Bonne journée