test multiple

L

Lolote83

XLDnaute Barbatruc

• 14 Juin 2012

• #2

Re : test multiple

Salut,
Mettre ce code suite au clic de ton bouton

Private Sub CommandButton1_Click()
xLig = Range("A65536").End(xlUp).Row + 1
Range("A" & xLig) = TextBox1
End Sub

Voili voilà
@+ Lolote

 

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 14 Juin 2012

• #3

Re : test multiple

Bonjour,

regarde peut être ceci :

Code:

If Range("A1") = "" Then
    Range("A1").Value = textbox1.Value
Else
    Range("A65536").End(xlUp)(2).Value = textbox1.Value
End If

bon après midi
@+

 

Vote positif 0 Vote négatif

M

mephis

XLDnaute Occasionnel

• 14 Juin 2012

• #4

Re : test multiple

pierrot 93 j'ai pas essayé ta méthode car celle de lolote fonctionne à merveille
.

Merci à vous deux bonne continuation.

 

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 15 Juin 2012

• #5

Re : test multiple

Bonjour,

pierrot 93 j'ai pas essayé ta méthode car celle de lolote fonctionne à merveille

Cliquez pour agrandir...

Bah... Sauf que la valeur ne sera jamais renvoyé en A1.... si c'est ce que tu veux...

bonne journée
@+

 

Vote positif 0 Vote négatif

M

mephis

XLDnaute Occasionnel

• 15 Juin 2012

• #6

Re : test multiple

c'est vrai mais ce n'est pas très grave.
Et j'ai essayé ton programme mais plus rien ne s'affiche dans ma page.

Bonne journée

 

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 15 Juin 2012

• #7

Re : test multiple

Re,

Et j'ai essayé ton programme mais plus rien ne s'affiche dans ma page.

Cliquez pour agrandir...

estrange... fonctionne pourtant chez moi sans souci sous 2003....

 

Vote positif 0 Vote négatif

M

mephis

XLDnaute Occasionnel

• 15 Juin 2012

• #8

Re : test multiple

ba oui j'ai juste fais un copier coller et quand je choisis dans mes combobox et que je clique rien ne s'affiche dans ma feuille excel

 

Vote positif 0 Vote négatif