consolidation de données

[philmaure]

bonjour,

Dans une première feuille j'ai les dates et des noms en face de certianes dates

Je souhaiterai pouvoir récupérer dans différents onglets la programmation par nom.
C'est à dire retrouver toutes les dates sur lesquelles ont été programmé un nom
Ex: toutes les date ou a été programmé Alain, etc

Merci pour votre aide
Cdlt
philippe

 

[Jocelyn]

Re : consolidation de données

Bonjour le Forum,
Bonjour philmaure,

Un essai en fichier joint par formule matricielle a valider en appuyant simultanement sur les CTRL, Maj (au dessus de CTRL) et entrée

Bonne année

Cordialement

 

[pierrejean]

Re : consolidation de données

Bonjour philmaure

Vois si cela te convient
NB: Si tu crees la feuille Philippe recopie ceci dans le module de la feuille et de même pour toute autre feuille créée

Private Sub Worksheet_Activate()
Call test
End Sub

Edit: Salut Jocelyn heureux de te croiser et Bonne et Heureuse Année 2013

 

[philmaure]

Re : consolidation de données

Bonjour, merci pour ta réponse. C'est super
Bonne année à toi aussi.
Bonne journé
philippe

 

[Efgé]

Re : consolidation de données

Bonjour philmaure, Bonjour Jocelyn 🙂

J'étais parti en VBA...

Une proposition qui crée les feuilles si elles n'éxistent pas.

Sub test()
Dim i&, F As Worksheet
With Sheets("Feuil1")
    For i = 4 To .Cells(Rows.Count, 1).End(3).Row
        If .Cells(i, 2).Value < > "" Then
            On Error Resume Next
            Set F = Sheets(.Cells(i, 2).Value)
            If Err Then
                Err.Clear
                Sheets.Add(After:=Sheets(Sheets.Count)).Name = .Cells(i, 2).Value
                Set F = Sheets(Sheets.Count)
                F.Cells(2, 1) = "Date"
            End If
            F.Cells(Rows.Count, 1).End(3)(2) = CDate(.Cells(i, 1).Value)
        End If
    Next i
End With
End Sub

EDIT Bonjour Pierrejean, Très à la bourre le Efgé 😀 , et impoli ; Bonne année à chacun
Cordialement