concatener en macro

  • Initiateur de la discussion David T
  • Date de début
D

David T

Guest
Bonjours à tous le forum!


J'essaye de de concatener par macro le contenu d'une collone! Mais en fait, il y a un petit plus, sinon ce serait facile!

En fait dans la colonne A j'ai des données de la cellule A2 à la cellule A(X)! Le but est de rajouter dans la cellule au tout début le mots 'taille : ' mais uniquement dans les cellules de la colonne A où il y a des données!

Voici un fichier xls pour mieux comprendre

Merci d'avance

[file name=exemple_dav.zip size=2891]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/exemple_dav.zip[/file]
 

Pièces jointes

  • exemple_dav.zip
    2.8 KB · Affichages: 37

Robert

XLDnaute Barbatruc
Repose en paix
Bonjour David, bonjour le forum,

En pièce jointe ton fichier avec la macro suivante :


Sub Macro1()
Dim cel As Range 'déclare la variable cel

Sheets('modèle').Activate 'selectionne l'onglet 'modèle'
'boucle sur toutes les cellules éditées de la colonne A
For Each cel In Range('A2:A' & Range('A65536').End(xlUp).Row)
If cel.Value <> '' Then 'condition : si la cellule n'est pas vide
cel.Value = 'taille : ' & cel.Value 'modifie le contenue de la cellule
End If 'fin de la condition
Next cel 'prochaine cellule de la boucle
End Sub

[file name=exemple_dav2.zip size=10308]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/exemple_dav2.zip[/file]
 

Pièces jointes

  • exemple_dav2.zip
    10.1 KB · Affichages: 35
B

bebere

Guest
bonjour David,Robert
le code est dans la feuille modèle
à+ [file name=exemple_dav_20050824102231.zip size=7547]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/exemple_dav_20050824102231.zip[/file]
 

Pièces jointes

  • exemple_dav_20050824102231.zip
    7.4 KB · Affichages: 19

Discussions similaires

Statistiques des forums

Discussions
312 871
Messages
2 093 102
Membres
105 627
dernier inscrit
jean-marc.brillant