erreur 91

Question

Bonjour, 
le but visé est de supprimer la colonne dont le titre commence par "é"
à l'execution de ce morceau de mon prog vba m'annonce erreur 91
cela fait qq jours que je suis dessus mais rien n'y fait
voici mon code

wbExcel.Application.Sheets("paie_200710_Ah").Select
Dim DerniereColonne
DerniereColonne = wbExcel.Application.ActiveSheet.UsedRange.Columns.Count - 1
        
  Dim maplage        
         
   Dim i As Integer

Set maplage = wbExcel.Sheets.Application.Cells(1, DerniereColonne)

For i = 1 To DerniereColonne
      wbExcel.Application.Cells.Find(What:=Left(wbExcel.Application.Cells(1, i).Value, 1) = "é", After:=ActiveCell, LookIn:=xlValues, LookAt:= _
        xlWhole, SearchOrder:=xlByColumns, SearchDirection:=xlNext, MatchCase:=True _
        , SearchFormat:=False).Activate
    
         wbExcel.Application.ActiveCell.Select
                    
           wbExcel.Application.Selection.EntireColumn.Select
           wbExcel.Application.Selection.Delete

merci d'avance pour votre aide
ABS75


Configuration: Windows / Chrome 48.0.2564.116

f894009 · Answer

Bonjour,

Si VBA excel, pourquoi ceci 

wbExcel.Application.

Nous verrons pour le reste ensuite

Erreur 91

1 réponse

Votre réponse

Discussions similaires

Newsletters