Code VBA : Données de plusieurs cellules dans une cellule [Résolu]

Signaler
Messages postés
22
Date d'inscription
vendredi 20 août 2010
Statut
Membre
Dernière intervention
22 août 2012
-
Messages postés
22
Date d'inscription
vendredi 20 août 2010
Statut
Membre
Dernière intervention
22 août 2012
-
Bonsoir,

Deuxième et dernière question ensuite j'essayerai de terminer mon petit programme demain.

Ma question est :

J'ai la cellule L6 qui devra contenir les informations des cellules :

I20 et A20 (si I20 de vide on tient pas compte de A20) + I21 et A21 (si I21 de vide on tient pas compte de A21)+ I22 et A22 (si I22 de vide on tient pas compte de A22).

Merci.

2 réponses

Messages postés
22
Date d'inscription
vendredi 20 août 2010
Statut
Membre
Dernière intervention
22 août 2012

BOnjour,

Ca y est voici le code VBA :

Sub Essai()
Dim Res As String
 
If Range("I20") <> "" Then Res = 1 & Range("I20")
If Range("I21") <> "" Then Res = Res & 2 & Range("I21")
If Range("I22") <> "" Then Res = Res & 3 & Range("I22")
Range("L6") = Res
End Sub
Messages postés
22
Date d'inscription
vendredi 20 août 2010
Statut
Membre
Dernière intervention
22 août 2012

J'ai la formule suivante :

=CONCATENER("1" & I20; "2" & I21; "3" & I22)

Comment la traduire en VBA ?

Merci.