Copie en fonction d'un choix dans Textbox

P

pacoako

XLDnaute Occasionnel

• 16 Décembre 2008

• #2

Re : Copie en fonction d'un choix dans Textbox

Ok je saisie bien ta demande, cependant.. est-ce que ces groupe peuvent grossir ou c'est toujours le même nombre par colonne?

Dans tous les cas... je t'envoie ceci..

Bonne soirée!

 

Pièces jointes

• Copy of Test.zip

  22 bytes · Affichages: 23

Dernière édition: 16 Décembre 2008

Vote positif 0 Vote négatif

K

kjin

XLDnaute Barbatruc

• 16 Décembre 2008

• #3

Re : Copie en fonction d'un choix dans Textbox

Bonsoir,
Essaies peut-être comme ceci

Code:

Private Sub OK_Click()
Dim Col As Byte
Sheets("Valeurs").Range("A1:B15").ClearContents
With Sheets("Groupes")
    Col = Application.Match(Liste, .Range("A1:M1"), False)
    .Range(.Cells(2, Col), .Cells(16, Col + 1)).Copy Sheets("Valeurs").Range("A1")
End With
End Sub

A+
kjin

 

Vote positif 0 Vote négatif

Hulk

XLDnaute Barbatruc

• 16 Décembre 2008

• #4

Re : Copie en fonction d'un choix dans Textbox

Hello le Forum, Kjin, Pacoako,

Ok merci de m'avoir répondu.

Je regarde ça plus tard dans la journée... je dois partir bosser 😀

Je vous remercie et vous tiens au courant.

Passez une bonne journée.

Hulk.

 

Vote positif 0 Vote négatif

Hulk

XLDnaute Barbatruc

• 16 Décembre 2008

• #5

Re : Copie en fonction d'un choix dans Textbox

Hello à tous,

Kjin c'est ok nickel merci. 😀

Pacoako, apparemment ton fichier joint est mort, il n'y a rien dedans.
Pour répondre à ta question, c'est toujours le même nombre par groupe.

Merci aux deux.

A bientôt.

Hulk.

 

Vote positif 0 Vote négatif