Comme prevu, je me casse les dents sur un userform...bcp bcp d'excel et de vba ces dernieres semaines... moi qui ne m'en etaitjms servi.
Voici mon souci, trainant sur le site de boisgontier, j'ai trouve un formulaire super pratique, aui me permet de recup les donnees d'une feuille et de les recopier sur une autre.
Pour qu'il soit parfait j'ai voulu activer la multi selection, pour ne copier que les lignes voulues...helas sans resultat, j'ai active le multi select et fait kkes manip.
Private Sub b_recupLigne_Click()
Sheets("Recup").Cells.ClearContents
Sheets("Recup").Range("A2").Resize(, nbcol) = _
Application.Index(Me.ListBox1.List, Me.ListBox1.ListIndex + 1)
For i = 1 To nbcol
Sheets("recup").Cells(1, i) = Me("label" & i).Caption
Sheets("recup").Cells(1, i).Font.Bold = True
Next i
End Sub
J'ai essayer de rajouter une boucle For j = 2 to 150
mais ca ne m'a donner qu'une vilaine boucle infinie...
et question subsidiaire.. peut on conserver la mise en forme source?
Re : Souci Userform multiligne + col, et mise en forme
Je suis sous 2007
Mais ton code m'a l'air d'etre efficace, souvent mes differences sont sur la 4eme colonne donc si j'arrive pas a la mettre dans l'ordre pour effacer.
Re : Souci Userform multiligne + col, et mise en forme
Je vois que Mr Boisgontier traine sur le forum ce matin.
Est-il possible via son exemple joint precedement, de copier sur des feuilles differentes certaines colonnes uniquement?