Discussion :

[Ericntoukam]

Bonjour à tous,

Je débute dans la programmation sous visual stiudio 2008
Dans le cadre de mon projet j'ai pu ouvrir mon fichier Excel via visual studio 2008.
J'aimerai savoir comment supprimer plusiers colonnes à la fois j'ai pu supprimer une colonne , plusieurs lignes avec le code:

Code :

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

1
2
3
  wsExcel.Rows("7:24").Delete(); puis:
wsExcel.Columns(13).Select()    par contre quand je fais:
wsExcel.Columns("17:29").Delete()   ça m'affiche : Exception de HRSULT:0x800A3EC

J'aimerai pouvoir supprimer par exemple la colonne 7 à 18 et 28 à 45 à la fois puis la ligne 12 à 16 et 20 à 25
(Donc ligne et colonne à la fois)

Je vous prie de bien vouloir m'aider.
Merci de prendre la pein de me lire et de me répondre

Merci d'avance pour votre grande aide.

[Theze]

Bonjour,

Teste ce qui suit :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
 
    Sub SupprimerRange()
 
        Dim AppExcel As New Microsoft.Office.Interop.Excel.Application
        Dim Classeur As Microsoft.Office.Interop.Excel.Workbook
        Dim Feuille As Microsoft.Office.Interop.Excel.Worksheet
 
        Classeur = AppExcel.Workbooks.Open("D:\test.xls")
 
        AppExcel.Visible = True
 
        Feuille = Classeur.Worksheets("Feuil1")
 
        With Feuille
 
            .Range("12:16", "20:25").Delete()
            .Range("G:R", "AB:AS").Delete()
 
        End With
 
    End Sub

Hervé.