cellules non vides

  • Initiateur de la discussion JFBee
  • Date de début
J

JFBee

Guest
A partir d'une colonne où toutes les cellules ne contiennent pas des données, je souhaiterais recréer une nouvelle colonne ne prenant plus en compte que les cellules non vides.

C'est surement simple pour plein d'entre vous, mais pas pour moi, je débute.

D'avance merci à tous ;-)
 
J

Jean-Marie

Guest
Bonsoir JFBee

Voici un code, qui récupère les cellules non vides de la plage A1:A300, et colle
à partir de la cellule C1 de la même feuille.

Sub JFBee()
Range("A1:A300").SpecialCells(xlCellTypeConstants, 23).Copy
ActiveSheet.Paste Destination:=Range("C1")
End Sub

Si tu regardes l'exemple VBA au chapitre Paste, méthode (objet Worksheet) - Exemple, tu verras comment changer de feuille de destination ou de source.

@+Jean-Marie
 

Discussions similaires

Réponses
8
Affichages
324

Statistiques des forums

Discussions
312 232
Messages
2 086 462
Membres
103 222
dernier inscrit
2BS