XL 2019 VBA avec range de valeur

[Hugues1976]

Bonjour à toutes et à tous.

Je veux créer une macro pour que la valeur de colonne C ( de la ligne 4 à 999999) soit le résultat de la concaténation de la cellule A et B pour la même ligne.

Donc que c3 soit le résultat de A3 et B3
Donc que c4 soit le résultat de A4 et B4

De plus j'aurais besoin que si la valeur dans la colonne A est VIDE, qu'il passe à la prochaine ligne en laissant la présente ligne vide.

Je suis capable de le faire pour chaque cellule mais je crois avec la fonction RANGE de le faire automatiquement.

MErci de votre support

 

[Dranreb]

Bonsoir.

Sub test()
   ActiveSheet.[C4:C999999].FormulaR1C1 = "=IF(ISBLANK(RC1),"""",RC1&RC2)"
   End Sub

 

[job75]

Bonsoir,

Pas toujours besoin d'aller jusqu'à la ligne 999999 :

Sub a()
With Range("C4:C" & Cells.SpecialCells(xlCellTypeLastCell).Row)
    .FormulaR1C1 = "=REPT(RC1&RC2,RC1<>"""")"
    .Value = .Value 'facultatif, supprime les formules
End With
End Sub

A+