transfert de cellules

Francis · 22 Mars 2005

Bonjour le forum
Je désire envoyer sur une autre feuille les cellules visibles d’une partie de feuille.
Je les sélectionne avec 'Set MaPlage = MaPlage.SpecialCells(xlCellTypeVisible) '
Tout marche bien…mais je voudrais aussi faire suivre les commentaires, les couleurs de la police et du surlignage. Mais là suis perdu…
Quelle est la phrase à rajouter ?
Merci Francis

Ashaar · 22 Mars 2005

Bonjour Francis,

Le code suivant semble répondre à ta question (du moins je l'espère) :

Sub CopyVisible()
Selection.SpecialCells(xlCellTypeVisible).Copy
Range('C20').Select
ActiveSheet.Paste
End Sub

transfert de cellules

Francis

XLDnaute Junior

Ashaar

Guest

Discussions similaires