|
|
|
|
Bonjour, je fais un travail sur les découpage en zone de planchers en genie civil, et j'essaie de faire une formule sur excel dans laquelle sur une certaine cellule je rentre un nombre et ça me crée dans la colonne à coté le nombre de zone. par exemple sur B2 je rentre 7 et de C2 à C8 ça me crée le nombre de zone ,sur C2 c'est écrit zone1, sur C3 zone 2 sur C4 zone3 .....sur C8 zone7.
et si possible avec des couleurs de remplissage pour chaque zone.
merci
Configuration: Windows Vista Internet Explorer 7.0
Bonjour
Private Sub Worksheet_Change(ByVal Target As Range)
Dim cptr As Long
If Intersect(Target, Range("A1")) Is Nothing Or Target.Count > 1 _
Or Not IsNumeric(Target) Then: Exit Sub
Application.EnableEvents = False
Application.ScreenUpdating = False
Range("C2:C65536").Clear
For cptr = 1 To Target
With Cells(cptr + 1, 3)
.Value = "zone " & cptr
If cptr < 56 Then
.Interior.ColorIndex = cptr + 1
Else
.Interior.ColorIndex = cptr - 55
End If
End With
Next
Application.EnableEvents = True
End Sub
Cordialement, Michel |