transfert de données

[patrick7676]

bonjour
je suis enseignant et je prépare ma rentrée . Eh oui pendant les vacances avec le soleil
voila mon petit problème j'ai un fichier qui repésente toutes les présents ou non aux cours .
Ces cours je les appelle par un nom de couleur :bleu vert rouge
Je souhaiterai a partir du fichier général mettre dans un fichier "bleu" par exemple toutes les données concernant ses cours .
cependant attention je ne connais pas le nombre de cours effectués sur une année ;il faudra prendre en compte ce problème
est ce possible de résoudre ce problème sans VBA ?

merci encore et ne prenez pas un coup de soleil

 

[Gen Rose]

Re : transfert de données

Bonjour Patrick 7676,
Le Forum🙂

Une proposition en p.j.

J'ai seulement dû remanier la base du tableau pour obtenir le TCD selon la demande.

Voir en Feuil 2.

 

[Gen Rose]

Re : transfert de données

Re,

Il semble qu'il y ait un bug dans le fichier que j'ai envoyé, le choix 'BLEU' disparait lorsque l'on sélectionne une autre couleur. Bizz.

Je ne sais si c'est à cause qu'il est sur la même page que le tableau, mais en mettant le TCD sur une autre feuille, le problème semble réglé.

Nouveau p.j.

 

[JBARBE]

Re : transfert de données

Bonsoir tous,

Peut-être ceci aprés avoir cliqué sur le bouton TRIER

RESULTAT dans la feuille 2

Option Explicit

Sub TRIE()
Dim i As Integer
Dim j As Long
Dim k As Integer
Application.ScreenUpdating = False
Range("Tableau").ClearContents
For i = 2 To 16384
  For j = 2 To 1048576
  Sheets(1).Select
  If Cells(2, i) = "" Then Exit Sub
   If Cells(j, 1) = "" Then Exit For
   If Cells(2, i) = "BLEU" Then
   If Cells(j, i) = "" Then Cells(j, i).Value = "-"
   Cells(j, i).Copy
    For k = 3 To 16384
    Sheets(2).Select
     If Cells(j, k) = "" Then
     Cells(j, k).Select
     ActiveSheet.Paste
     Application.CutCopyMode = False
     Exit For
    ElseIf Cells(j, k) <> "" Then
    Cells(j, k).Select
    Else
    Exit For
     End If
    Next k
     Sheets(1).Select
    Else
    Exit For
    End If
  Next j
Next i
Application.ScreenUpdating = True
End Sub

Bonne soirée

 

[patrick7676]

Re : transfert de données

merci pour vos deux réponses cependant
Pour Genevieve 78 NE peut on pas garder le tableau original suivant le modèle proposé ? mon nombre d'élève est supérieur à 100 et cela devient compliqué à le remplir comme dans la solution proposé .

Pour JBarbe : très intéressant âis je suis nul en VBA Peut on réaliser ton système sans VBA

merci encore pour votre aide

 

[patrick7676]

Re : transfert de données

bonjour peu d'aide
vous êtes parti à la plage
une question peut on résoudre mon problème sans VBA

merci

 

[poulie]

Re : transfert de données

Bonjour patrick7676; Bonjour à tous,

Eventuellement cette proposition à tester. Peut-être tantôt le bord de mer...

Bonne réception

 

[Monique]

Re : transfert de données

Bonjour à tous,

Un autre essai
Plages nommées
Quelques formules matricielles (à valider par ctrl, maj et entrée)
Format conditionnel

(le 30-02-2013 n'existe pas)

 

[Compte Supprimé 979]

Re : transfert de données

Bonjour le fil

Je passe juste pour faire un coucou à Monique, la reine des formules matricielles 😉

Bisous

 

[Monique]

Re : transfert de données

Salut Bruno

 

[patrick7676]

Re : transfert de données

bonjour Poulie
avec le mot "Tantôt tes un vrai normand

bonne remarque Monique pour le 30/02
je regarde les deux propositions

 

[patrick7676]

Re : transfert de données

*TREES bon travail
Deux approches différentes
serait il possible de mettre deux critères c'est à dire prendre en compte l'intitulé du cours (exemple Bleu ) mais aussi la catégorie par exemple la catégorie A

 

[Monique]

Re : transfert de données

Re,

C’est fait, en C6 par exemple de la feuille 2 :
=SI((C$3="")+($A6="");"";DECALER(Feuil1!$A$5;EQUIV($A6;Noms;0);EQUIV($A$2&C$3&C$4;Cours&Date&Cat;0)))

 

[poulie]

Re : transfert de données

Vois si cela te convient.

Bonjour Monique, BrunoM45

 

[patrick7676]

Re : transfert de données

merci pour votre aide
cependant j'ai omis de vous dire que la classe est composée d'élèves CM1 et CE2
serait il possible de faire en classement les noms des élèves de cM1 avec les cours bleu
je sais j'aurais du vous le dire des le point de départ vous trouverez ci joint l fichier joint