Valeur à partir de deux variable
Résolu/Fermé
mat0608
mat0608
- Messages postés
- 13
- Date d'inscription
- mercredi 9 novembre 2016
- Statut
- Membre
- Dernière intervention
- 23 avril 2017
mat0608
- Messages postés
- 13
- Date d'inscription
- mercredi 9 novembre 2016
- Statut
- Membre
- Dernière intervention
- 23 avril 2017
A voir également:
- Valeur à partir de deux variable
- Valeur à partir de deux variable ✓ - Forum - Excel
- Comment trouver une valeur en fonction de 2 variables? ✓ - Forum - Excel
- Trouver une donnée à partir de deux variables. ✓ - Forum - Excel
- Recherche dans un tableau à partir de 2 valeurs ✓ - Forum - Excel
- Trouver valeur d'une troisieme cellule à partir de 2-3 critéres ✓ - Forum - Excel
1 réponse
Gyrus
9 nov. 2016 à 11:54
- Messages postés
- 3334
- Date d'inscription
- samedi 20 juillet 2013
- Statut
- Membre
- Dernière intervention
- 9 décembre 2016
9 nov. 2016 à 11:54
Bonjour,
Essaie comme cela
A+
Essaie comme cela
Sub Test()
Dim Ligne As Long, LigneC As Long
Dim Col As Integer
LigneC = 2
For Ligne = 1 To Range("A" & Rows.Count).End(xlUp).Row
Select Case Range("B" & Ligne).Value
Case "402": Col = 5
Case "403": Col = 8
Case Else: Exit For
End Select
Cells(LigneC, Col) = Range("A" & Ligne).Value
Cells(LigneC, Col + 1) = Range("C" & Ligne).Value
LigneC = LigneC + 1
Next Ligne
End Sub
A+
Modifié par mat0608 le 9/11/2016 à 15:42
le code que vous m´avez fournit ne vient pas incrémenter mon tableau mais en ajoute un autre plus bas pour la valeur 403.
01/11/2016 402 35,00 date 402 date 403
01/11/2016 403 25,00 01/11/2016 01/11/2016
02/11/2016 402 5,00 02/11/2016 02/11/2016
02/11/2016 403 1.203,77 03/11/2016 03/11/2016
03/11/2016 402 968,24 04/11/2016 04/11/2016
03/11/2016 403 23,09 05/11/2016 05/11/2016
9 nov. 2016 à 17:04
Dans le cas contraire, il te faudra joindre un fichier avec une présentation plus complète de tes données.
Pour cela, tu pourra utiliser https://www.cjoint.com/
Rq: j'ai supposé que les dates étaient renseignées dans les colonnes E, H, etc...
A+
9 nov. 2016 à 19:24
Maintenant il faut que je comprenne comment tu as fais!