Microsoft 365 Calendrier de réservations

[Pauline1406]

Bonjour à tous,

Je cherche à suivre les indicateurs quotidiens de mes réservations pour une maison d'hôte.
Elles ressortent sur mon fichier d'extract par date de check In/ date de Check out.
Avez vous une idée de comment mettre en forme ces données sous un format calendrier journalier svp?
En PJ un exemple de l'export ainsi que du format souhaité.
Merci d'avance pour votre aide

 

[Pauline1406]

Re
entre "N" et "O" ?
peux-tu mettre ton fichier modifié ?
jean marie

Le voici !

 

[ChTi160]

re
à voir
jean marie

 

[Pauline1406]

re
à voir
jean marie

Bonjour Jean- Marie
J'ai une erreur d'execution '11' division par zéro sur mon document.
Je vous joins le printscreen du debogage...

Je pense que le problème vient de l'extraction. Pour réussir à intégrer votre code VBA sur mon document j'ai copier les onglets extraction + Format fichier souhaité sur mon fichier source.

J'ai donc mon extraction sur mon fichier source (que je fais quotidiennement) que j'ai nommé "extraction 1" et je pensais reprendre les données sur l'onglet extraction de votre fichier mais ça ne fonctionne pas

 

[ChTi160]

Bonjour Pauline
cela est du au fait que la variable des Nuitées est égale à zéro .
alors vous dire pourquoi sans voir le Fichier ,je ne sais pas faire Lol
Bonne Journée
jean marie

 

[Pauline1406]

Bonjour Pauline
cela est du au fait que la variable des Nuitées est égale à zéro .
alors vous dire pourquoi sans voir le Fichier ,je ne sais pas faire Lol
Bonne Journée
jean marie

Merci pour votre retour Jean Marie.
J'imagine c'est déjà compliqué avec le fichier donc sans, encore plus.
Je peux vous faire parvenir par message direct un fichier allégé ? (car il comporte des données confidentielles)
Merci à vous
Bonne journée

 

[ChTi160]

Re
Bien reçu je regarde !
jean marie

 

[ChTi160]

Re
je constate que dans la feuille "extraction" en Ligne 17 il y a :

10​

24/01/2022​

25/01/2022​

0​

ne devrait-il pas y avoir 1 nuitée ?
voir aussi Ligne 38 de ta feuille "Extraction 1"
Si l'on met 1, ça fonctionne, il faut savoir comment le 0 est arrivé là Lol
jean marie

 

[Pauline1406]

Re
je constate que dans la feuille "extraction" en Ligne 17 il y a :

ne devrait-il pas y avoir 1 nuitée ?
jean marie

Re,
en ligne 17 colonne Q il y a 10 car c'est le nombre de personnes.
Le nombre de nuitées est en colonne T, sur cette ligne équivalent à 0 car il s'agit de location à la journée.

 

[ChTi160]

Re
ah mais comment on le devine qu'il n'est pas question de Nuitée Lol

jean marie

 

[ChTi160]

Re
a tester
ce que j'ai modifié

For LgnCompare = 1 To UBound(TBl_BDD)
    FirstDay = TBl_BDD(LgnCompare, 18): LastDay = TBl_BDD(LgnCompare, 19)
      If DayCompare >= FirstDay And DayCompare < LastDay Then
        Nbr_Nuitees = IIf(TBl_BDD(LgnCompare, 20) = 0, 1, TBl_BDD(LgnCompare, 20))'Ici
      Somme_Nuitees = Somme_Nuitees + IIf(TBl_BDD(LgnCompare, 20) = 0, 0, 1),'Ici
           Somme_HT = Somme_HT + TBl_BDD(LgnCompare, 28) / Nbr_Nuitees
          Somme_TTC = Somme_TTC + TBl_BDD(LgnCompare, 29) / Nbr_Nuitees      
      End If
Next

Dans l'attente
Jean marie

 

[Pauline1406]

Re
a tester
ce que j'ai modifié

For LgnCompare = 1 To UBound(TBl_BDD)
    FirstDay = TBl_BDD(LgnCompare, 18): LastDay = TBl_BDD(LgnCompare, 19)
      If DayCompare >= FirstDay And DayCompare < LastDay Then
        Nbr_Nuitees = IIf(TBl_BDD(LgnCompare, 20) = 0, 1, TBl_BDD(LgnCompare, 20))'Ici
      Somme_Nuitees = Somme_Nuitees + IIf(TBl_BDD(LgnCompare, 20) = 0, 0, 1),'Ici
           Somme_HT = Somme_HT + TBl_BDD(LgnCompare, 28) / Nbr_Nuitees
          Somme_TTC = Somme_TTC + TBl_BDD(LgnCompare, 29) / Nbr_Nuitees     
      End If
Next

Dans l'attente
Jean marie

Apriori ça fonctionne parfaitement
Merci infiniment pour votre aide !
Pauline

 

[ChTi160]

Re
N'hésite pas si besoin!
Bonne fin de Journée
jean marie

 

[Pauline1406]

Re
N'hésite pas si besoin!
Bonne fin de Journée
jean marie

Bonjour Jean Marie,
Le fichier marche parfaitement merci beaucoup !

J'ai une autre demande, je vous explique :
Sur mon extraction les CA incluent le Petit déjeuner. J'aimerai recalculer le CA hébergement seul. J'ai pu le faire via une formule sur mon extraction 1
Cependant je ne sais pas comment intégrer le calcul au VBA pour que ces CA hors petits déjeuner soient repris dans mon calendrier par jour.

Puis je vous renvoyer le fichier par email svp?
D'avance merci
Pauline

 

[ChTi160]

Bonjour Pauline

Avec explications et exemples si possible.
Je regarde dès que possible.
Bonne journée
Jean marie