Autres Compléter un onglet à partir d'un autre

[Tara22]

Bonjour,

Je travail sur une base de données, actualisée une fois / semaine et qui contient plus de 1 000 lignes.

Pour répartir les dossiers à traiter par instructeur, je filtre ma base et je fais un copier / coller dans l'onglet de l'instructeur concerné.

Pour un gain de temps, je souhaite que les informations de l'onglet TABORD soient reparti dans les différents onglets en fonction du nom de l’instructeur.

Merci infiniment pour toutes aides que vous pourrez m'apporter.

 

[sylvanu]

Bonjour Tara,
Un essai en PJ avec :

Sub Transfert()
On Error GoTo Fin
Application.ScreenUpdating = False
DL = Sheets("TABORD").Range("A65500").End(xlUp).Row
For Each F In Worksheets
    If F.Name <> "TABORD" Then
        Sheets(F.Name).Range("A2:Z1000").ClearContents
    End If
Next F
For L = 2 To DL
    F = Cells(L, "K")
    DL2 = 1 + Sheets(F).Range("A65500").End(xlUp).Row
    For C = 1 To 13
        Sheets(F).Cells(DL2, C) = Cells(L, C)
    Next C
Next L
Exit Sub
Fin:
MsgBox "Erreur rencontrée"
End Sub

J'ai supposé qu'avant de dispatcher il fallait effacer les données présentes dans les feuilles, sinon je rectifierais.

 

[sylvanu]

il m'indique Error.

Il indique quelle erreur ?
Qui plus est, comme je l'ai indiqué, je vide les feuilles avant de les remplir. Toutes les feuilles exceptées TABORD, donc l'origine de vos infos par RechercheV aussi.
Si vous pouviez fournir un "VRAI" fichier test représentatif, ce serait plus simple.

 

[sylvanu]

Voilà. Il suffit d'appuyer sur le bouton GO.
Par contre dans les feuilles copiées j'ai laissé les formules à l'identique et non les valeurs.
mais cela peut se modifier si vous ne voulez que les valeurs.

 

[sylvanu]

C'est bizarre, j'étais persuadé que vous alliez demandé d'obtenir un fichier par instructeur !
Alors just for the fun en PJ, comme je venais de le finir, vous récupérez un fichier par instructeur.

NB: Il faut enregistrer le fichier avant de l'utiliser. Les fichiers instructeurs seront au même niveau.

 

[sylvanu]

Ca change tout.
Dans la structure actuelle les fichiers sont générés et écrasent ceux qui portent le même nom.
Donc ça ne marche pas. Il faut ou tout reprendre ou créer un outil de synthèse.
Créez un nouveau post pour la synthèse, ce sera plus simple.
Mais précisez si les données seront dans le même fichier ou des fichiers à part, si les fichiers seront dans le même dossier ....

 

[sylvanu]

Bonjour,
Pour vos problème de filtres, utilisez cette macro sur Tabord :

Sub SupprimeTousFiltres()
    On Error Resume Next
    Range("Tableau2[[#Headers],[N° de dossier]]").AutoFilter
    Range("Tableau2[[#Headers],[N° de dossier]]").AutoFilter
End Sub

Elle supprime tous les filtres mis en place puis repositionne un filtrage vierge.

 

[Tara22]

Bonjour Tara,
Un essai en PJ avec :

Sub Transfert()
On Error GoTo Fin
Application.ScreenUpdating = False
DL = Sheets("TABORD").Range("A65500").End(xlUp).Row
For Each F In Worksheets
    If F.Name <> "TABORD" Then
        Sheets(F.Name).Range("A2:Z1000").ClearContents
    End If
Next F
For L = 2 To DL
    F = Cells(L, "K")
    DL2 = 1 + Sheets(F).Range("A65500").End(xlUp).Row
    For C = 1 To 13
        Sheets(F).Cells(DL2, C) = Cells(L, C)
    Next C
