Utiliser une boucle... ?

Hulk

XLDnaute Barbatruc
Bonsoir à tous,

Je souhaite faire un truc pas très explicable comme ça, le mieux est que vous jetiez un oeil au fichier joint :rolleyes:

Là je sèche complet.

Dans tous les cas merci pour votre aide.

Cdt, Hulk.
 

Pièces jointes

  • Test.xls
    25 KB · Affichages: 48
  • Test.xls
    25 KB · Affichages: 45
  • Test.xls
    25 KB · Affichages: 54

ROGER2327

XLDnaute Barbatruc
Re : Utiliser une boucle... ?

Suite...
...ou encore :
Code:
[COLOR="DarkSlateGray"][B]Private Sub CommandButton1_Click()
   Application.ScreenUpdating = False
   [D5:AI5].Value = 0
   [D5].Resize(1, [B5].Value).Value = 1
   Application.ScreenUpdating = True
End Sub[/B][/COLOR]
ROGER2327
#2106
 

Discussions similaires

Statistiques des forums

Discussions
312 084
Messages
2 085 192
Membres
102 810
dernier inscrit
mohammedaminelahbali