Contenu récent par danielco

Bonjour à tous, Merci pour vos contributions et votre temps. Daniel

OK, je vais l'essayer ce week-end. Daniel

Bonjour, Merci. Je vais prendre le temps de les comprendre. Si j'ai une question, je reviendrai vers toi.

Bonjour et merci. Daniel

Bonsoir et merci, Je veux bien, si vous avez une routine qui trie des tableaux à deux dimensions. Merci d'avance.

Désolé. Ce n'est pas des cellules que je veux trier mais un array mémoire, genre : Dim Tabl(1 to 10)

Bonjour et merci, Ce que je souhaite faire c'est utiliser, si possible TRIER pour trier un tableau en mémoire, sans passer par les routines de tri que j'utilise sans les comprendre, genre quicksort. Daniel

Bonjour, La question est toute entière dans le titre. Est-il possible d'utiliser les fonctions TRIER ou TRIERPAR avec VBA ? Merci d'avance. Daniel

Bonjour, En O12, mets : =E12:J12 Daniel

Bonjour, Une autre façon : =INDIRECT("janvier!a1:a50") Daniel

Bonjour, Sans macro, mais dans la colonne d'à côté (ici, pour A1) : =DATE(DROITE(A1;4);STXT(A1;3;2);GAUCHE(A1;2)) Daniel

Pour le filtre, j'ai ajouté à la fin le paramètre "" qui renvoie une chaîne vide i FILTRE ne trouve pas de correspondance. J'ai appelé le filtre "flt" au moyen de LET pour éviter de le recalculer deux fois. Ensuite, j'ai testé si la première valeur du filtre est "" (quand il n'y a pas de...

Bonjour, "normal" ! Quand il n'y a pas de correspondance, FILTRE renvoie "#CALC!" qui est une valeur d'erreur, mais une valeur quand même et donc qui compte pour 1. Essaie : =LET(flt;FILTRE(TbSaisieFormations[NOM -...

Bonjour, Essaie : Sub Addition() Dim C As Range For Each C In Union([B47:B72], [I47:I72], [P47:P72], [B77:B86], [I77:I86], [P77:P86]) If C <> 0 Then C.Offset(, 1) = C.Offset(, 1) + C End If Next C End Sub Daniel

Bonjour, Avec une macro, en faisant un clic droit sur la cellule contenant l'adresse mail. Mets dans le module de la feuille : Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As Boolean) If Target.Address = "$D$8" Then Cancel = True...