Logo GNT
Actualités Tests & Guides Bons Plans
Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11
Entraide Applications Microsoft Office Excel Pb d'écriture userform

Pb d'écriture userform

2 réponses
Avatar
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
Signaler un problème avec ce contenu

2 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
Jean-Claude
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" a écrit dans le message de
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




Avatar
Vince
Ok merci beaucoup
Vince

"Jean-Claude" a écrit dans le message de
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" a écrit dans le message de
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