Microsoft 365 Bloquer des plages de cellules

[kel07]

Bonjour,

Dans le fichier Excel sous l’onglet horaire il faudrait que les personnes puissent modifier seulement les cellules pour une période de 3 semaines.

Exemple :

• Selon la date du jour (disons Aujourd’hui le 15 Mars 2024).
• La modification des semaines antérieur et des 7 jours suivants ne sont plus modifiables.
• Donc du mois d’août 2023 au 22 Mars 2024, aucune modification à l’horaire ne peut être accordée.
• Des ajouts sur les trois semaines suivantes sont possible soit du 25 mars au 12 avril 2024.
• Et encore une fois il n’y a pas de modification possible du 15 avril au 1 juillet 2024.
• À chaque nouvelle journée, la plage horaire modifiable et non modifiable change d’une journée.

Exemple 2

• Selon la date du jour (disons Aujourd’hui le 16 Mars 2024).
• La modification des semaines antérieur et des 7 jours suivants ne sont plus modifiables.
• Donc du mois d’août 2023 au 23 Mars 2024, aucune modification à l’horaire ne peut être accordée.
• Des ajouts sur les trois semaines suivantes sont possible soit du 26 mars au 13 avril 2024.
• Et encore une fois il n’y a pas de modification possible du 15 avril au 1 juillet 2024.
• À chaque nouvelle journée, la plage horaire modifiable et non modifiable change d’une journée.
• 
  
• 
  
• Bien sûr que la personne en charge de l’Excel peut changer des choses à sa guise. Il suffirait d’un mot de passe de « l’administration ».

 

[kel07]

bonjour à tous.
Je vois que toofatboy a bien pris le problème, et j partage ses conclusions.
l'appli ne trouve pas dans le tableau, la date d1, Etrange....
Je suppose que ca fonctionne chez toi Toofatboy?
Attention le format dans le fichier est jjj j mmmm yyyy
un seul chiffre pour le numéro du jour.
Il va falloir étudier le format des cellules contenant les dates

Dans un premier temps:
Dans le module thisworkbook, supprimer ou mettre en commentaire interdiction
la mise en commentaire se fait en mettant ' devant la ligne
Ensuite
dans le module 11
remplacer
d = Date
par
d= cdate( date quelconque sous la forme "1/1/2024")
essayer avec différente date pour voir si toute les dates pose le même problème
Si le message affichant la date s'affiche sans erreur revenir vers nous pour voir quelles dates fonctionnent
A suivre

Malheureusement, je connais pas les VBA et je ne comprends pas du tout ton message et ce que je dois faire. C'est beaucoup trop complexe pour moi.

 

[TooFatBoy]

Il faudrait vraiment trouver pourquoi chez toi la date n'est pas trouvée.

Je ne suis pas sûr de bien comprendre : si aujourd'hui tu télécharges le fichier de #4, as-tu le problème de date non trouvée, ou pas ?

 

[kel07]

Il faudrait vraiment trouver pourquoi chez toi la date n'est pas trouvée.

Je ne suis pas sûr de bien comprendre : si aujourd'hui tu télécharges le fichier de #4, as-tu le problème de date non trouvée, ou pas ?

Dans mon ordi je ne vois pas de fichier 4. Il y a les 2 premiers envoie de sousou mais depuis pas de pièce jointe.

 

[TooFatBoy]

Dans mon ordi je ne vois pas de fichier 4.

Ce n'est pas plus mal, vu que je te parle du fichier qui est dans le message #4 de ce fil de discussion.

 

[TooFatBoy]

Est-ce que tu veux qu'on fasse ensemble ce que sousou te disait de faire ?
(en fait c'est hyper simple)

On peut aussi tenter autre chose.
C'est toi qui voit.

 

[kel07]

Ce n'est pas plus mal, vu que je te parle du fichier qui est dans le message #4 de ce fil de discussion.

C'est toujours la même chose puisque le même fichier non.

 

[TooFatBoy]

C'est toujours la même chose puisque le même fichier non.

Si tu ne veux pas essayer, je ne te force pas.

 

[kel07]

Si tu ne veux pas essayer, je ne te force pas.

J'ai essayer et ça change rien, même code erreur 91 et ensuite 424 puisque le même fichier et que je comprends pas ce que je dois faire pour modifier la vba. la di donne mardi 26 mars 2024 et toujours nothing

 

[TooFatBoy]

Donc tu ouvres VBE (Visual Basic Editor) par la combinaison de touches <Alt>+<F11>.
A gauche tu dois avoir la liste des feuilles.

Tu double-cliques sur "ThisWorkbook".
Son code doit s'afficher. Il n'y a qu'une seule macro : "Workbook_Open".

Dans cette macro, il n'y a qu'une seule instruction.
Cette instruction appelle la macro qui se nomme "interdiction".

C'est ça que sousou veut te faire bloquer pour l'instant.

Donc tu mets le curseur devant le nom "interdiction" et tu saisies une apostrophe.
La ligne doit alors devenir verte, ce qui veut dire qu'elle en commentaire et donc inactive.

 

[TooFatBoy]

Arf ! Pas de réponse : je l'ai tuée..

 

[kel07]

Est-ce que tu veux qu'on fasse ensemble ce que sousou te disait de faire ?
(en fait c'est hyper simple)

On peut aussi tenter autre chose.
C'est toi qui voit.

J'ai mis l'apostrophe devant interdiction et le mot est devenu vert. Mais le code erreur 91 reste toujours là. C'est long mes changements car je connais rien et que je dois faire des essaies erreurs.

 

[TooFatBoy]

OK, donc maintenant tu as compris le principe pour inhiber une instruction : on la met en commentaire en mettant une apostrophe devant.
Donc, bien sûr, pour réactiver l'instruction, tu enlèves l'apostrophe.

---

Je te propose un autre test que celui que voulait te faire faire sousou.

Enlève l'apostrophe pour réactiver l'appel de la macro "interdiction".

Ensuite double-clique sur le Module11 pour voir son code.
Il y a plusieurs macros, dont "nommois".
Dans cette macro tu as une ligne

Set jour = zone.Find(d1, LookIn:=xlValues)

Enlève le 1 pour avoir

Set jour = zone.Find(d, LookIn:=xlValues)

Clique n'importe où dans la macro "interdiction".
Appuie sur la touche <F5> pour lancer la macro "interdiction".

 

[TooFatBoy]

Oups, j'oubliais le plus important : il ne faut plus que la ligne soit surlignée en jaune.
Donc tu cliques sur le petit carré que tu dois voir au-dessus du menu "Format".

 

[kel07]

Oups, j'oubliais le plus important : il ne faut plus que la ligne soit surlignée en jaune.
Donc tu cliques sur le petit carré que tu dois voir au-dessus du menu "Format".

J'ai fais le test a deux reprises. Il y a plus de jaune avant le f5. Mais après quelque seconde la même signe jaune reviens avec le code 91

 

[TooFatBoy]

J'ai fais le test a deux reprises. Il y a plus de jaune avant le f5. Mais après quelque seconde la même signe jaune reviens avec le code 91

Que tu recherches d ou d1 tu as le même problème, jour vaut Nothing dans les deux cas ???