Entrer des durées de séjour dans un tableau Résolu/Fermé

Question

Bonjour

Dans un tableau dont les en-têtes de colonnes sont des dates consécutives et les en-têtes de lignes sont des noms de personnes, je voudrais créer une macro qui permette de renseigner la présence de telle ou telle personne.
Pour les adultes et les enfants de plus de dix ans, la présence est signalée par 1.0 pour un jour donné. Pour les enfants jusqu'à dix ans, c'est 0.5. La présence des enfants est renseignée avec celle d'un de leurs parents.
Ainsi, un adulte seul vaudra 1.0 et un adulte avec deux enfants de moins de dix ans vaudra 1.0+0.5+0.5 = 2.0.
Dans le fichier "JG - VBA Draft.xlsm" (téléchargeable en suivant https://www.cjoint.com/c/KEimX4gW061, le bouton "1 - Entrée des dates" fait appel à une macro qui entre la série de dates à partir des cellules B1 (Date de début) et B2 (date de fin). La macro "Nommer_plages" nomme les lignes du tableau à partir des noms de personnes des en-têtes de lignes du tableau.
C'est la macro "Entrer_une_présence" que je voudrais modifier.
En fait, j'aimerais avoir une boîte de dialogue appelée "2 - Entrée des présences" dans laquelle l'utilisateur puisse
	sélectionner la personne concernée,
	indiquer la date d'arrivée et la date de départ,
	préciser le nombre d'adultes et d'enfants de plus de dix ans,
	préciser le nombre d'enfants jusqu'à dix ans.
Cette boîte de dialogue lancerait une macro qui renseignerait le tableau pour la personne concernée à ses dates de présence.
Pour info, le fichier que j'ai mis en ligne est juste un fichier de travail. La feuille de ce fichier vient d'un autre fichier dans lequel elle interagit avec une autre feuille dans laquelle les dépenses de séjour sont renseignées et dans laquelle se calcule qui doit quoi à qui en fonction des données de présence et de nombre de personnes.

Un magicien du forum pourrait-il m'aider ? Je peux créer des macros hyper simples, mais là, c'est beaucoup trop calé pour moi !
Merci d'avance,
Majanian

f894009 · Answer

Bonjour,

Vous connaissez la programmation VBA Excel un peu, pas vraiment?
J'ai recupere le fichier. Les dates en entete colonnes sont absentes!

majanian · Answer

Bonjour,

Exact, je les ai laissées vides ! On peut les entrer en renseignant les cellules B1 et B2 et en cliquant sur le bouton "1 - Entrée des dates".
En VBA, à part des macros simples, comme ci-dessus, je ne suis pas calé !

Cordialement,
Majanian

Passionofdream · Answer

Bonjour,

Je pense qu'il faut passer par un userform 
Une fois les données entrées que voulez vous obtenir et à quel endroit de votre tableau

Cordialement

majanian · Answer

Bonjour,

Merci de vous intéresser à mon cas !
Une fois les données entrées dans l'userform, il faudrait qu'elles apparaissent sur la ligne de la personne concernée, dans les cellules correspondant aux dates de son séjour, avec un 1.0 pour un adulte seul, ou avec un 1.5 pour un adulte et un enfant (1.0+0.5). Il faudrait donc que l'userform demande la personne, les dates de séjour, le nombre d'adultes et le nombre d'enfants.

Cordialement,
Majanian

f894009 · Answer

Re,
Les dates entrees par votre bouton ne peuvent pas convenir pour x personnes mais seulement pour celles qui auraient leur sejour dans la plage de dates.
Il vaudrait mieux mettre toutes les dates de l'annee en entete de colonne et colorier la plage dates de sejour pour les personnes

 sélectionner la personne concernée,
l'userform demande la personne
Par quel hazard vous connaissez la personne avant d'avoir son nom

majanian · Answer

@f894009
Bonjour,

Colorier la plage ne suffirait pas. Pour une même personne, les cellules peuvent prendre différentes valeurs qui servent à calculer la part des dépenses que la personne doit prendre à sa charge.
Normalement, la colonne des noms contient des prénoms. J'ai juste anonymisé le fichier que j'ai posté avec Personne1, Personne2, etc. Les personnes sont donc connues.
Vous dîtes " sélectionner la personne concernée,
l'userform demande la personne". Est-ce que vous avez posté le fichier modifié ?

Cordialement,
Majanian

f894009 · Answer

Bonjour,

Est-ce que vous avez posté le fichier modifié ?
Non, car explications trop floues et vraiment incompletes.
Serait plus utile de mettre un fichier sans donnees confidentielles mais coherentes.
Ce fichier aurait les infos que vous voulez au bon endroit et surtout bien expliquer ce que vous en faites

majanian · Answer

Le fichier complet est disponible en suivant https://www.cjoint.com/c/KEkjeSVcqP1
La feuille "Présence" est celle que j'avais postée précédemment. Cette feuille interagit avec la feuille "Dépenses", pour calculer qui doit quoi à qui. J'ai mis des données dans le fichier.
Il y a des explications tout en tête de ce post, en date du 8 mai.
Cordialement,
Majanian

f894009 · Answer

Re,

Ok, je recupere le fichier et regarde la chose

f894009 · Answer

Re,

Ca avance. L'userform est faite avec une partie de code.
je continue demain

majanian · Answer

Merci, bon courage ! Je ne suis pas là pendant le pont de l'Ascension, prenez votre temps…

f894009 · Answer

Re,
Votre bouton entre date écrit la plage de dates en entête.
Il faut donc avoir une saisie de dates pour les personnes sélectionnées

majanian · Answer

Oui, cela pourrait se saisir dans les colonnes B et C, en déplaçant le tableau vers la droite.

majanian · Answer

Dans l'userform ce serait parfait !

majanian · Answer

Les celulles B1 et B2 servent à entrer les dates de début et de fin qui servent à la macro appelée par le bouton "Entrer les dates" pour entrer une série de dates consécutives dans les en-têtes du tableau. Il n'y a pas de limite au nombre de mois. Pour le moment, le tableau est formaté sur 32 colonnes (deux mois de 31 jours.

majanian · Answer

Les nuits ne sont pas prises en compte. Ce sont les journées de présence qui servent à répartir les dépenses.
Oui, les séjours sont compris entre ces deux dates.

f894009 · Answer

Bonjour,

Bonjour,

Une facon de faire: https://mon-partage.fr/f/E3nwl73t/

Deux TextBox de saisie date et fin de sejour au format jj/mm/aaaa (saisie date sans les"/" et controles divers et varies)
Deux TextBox de saisie personnes se plus de + de 9ans et - de 10ans
Une TextBox Calcul de l'indice de sejour/jour
Click sur Validation pour ecriture des infos 

Possibilite de saisie x sejours pour une personne selectionnee dans la plage de dates definie sur le feuille avec click sur RAZ

majanian · Answer

Bonjour,

Super, merci beaucoup pour votre temps. Ça marche impec et, en plus, la boîte de saisie est superbe !

Cordialement,
Majanian

Entrer des durées de séjour dans un tableau

18 réponses

Discussions similaires