Discussion :

[didier.aucun]

Bonjour,

Dans un fichier Excel, j'ai des colonnes qui peuvent êtres affichées ou masquées selon les informations à connaitre.

J'utilise une macro qui recopie toute une ligne pour les copier dans une autre feuille.
Le problème c'est que je dois activer avant toutes les colonnes pour que toutes les informations soit copiées.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
 
Sub Essai()
Sheets("Feuil1").Select
Set Aselectionner = Application.InputBox _
     (prompt:="selectionner la ligne >>> ", _
     Title:=" Valeurs à reprendre", Type:=8)
  Aselectionner.Select 'Selection de la plage souhaitée
    Selection.Copy
    Sheets("Feuil2").Select
    Rows("6:6").Select
    ActiveSheet.Paste
  Sheets("Feuil1").Select
 End Sub

Via la macro, je souhaiterais :
que les colonnes qui sont masquées soient affichées,
je fais la copie de ma ligne,
que les colonnes concernées soient de nouveau masquées comme à l'origine.

merci de votre aide

[fring]

Bonjour,

Il n'est pas nécessaire d'afficher les colonnes pour en copier les données.
Il suffit de cliquer dans une des cellules de la ligne que l'on souhaite copier et de dire "copier toute la ligne de la cellule active"
Tout ton code peut se résumer à :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

ActiveCell.EntireRow.Copy Sheets(2).Rows(6)

Tu pourras constater également que l'on peut éviter les "select"

[didier.aucun]

Super !
Merci