Colonne conditionnelle

Bonjour,

Je travaille actuellement sur mon mémoire et j'aurais besoin de votre aide afin de ne pas perdre de précieuse heures. Dans plusieurs tableaux Ecxel, j'aimerais construire une colonne en "fusionnant" deux autres. Je m'explique:

J'ai deux colonnes de même longueur mais j'aimerais en créer un troisième qui reprend les valeur de la colonne 1 si celles-ci sont différentes de 100 et les valeurs de la seconde lorsque les valeurs de la première sont égales à 100.

Certains de mes tableaux font plus de 500 lignes. Il me serait donc difficile de le faire manuellement.

Voici ce que j'ai essayé de faire mais étant plus que novice en VBA, ça ne fonctionne évidemment pas.

Dim gmargin As Integer, mmargin As Integer, fmargin As Integer, i As Integer

For i = 1 To Activecell.Offset(1,0).Select
gmargin = Range(i, 1).Value

If gmargin = 100 Then Cells.Value(i, 3) = Cells.Value(i, 2)
Else: Cells.Value(i, 3) = Cells.Value(i, 1)
End If

Merci pour votre aide