Pb d'écriture userform

Le
Vince
Bonjour à tous

J'ai créé un useform simple, et je souhaite pouvoir envoyer les éléments
dans ma feuille de la colonne A à C
mais voilà, il n'y a que les colonnes B et C qui se remplissent
Je souhaite comprendre pourquoi ?
Merci beaucoup

Private Sub BOK_Click()

Range("A65536").End(xlUp)(2).Select

ActiveCell.Offset(0, 0).Value = Txtnom
ActiveCell.Offset(0, 0).Value = TxtnomJF
ActiveCell.Offset(0, 1).Value = Txtprénom
ActiveCell.Offset(0, 2).Value = Txtage

Unload Me
End Sub
Vos réponses
Gagnez chaque mois un abonnement Premium avec GNT : Inscrivez-vous !
Trier par : date / pertinence
Jean-Claude
Le #1268685
Salut,
si je comprends bien, dans les lignes de codes

ActiveCell.Offset(0, 0).Value = Txtnom
ActiveCell.Offset(0, 0).Value = TxtnomJF

TxtnomJF remplace Txtnom

A+
Jc

"Vince" news:
Bonjour à tous

J'ai créé un useform simple, et je souhaite pouvoir envoyer les éléments
dans ma feuille de la colonne A à C
mais voilà, il n'y a que les colonnes B et C qui se remplissent
Je souhaite comprendre pourquoi ?
Merci beaucoup

Private Sub BOK_Click()

Range("A65536").End(xlUp)(2).Select

ActiveCell.Offset(0, 0).Value = Txtnom
ActiveCell.Offset(0, 0).Value = TxtnomJF
ActiveCell.Offset(0, 1).Value = Txtprénom
ActiveCell.Offset(0, 2).Value = Txtage

Unload Me
End Sub




Vince
Le #1268673
Ok merci beaucoup
Vince

"Jean-Claude" news:c60tkc$bdr$
Salut,
si je comprends bien, dans les lignes de codes

ActiveCell.Offset(0, 0).Value = Txtnom
ActiveCell.Offset(0, 0).Value = TxtnomJF

TxtnomJF remplace Txtnom

A+
Jc

"Vince" news:
Bonjour à tous

J'ai créé un useform simple, et je souhaite pouvoir envoyer les éléments
dans ma feuille de la colonne A à C
mais voilà, il n'y a que les colonnes B et C qui se remplissent
Je souhaite comprendre pourquoi ?
Merci beaucoup

Private Sub BOK_Click()

Range("A65536").End(xlUp)(2).Select

ActiveCell.Offset(0, 0).Value = Txtnom
ActiveCell.Offset(0, 0).Value = TxtnomJF
ActiveCell.Offset(0, 1).Value = Txtprénom
ActiveCell.Offset(0, 2).Value = Txtage

Unload Me
End Sub








Publicité
Poster une réponse
Anonyme