PB de macro execution dans tous les onglets

pledger · 2 Décembre 2011

Salut le forum

Mon problème me parait futile mais bien embrassant , je m'explique :

Je voudrais supprimé les lignes 1 et 2 de tous les onglets de mon Classeur. J'ai donc fait cette macro toute simple :

Code:

Sub test()
 For I = 1 To Sheets.Count
 Rows("1:2").Delete
 Next I
End Sub

Mais celle - ci ne marche que dans la feuille active et je ne comprends pas pourquoi ?
Pourriez vous m'expliquer comment procédé ?

Hellboy · 2 Décembre 2011

Re : PB de macro execution dans tous les onglets

Sub test()
For I = 1 To Sheets.Count
Sheets(I).Rows("1:2").EntireRow.Delete
Next I
End Sub

Il manquait seulement de préciser à chaque fois la feuille en question

pledger · 2 Décembre 2011

Re : PB de macro execution dans tous les onglets

Merci Hellboy

pledger · 2 Décembre 2011

Re : PB de macro execution dans tous les onglets

J'ai voulut la lancée dans plusieurs classeurs en même temps mais sa a pas marché .

J'ai le code suivant :

Code:

Sub test()
Dim wb As Workbook
For Each wb In Workbooks

If wb.Name Like "Analyse*" Then

For I = 1 To Sheets.Count
Sheets(I).Rows("1:2").EntireRow.Delete

Next I
    End If
Next wb
End Sub

Pierrot93 · 2 Décembre 2011

Re : PB de macro execution dans tous les onglets

Re,

préciser le classeur... "wb." devant "sheets" (les 2)... comme dit précédemment...

pledger · 2 Décembre 2011

Re : PB de macro execution dans tous les onglets

Oui en effet ca marche mieux Merci encore

PB de macro execution dans tous les onglets

pledger

XLDnaute Junior

Hellboy

XLDnaute Accro

pledger

XLDnaute Junior

pledger

XLDnaute Junior

Pierrot93

XLDnaute Barbatruc

pledger

XLDnaute Junior

Discussions similaires