Vba liste
Résolu/Fermé
vince2323
Messages postés
7
Date d'inscription
lundi 16 décembre 2013
Statut
Membre
Dernière intervention
18 décembre 2013
-
16 déc. 2013 à 11:18
dlt-pan Messages postés 481 Date d'inscription jeudi 17 mai 2007 Statut Membre Dernière intervention 23 décembre 2014 - 16 déc. 2013 à 13:14
dlt-pan Messages postés 481 Date d'inscription jeudi 17 mai 2007 Statut Membre Dernière intervention 23 décembre 2014 - 16 déc. 2013 à 13:14
A voir également:
- Vba liste
- Liste déroulante excel - Guide
- Liste déroulante en cascade - Guide
- Liste de diffusion whatsapp - Guide
- Gertrude a préparé la liste des affaires à prendre pour l'excursion. juliette a modifié cette liste en utilisant le mode suivi des modifications proposé par le traitement de texte. - Guide
- Le fichier contient une liste de prénoms. triez ce tableau par ordre alphabétique des prénoms. quel mot est formé par les 6 premières lettres de la colonne code ? - Forum Bureautique
6 réponses
dlt-pan
Messages postés
481
Date d'inscription
jeudi 17 mai 2007
Statut
Membre
Dernière intervention
23 décembre 2014
67
16 déc. 2013 à 11:26
16 déc. 2013 à 11:26
bonjour
Peux tu etre plus precis sur le resultat attendu ?
Veux tu les combinaisons de A1 et toutes les autres puis de A2 et toutes les autres et ainsi de suite ?
Peux tu etre plus precis sur le resultat attendu ?
Veux tu les combinaisons de A1 et toutes les autres puis de A2 et toutes les autres et ainsi de suite ?
vince2323
Messages postés
7
Date d'inscription
lundi 16 décembre 2013
Statut
Membre
Dernière intervention
18 décembre 2013
16 déc. 2013 à 11:27
16 déc. 2013 à 11:27
Exact tu as bien compris et le resultat en colonne C .
Merci
Merci
dlt-pan
Messages postés
481
Date d'inscription
jeudi 17 mai 2007
Statut
Membre
Dernière intervention
23 décembre 2014
67
16 déc. 2013 à 11:45
16 déc. 2013 à 11:45
dans la colonne C tu recupères toutes les combinaisons possibles avec la colone A en référence :
k = -1
For i = 1 To 10
For j = 1 To 10
k = k + 2
Cells(k, 3) = Cells(i, 1) & Cells(j, 1)
Cells(k + 1, 3) = Cells(i, 1) & Cells(j, 2)
Next j
Next i
k = -1
For i = 1 To 10
For j = 1 To 10
k = k + 2
Cells(k, 3) = Cells(i, 1) & Cells(j, 1)
Cells(k + 1, 3) = Cells(i, 1) & Cells(j, 2)
Next j
Next i
vince2323
Messages postés
7
Date d'inscription
lundi 16 décembre 2013
Statut
Membre
Dernière intervention
18 décembre 2013
16 déc. 2013 à 11:51
16 déc. 2013 à 11:51
Merci mais petit soucis je désire avoir que Colonne A avec Colonne B
Exemple
A B C
1 1 11
2 1 11
3 2 12
21
21
22
31
31
32
Merci pour ton aide
Exemple
A B C
1 1 11
2 1 11
3 2 12
21
21
22
31
31
32
Merci pour ton aide
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
vince2323
Messages postés
7
Date d'inscription
lundi 16 décembre 2013
Statut
Membre
Dernière intervention
18 décembre 2013
16 déc. 2013 à 11:56
16 déc. 2013 à 11:56
Merci j'ai trouvé la solution enfin je pense
k = -1
For i = 1 To 10
For j = 1 To 10
k = k + 2
Cells(k, 3) = Cells(i, 1) & Cells(j, 2)
k = k - 1
Next j
Next i
k = -1
For i = 1 To 10
For j = 1 To 10
k = k + 2
Cells(k, 3) = Cells(i, 1) & Cells(j, 2)
k = k - 1
Next j
Next i
dlt-pan
Messages postés
481
Date d'inscription
jeudi 17 mai 2007
Statut
Membre
Dernière intervention
23 décembre 2014
67
16 déc. 2013 à 13:14
16 déc. 2013 à 13:14
plus simple
For i = 1 To 10
For j = 1 To 10
k = k + 1
Cells(k, 3) = Cells(i, 1) & Cells(j, 2)
Next j
Next i
si çà te convient pense a mettre le sujet en resolu
For i = 1 To 10
For j = 1 To 10
k = k + 1
Cells(k, 3) = Cells(i, 1) & Cells(j, 2)
Next j
Next i
si çà te convient pense a mettre le sujet en resolu