Next L
Exit Sub
Fin:
MsgBox "Erreur rencontrée"
End Sub

J'ai supposé qu'avant de dispatcher il fallait effacer les données présentes dans les feuilles, sinon je rectifierais.

Merci Beaucoup.

Je ne suis pas très douée avec les macros

Quand j'essaye d'appliquer cette macro à mon tableau d'origine, il m'indique Error.
J'ai oublié de préciser que mon TABORD importe les informations avec une RECHERCHEV d'un autre onglet dans mon fichier

 

[Tara22]

Voici un modèle du tableau utilisé.

Merci de votre patience Sylvanu

 

[Tara22]

Ça fonctionne très bien.
Merci infiniment pour votre aide. Je suis vraiment impressionnée.
Ce n'est pas impossible que je fasse appel a vos connaissances à nouveau.
Merci beaucoup.

 

[Tara22]

C'est bizarre, j'étais persuadé que vous alliez demandé d'obtenir un fichier par instructeur !
Alors just for the fun en PJ, comme je venais de le finir, vous récupérez un fichier par instructeur.

NB: Il faut enregistrer le fichier avant de l'utiliser. Les fichiers instructeurs seront au même niveau.

C'est top

Je viens de me rendre compte que les informations enregistrées par les instructeurs dans leur fichier dans les colonnes AD - AI - AJ - AK doivent figurer impérativement dans le TABORD au fur et à mesure.

Maintenant que vous connaissez mon niveau en EXCEL, vous vous en doutez que je ne sais pas comment faire

 

[Tara22]

Ca change tout.
Dans la structure actuelle les fichiers sont générés et écrasent ceux qui portent le même nom.
Donc ça ne marche pas. Il faut ou tout reprendre ou créer un outil de synthèse.
Créez un nouveau post pour la synthèse, ce sera plus simple.
Mais précisez si les données seront dans le même fichier ou des fichiers à part, si les fichiers seront dans le même dossier ....

Je tiens à m'excuser pour cet énorme oubli de ma part.

Je préfère partir sur les données dans un même fichier (un onglet par instructeur).

Mais je suis ouverte à toutes propositions, si vous estimez que c'est plus simple de mettre en place un fichier par instructeur voir peut être un dossier regroupant l'ensemble des fichiers de chaque instructeur ( pour conserver l'historique), je m'adapterai.

Le plus important c'est que l'onglet "TABORD" soit alimenté au four et à mesure des information enregistrées par chaque instructeur.

Merci à vous et passez une agréable soirée.

 

[sylvanu]

Combien d'instructeurs avait vous et les noms sont ils constant ?
Car le seul moyen simple set d'avoir un onglet par instructeur qui ne bougent pas et d'enrichir chaque onglet au fur et à mesure. Cela permet aussi de rapatrier les données des instructeurs vers Tabord.
Autre point : Les N° de dossiers seront ils toujours uniques ? C'est important pour la synchronisation.

 

[Tara22]

J'ai 5 instructeurs, les noms peuvent changer en fonction des demandes de mutations internes, le nombre peut aussi être variable (hausse ou baisse)

L'idée d'enrichir l'onglet au fur et à mesure me séduit beaucoup, ça sera vraiment l'idéal et correspond parfaitement à ce que je souhaite réaliser

Un n° de dossier est unique en revanche il peut changer en fonction de l'année.2021 -0001, 2021-0002 / 2022-0001, 2022-0002. Par contre les n° ne se suivent pas toujours, je peux passer de 8045 à 8049 puis 80/50 8051 et passer 8060.

 

[Tara22]

Encore une information qui viendra peut être compliquer notre histoire, à chaque nouvelle extraction, je suis obligé d'enregistrer le fichier pour le nommer avec la date de l'extraction en cours.

Je sais que c'est archaïque mais pour ne pas bosculer trop les habitudes d'un coup je suis obligé de conserver ce mode de fonctionnement.