Ceci alors peut etre, je sais que ça marche sur excel, ça devrait être la même chose sur access, ou bien il ne devrait pas y avoir beaucoup de différence
Dim Cell As Variant
Columns("C:C" ).Select
For each cell in selection
If Cell.Value <> "" Then
Cell.ClearContents
Else
Exit For
End If
Next cell
Message édité par minimoack le 31-01-2013 à 16:01:30