XL 2010 VBA Fonction avec des chaînes de caractères

Zegma

XLDnaute Nouveau
Bonsoir le forum.
Débutant en programmation, je souhaiterai faire apparaître dans des cellules le nom et le prénom d'individus.
(Les données "Prénom" se situent dans les cellules B3 jusqu'a B296 et les données "Nom" se situent dans les cellules A3 jusqu'a A296. Je souhaite faire apparaître la combinaison Prenom&Nom dans les cellules de la colonne d'à coté soit C3 jusqu'à C296)
Voici mon ébauche de macro.

Sub Individus()
Dim Prenom As String
Dim Nom As String
Prenom = "Range(B3, B296)"
Nom = "Range(A3, A296)"
Range(C3, C296).="Prenom&Nom"
End Sub

Un grand merci à celui qui m’éclairera.
Cordialement
 

Modeste geedee

XLDnaute Barbatruc
Bonsour®
Bonsoir le forum.
Débutant en programmation, je souhaiterai faire apparaître dans des cellules le nom et le prénom d'individus.
(Les données "Prénom" se situent dans les cellules B3 jusqu'a B296 et les données "Nom" se situent dans les cellules A3 jusqu'a A296. Je souhaite faire apparaître la combinaison Prenom&Nom dans les cellules de la colonne d'à coté soit C3 jusqu'à C296)
VB:
Sub Zegmacro()
    Range("C1").Select
    ActiveCell.FormulaR1C1 = "=UPPER(RC[-1]) & "" "" &PROPER(RC[-2])"
    Selection.AutoFill Destination:=Range("C1:C296")   
End Sub
:rolleyes: l'enregistreur de macro est un moyen aisé d'automatiser une opération que l'on fait manuellement
 

Discussions similaires

Réponses
7
Affichages
485

Statistiques des forums

Discussions
311 720
Messages
2 081 892
Membres
101 831
dernier inscrit
gillec