je dois affecter un format a toute une série de cellule séparée par 4 colonnes.
Existe t il un petit script pour sélectionner une cellule toutes les 5 colonnes.
Oui , il y en a même plusieurs !!!
Vois si tu peux t'inspirer de celui-ci
Code:
Sub selection()
coldeb = 3
colfin = 25
ligne = 1
For n = coldeb To colfin Step 5
Cells(ligne, n).Select
MsgBox ("j'ai selectionné la cellule " & Cells(ligne, n).Address(0, 0))
Next n
End Sub
[COLOR="DarkSlateGray"]Sub multiSelection()
Dim i As Long
For i = 2 To 3 'pour sélectionner 3 cellules
With Selection
Union(.Cells, .Offset(0, 5).Cells).Select
End With
Next i
End Sub[/COLOR]
[COLOR="DarkSlateGray"]Sub numérotage()
Dim i As Long
For i = 0 To 4 [COLOR="SeaGreen"]'Pour numéroter 5 colonnes[/COLOR]
Selection.Offset(0, 5 * i).Value = 500 * i
Next i
End Sub[/COLOR]