COMMENT VIDER DES CELLULES EXCEL ?
bfiguig
-
bfiguig -
bfiguig -
Bonjour,
j'essaye de vider en même temps avec du code VBA des cellules qui ont des valeurs et aussi des cellules qui sont sous forme de listes deroulantes.
vider les cellules qui ont des valeurs ça marche
Range("B13:D13").Select
Range(Selection, Selection.End(xlDown)).Select
Selection.ClearContents
mais pour les cellules qui sont sous forme de liste deroulante, je n'y arrive pas à les vider et à supprimer ces listes
merci de m'aider
cordialement
j'essaye de vider en même temps avec du code VBA des cellules qui ont des valeurs et aussi des cellules qui sont sous forme de listes deroulantes.
vider les cellules qui ont des valeurs ça marche
Range("B13:D13").Select
Range(Selection, Selection.End(xlDown)).Select
Selection.ClearContents
mais pour les cellules qui sont sous forme de liste deroulante, je n'y arrive pas à les vider et à supprimer ces listes
merci de m'aider
cordialement
Configuration: Windows XP Internet Explorer 6.0
3 réponses
-
Bonjour
essayez
Range("....:....:....").Select
With Selection.Validation
.Delete
.Add Type:=xlValidateInputOnly, AlertStyle:=xlValidAlertStop, Operator _
:=xlBetween
.IgnoreBlank = True
.InCellDropdown = True
.InputTitle = ""
.ErrorTitle = ""
.InputMessage = ""
.ErrorMessage = ""
.ShowInput = True
.ShowError = True
End With
End Sub
Crdlmnt -
Re
dans le même sens, je voudrai colorer ces cellules par une couleur bien precise
avec la macro?
Range("A8").Select
With Selection.Interior
.ColorIndex = 6
.Pattern = xlSolid
End With
je n'ai pas les codes couleur en tête.le 6 est jaune
Crdlmnt -
