Bonjour à tous,
je commence une macro vba
Dans une formule, je concatene deux cellules vers une seule.
la cellule cible doit faire 5 caracteres.
Tout se passe bien sauf lorsque mes deux cellules sources sont 0 tous les deux.
Au lieu de m'afficher 00000 La cellule m'affiche 0.
Le problème à l'air bête au départ, mais ne trouve pas de solution pour l'instant.
Voici l'extrait de mon code :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
 Do
ran = (Range("a2").Offset(b, 0).Value)
Range("a2").Offset(b, 0).Value = Trim(ran)
tem = Range("f2").Offset(b, 0).Value
tem2 = "0000" & tem
theme = Range("d2").Offset(b, 0).Value & Right(tem2, 4) & ""
Range("E2").Offset(b, 0).Value = theme & ""
b = b + 1
If IsEmpty(Range("a2").Offset(b, 0)) = True Then Exit Do
 
Loop
C'est un peu pbarbare pour les pros, mais j'apprends sur le tard.

Merci