Discussion :

[lemarcheurfou]

Bonsoir à tous,

Je suis novice en vba et je rencontre déjà un petit problème.
Je vous explique j'ai 2 feuilles identique avec la même forme mais différente information.

Je voudrais faire une fusion avec mes 2 premières colonnes que je vais mettre dans une 3ième feuille. J'ai commencé le code mais le problème c'est qu'il me fusionne juste les 2 premières infos mais pas les autres et il ne l'est affiche pas. Si quelqu'un pouvais m'aidé..

Voilà mon code et je fourni aussi mon fichier excel:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
Sub Fusion()
 
Dim s As Byte
 
 For s = 1 To 2
    With Sheets(s)
 
    Sheets("Sheet3").Range("A2" & n) = Sheets(s).Range("A2" & n) & "" & Sheets(s).Range("B2" & n)
 
    End With
Next s
 
End Sub

Merci d'avance pour vos réponse