pascal21
XLDnaute Barbatruc
Code:
Label4.Caption = "Pointages " & Sheets(1).Range("b1").Value
Label5.Caption = "Pointages " & Sheets(2).Range("b1").Value
Label6.Caption = "Pointages " & Sheets(3).Range("b1").Value
Label7.Caption = "Pointages " & Sheets(4).Range("b1").Value
Label8.Caption = "Pointages " & Sheets(5).Range("b1").Value
Label9.Caption = "Pointages " & Sheets(6).Range("b1").Value
Label10.Caption = "Pointages " & Sheets(7).Range("b1").Value
Label11.Caption = "Pointages " & Sheets(8).Range("b1").Value
Label12.Caption = "Pointages " & Sheets(9).Range("b1").Value
Label13.Caption = "Pointages " & Sheets(10).Range("b1").Value
'
Label22.Caption = Sheets(11).Range("v1").Value
Label23.Caption = Sheets(12).Range("v1").Value
Label24.Caption = Sheets(13).Range("v1").Value
Label25.Caption = Sheets(14).Range("v1").Value
Label26.Caption = Sheets(15).Range("v1").Value
Label27.Caption = Sheets(16).Range("v1").Value
Label28.Caption = Sheets(17).Range("v1").Value
Label29.Caption = Sheets(18).Range("v1").Value
Label30.Caption = Sheets(19).Range("v1").Value
Label31.Caption = Sheets(20).Range("v1").Value
comment faire pour optimiser ce code dans un usf?
j'ai penser à quelque chose comme
Code:
for i = 4 to 13
label (i).caption =sheets (i-13).range etc.........
etc...
pouvez-vous m'aider merci
Dernière édition: