Pb de validation

P

pascompris

Guest
<HTML>Je voudrai comprendre ce que je dois faire lorsque je fais une boucle pour inserer une date et ne pas etre obliger de revenir dans chaque cellule pour appuyer sur Enter</HTML>
 
S

STephane

Guest
<HTML>Pas tout compris non plus ;-)

tu veux faire une macro ?

à la main tu peux saisir une valeur dans plusieurs cellules en même temps
fais une sélection étendue, apuuye sur F2 pour rentrer en mode édition, tape ta date, et valide non pas par Entrée mais par "Ctrl Maj Entrée"

bye
steph

en prime


Sub testDates()
Dim c As Range
For Each c In Selection
If c.Value <= Date And Not IsEmpty(c) Then
MsgBox "La cellule " & c.Address _
& " contient une date inférieure ou égale à la date du jour."
End If
Next c
end sub</HTML>
 
P

pascompris

Guest
<HTML>Le problème est simple
j'ai une feuille excel qui contient des dates d'un format non reconnu par excel exemple 06 02 2002 comme j'ai un sep espace il faut le remplacer
pour l'instant pas de pb avec l'instruction substitue(cellule;" ";"/") cela fonctionne et j'obtiens 06/02/2002 visiblement cela ressemble étrangement à une date je regarde ma cellule et je suis toujours en texte je rentre dans
la dite cellule touche Enter et oh miracle j'ai une date donc le pb est comment valider l'ensemble des cellules automatiquement.
maintenant si je fais DateVal(substitue(cellule;" ";"/")) j'ai le numéro de série que je formate en Date et j'ai enfin le résultat.
Pourquoi faire simple quand on peut faire compliquer
Merci pour ton code et ta réponse</HTML>
 

Discussions similaires

Statistiques des forums

Discussions
312 088
Messages
2 085 203
Membres
102 818
dernier inscrit
NeoMaint