Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Fontion listes sans vides

  • Initiateur de la discussion Initiateur de la discussion largoj
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

L

largoj

Guest
Bonjour,

J'ai un fichier contenant des dates à sélectionner. Lorsque les jours sont saisis au format date, en col. D2, impossible de les faire apparaitre avec un format personnalisé : jjj jj mmmm aa en colonne C2, qui est saisie avec une fonction matricielle: "listes sans vides".
pour moi il est important que le jour, la date et l'année apparaissent dans la colonne "listes sans vides";

Quelqu’un aurait-il une solution pour résoudre mon problème.
Ci-joint un fichier

D'avance merci.

largoj
 

Pièces jointes

Re : Fontion listes sans vides

Bonsoir,

-Il y a un premier pb: les dates en D3,D4,.. ne sont pas des vraies dates (ce sont des chaînes de caractères)
-Remplacer la fonction ListeSansVides par :

Code:
Function ListeSansVides(champ As Range, Optional fmt As String)
  Application.Volatile
  temp = champ.Value
  Dim b()
  ReDim b(1 To Application.Caller.Rows.Count)
  n = 0
  For Each c In temp
    If c <> "" Then
      n = n + 1
      If IsMissing(fmt) Then
        b(n) = c
      Else
        b(n) = format(c, fmt)
      End If
    End If
  Next
  ListeSansVides = Application.Transpose(b)
End Function

=ListeSansVides(A2:A23;"ddd dd mmmm yy")

JB
 

Pièces jointes

Dernière édition:
Re : Fontion listes sans vides

Bonsoir @ tous,
pourquoi pas, en D3 :
Code:
=D2+1
@ tirer vers le bas


puis en C2 :
Code:
=SIERREUR(PETITE.VALEUR(SI(F$2:F$212=VRAI;D$2:D$212);LIGNES($2:2));"")
@ valider par Ctrl+Shift+Enter
@ tirer vers le bas



@ + +
 
Re : Fontion listes sans vides

Merci infiniment Boisgontier;
C'est exactement ce que je souhaitais obtenir.
C'est un réel plaisir d'être aidé par vous. je suis fan de votre site qui est une véritable mine.
Merci encore.Cordialement,

largoj
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

Réponses
1
Affichages
1 K
M
  • Question Question
Réponses
4
Affichages
5 K
michaeldu84000
M
M
Réponses
2
Affichages
1 K
T
  • Question Question
Réponses
13
Affichages
2 K
toper
T
N
  • Question Question
Réponses
5
Affichages
3 K
K
Réponses
4
Affichages
1 K
A
  • Question Question
Réponses
2
Affichages
1 K
J
Réponses
1
Affichages
1 K
A
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…