D'un TexBox insérer du texte dans cellule

[JPP01]

Bonsoir,
Suis bête , je n'y arrive pas... voici mon soucis

Sur la colonne ''J4'' par un click, celui-ci fait apparaître un USF. qui comprend notamment un TexBox dans lequel je rentre du texte. (jusque là tout va béné)

Ce que je souhaiterai:
A partir de cet USF, que le texte tapé s'inscrive dans cellule K4(qui est fusionnée), mais de pouvoir faire cela à partir de n'importe quelle ligne choisie, sans avoir recours à une longue programmation (90lignes)
c'est assez assez clair ?

Ci joint mon fichier
Merci par avance
et bonne soirée
JP

 

[ledzepfred]

Re : D'un TexBox insérer du texte dans cellule

bonsoir,

si j'ai bien compris (le fichier annoncé n'est pas passé)

dans le code de ton textbox (que je nomme nomtextbox mais est a modifié par le nom de ton textbox):

Private Sub nomtextbox_change()

LIG = Activecell.Row
Range("K" & LIG).value= nomtextbox.value

End Sub

Bien sur pour que K4 soit renseignée il faut que la cellule active soit toujours J4 à l'ouverture de l'USF et lors de la saisie du textbox

A+