Discussion :

[Mr_Cls]

Bonjour,

Cela fait déjà quelques temps que je suis sur ce projet et j'avoue que là je coince un peu..
En effet, après avoir arpenté tout le web à la recherche de cette solution je viens vous implorer

Je m'explique (voir le fichier qui sera joint). Voilà donc un planning, où les salariés, les mois, et les années sont renseignés.
Tout au long de l'année on peut renseigner des informations, notamment par jour ou des listes déroulantes sont présentes.
Dans ces listes des données sont renseignées (elles viennent de l'onglet Données), une fois tout ça rempli il y a un petit récap (Récap_annuel) qui permet d'afficher le bilan de l'année. J'en arrive au problème..
Une fois que mon planning me convient j'ai le choix en haut à gauche d'une liste déroulante en fonction des années, me permettant ainsi de naviguer d'un planning à l'autre. Actuellement le fait de changer d'année fait une sauvegarde du planning existant (année n), m'ouvre une nouveau planning (année n+1) donc jusque là c'est cool ! Sauf que ce que j'aimerai, c'est que si par exemple je suis sur le planning de l'année n+1 ou n+n, et que je clique sur l'année n-1 ou n donc le fichier précédent ou le premier, il ne me recréer pas un nouveau fichier (ce qui se passe actuellement) m'écrasant ainsi toutes les données.. De même que pour le moment il me créé un fichier avec incrémentation mais ne le met pas dans le dossier que je désire (nul par d'ailleurs ) ce qui est mon deuxième problème.
En espérant ne vous avoir pas perdu .
La bonne journée !

Planning de presence 2017.xls

[unparia]

Je m'explique (voir le fichier qui sera joint)

Lis ceci :
https://www.developpez.net/forums/d8...s-discussions/
ainsi que le texte de ma signature
et reviens s'il te plait avec un exposé technique clair et précis des tenants et aboutissants et accompagné du code tenté pour résoudre ta difficulté (à isoler).

[Mr_Cls]

Autant pour moi.

Donc voilà le traitement et les problèmes liés qui se trouve dans le code VBA de l'onglet Reccap_annuel.
Voici mon onglet Excel :



Voici le code que j'ai en fonction cet onglet :

Code vba :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
Private Sub Worksheet_Change(ByVal Target As Range)
 
On Error GoTo sauverfichier
 
 
If Not Intersect(Target, [A1]) Is Nothing Then
    Dim wb As Workbook
 
    Dim valeur, repertoire, document As String
 
    valeur = "Planning de presence " & Range("A1").Value & ".xls"
    document = repertoire & valeur
 
    MsgBox ("Le fichier : " & valeur & " a bien été créé")
 
 
'If Dir(document, vbNormal) <> "" Then
    Workbooks.Open (document)
        For Each wb In Workbooks
            Name = wb.Name
            If Len(Name) >= 20 And Mid(Name, 1, 20) = "Planning_de_presence" Then
                If Not wb Is ActiveWorkbook Then
                    wb.Close False
                End If
            End If
        Next
End If
Exit Sub
 
sauverfichier:
 
        ActiveWorkbook.SaveAs (document)
         For Each wb In Workbooks
            Name = wb.Name
            If Len(Name) >= 20 And Mid(Name, 1, 20) = "Planning_de_presence" Then
                If Not wb Is ActiveWorkbook Then
                    wb.Close False
                End If
            End If
        Next
    'End If
End Sub

Actuellement le code recréé un nouveau classeur Excel avec toutes les donnés présentes dans le premier, incrémente l'année et le sauvegarde.
Je pense que j'ai oublié un morceau de code indiquant l'endroit pour la sauvegarde et je ne sais pas comment faire pour naviguer entre les différents fichiers (exemple Planning de presence 2017/2018/...). Quand je change la valeur dans la liste déroulante il sauvegarde à chaque fois, c'est surement un condition manquante, chose que je ne veux pas si le fichier existe déjà dans le dossier ou se trouve le fichier de base (Planning de presence 2017) car ça écrase les données. La finalité du traitement serait :
1- Quand je change d'année, créé un nouveau planning et l'enregistre dans le dossier de base.
2- Si je décide de retourner sur un planning existant, il ne refait pas la sauvegarde et m'ouvre le fichier correspondant.
Je sais qu'il doit y avoir des erreurs et des oublis dans mon code empêchant la finalité attendue, mais je n'arrive pas à les trouver..
Je viens vous demander votre aide car je n'ai pas trouvé ce que je voulais sur internet.