comment récupérer des dates dans un calendrier dynamique

Accueil – Le CFO masqué Forums VBA comment récupérer des dates dans un calendrier dynamique

  • Ce sujet contient 2 réponses, 1 participant et a été mis à jour pour la dernière fois par MLagrange, le il y a 4 mois.
3 sujets de 1 à 3 (sur un total de 3)
  • Auteur
    Articles
  • #100781
    MLagrange
    Participant

    Bonjour, je veux créer des rapports à partir de Power Query pour lesquels je veux créer un fichier EXCEL contenant une DATEDÉBUT (en “B3″) et une DATEFIN (en”B4”) que j’aimerais pouvoir sélectionner à partir du calendrier dynamique que j’ai bâti sur la même feuille.

    Pour ce faire, j’ai créé la procédure VBA suivante :

    Private Sub Worksheet_Selectionchange(ByVal Target As Range, Target2 as range)
    If Not Intersect(Target, Range(“E4:K9”)) Is Nothing Then
    Range(“B3”).Value = Target.Value
    End If
    If Not Intersect(Target2, Range(“E4:K9”)) Is Nothing Then
    Range(“B4”).Value = Target2.Value
    End If
    End Sub

    Ça ne fonctionne pas.

    Comment faire pour intégrer mes sélections de dates dans leurs cellules respectives “B3” et “B4” ?

    Ci-joint le chiffrier en question et les procédures VBA qui s’y rattachent.

    Merci pour votre aide
    Michel Lagrange

    #100782
    MLagrange
    Participant

    Je vous retourne le fichier en version .XLSX, j’ai retranscrit les procédures VBA sur la deuxième feuille.

    Mon problème est en partie résolu. J’ai transféré la procédure “Private Sub…” directement dans le module Feuille correspondant. Par contre, si je laisse Target2, j’ai un message d’erreur; une fois les références à Target2 retirées, cela fonctionne bien pour la cellule “B3” DATEDÉBUT mais je n’ai rien pour “B4”.

    Comment je fais pour générer une date dans “B4” DATEFIN ?

    Merci
    Michel Lagrange

    Attachments:
    You must be logged in to view attached files.
    #100830
    MLagrange
    Participant

    OK tout le monde, j’ai trouvé une solution de contournement

    Merci

3 sujets de 1 à 3 (sur un total de 3)
  • Vous devez être connecté pour répondre à ce sujet.