Copie d'1 colonne dans 1ère colonne non vide

Résolu/Fermé
sanchis81 Messages postés 134 Date d'inscription mardi 17 février 2009 Statut Membre Dernière intervention 2 octobre 2013 - 2 févr. 2010 à 10:08
sanchis81 Messages postés 134 Date d'inscription mardi 17 février 2009 Statut Membre Dernière intervention 2 octobre 2013 - 4 févr. 2010 à 10:05
Bonjour à tous,

dans un de mes fichiers excel, qui possède 2 onglets, je souhaiterais copier la colonne B:B de mon 1er onglet dans la 1ère colonne non vide de la feuille 2.

Pourriez vous m'aider quant au code à utiliser?

Merci d'avance!

Sanchis

3 réponses

Farfadet88 Messages postés 6293 Date d'inscription lundi 28 janvier 2008 Statut Membre Dernière intervention 29 avril 2020 1 365
2 févr. 2010 à 10:18
tu veux copier toute la colonne B:B dans la première colonne non vide ou dans la première colonne vide?

Si c'est la colonne non vide, la colonne B doit elle remplacer les cases déjà remplies ou se rajouter en dessous?
0
michel_m Messages postés 16603 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023 3 303
2 févr. 2010 à 10:29
bonjour Sanchis
dans colonne vide
Application.ScreenUpdating = False
With Sheets(2)
.Columns(.Range("a1").End(xlToRight).Column + 1).Value = Sheets(1).Columns(2).Value
End With
--


eT dans la 1° col non vide
Application.ScreenUpdating = False
With Sheets(2)
col = Rows(1).Find("*", Range("IV1"), xlValues).Column
.Columns(col).Value = Sheets(1).Columns(2).Value
End With

:-x
0
sanchis81 Messages postés 134 Date d'inscription mardi 17 février 2009 Statut Membre Dernière intervention 2 octobre 2013 10
4 févr. 2010 à 10:05
Merci pour tous ces renseignements.

C'était effectivement pour copier dans la 1ère colonne vide de la feuille 2.

Bonne journée à tous
0