Cacher des colonnes d'un tableau et copier le tableau sans ces colonnes

Salut,

un petit probleme de macro, je veux cacher deux colonnes D et F et copier le tableau, sans ces colonnes.
ma macro cache bien les cellules mais elle les copie.....

voici ma macro,

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17

'copier coller Range("A2").Select Columns("D:D").Select Selection.EntireColumn.Hidden = True Columns("F:F").Select Selection.EntireColumn.Hidden = True Range("A2").Select Range(Selection, Selection.End(xlDown)).Select Range(Selection, Selection.End(xlToRight)).Select Application.CutCopyMode = False Selection.Copy Windows("SBO20GRTYP.xls").Activate Range("a65536").Select Selection.End(xlUp).Select ActiveCell.Offset(1, 0).Select ActiveSheet.Paste Windows(2).Activate

---

Bonjour

Ce n'est pas parceque tu masque des colonnes qu'ellse n'y sont plus

Voici une solution, pour ne copier que ce que tu desires

Code:

---

1 2 3 4 5 6

Sub Bouton1_QuandClic() Dim plage As Range Set plage = Application.Union(Range("A2"), Range("B:B"), Range("E:F")) plage.select End Sub

---

dans cet exemple, nous devinissons une plage de selection morcelée

bonne soirée

Code:

---

1 2	SpecialCells(xlCellTypeVisible)

---