Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

XL 2021 Création agenda

Nicolas JACQUIN

XLDnaute Impliqué
Supporter XLD
Bonsoir tout le monde,

Sur ma création d'agenda, j'ai un petit problème avec mon code, y a un petit truc que j'arrive pas à régler.
Si le mois n'existe pas je le créer sans soucis, mais si le mois existe, ça me dis que le moi existe déjà, je dis ok mais sur ma feuille paramètre ça scroll jusqu'à la colonne "Q", il y a une tuile, je vois un peut près ou mais j'arrive pas à l'interpétrer comme il faut.

Merci à tous
Nico



 

Pièces jointes

  • Agenda v22.xlsm
    92.3 KB · Affichages: 8
Dernière édition:
Solution
Nicolas

Ton Pb vient d'ici


et comme je ne pense pas que l'on peut scroller une feuille non active il faudrait mémoriser le nombre de scroll de colonne

VB: 
Function Actu_jour(année, mois)
    Application.ScreenUpdating = False
    Dim i As Long, nbjour As Long
    nbjour = Day(DateSerial(année, mois + 1, 0)) ' te donne le nombre de jour dans le mois en parametre
    lig = 2: col = 3
    With Worksheets("Feuil1")
        For i = 1 To nbjour
            '.Range(.Cells(lig, col), .Cells(lig + 1, col)).Interior.ColorIndex = 24
            If année = Year(Date) And mois = Month(Date) And i = Day(Date) Then
                '.Range(.Cells(lig, col), .Cells(lig + 1, col)).Interior.ColorIndex = 28 'Coloriage aujourd'hui...
Trier par date Trier par votes

Nicolas JACQUIN

XLDnaute Impliqué
Supporter XLD
Bonjour à tous,
J'ai revu un peu la copie mais je tombe sur un nouveau bug, j'ai voulu rajouter les anniversaire à souhaiter sur le même principe que les fêtes ( qui lui fonctionne parfaitement) mais j'ai un défaut que je comprends pas sur la partie anniversaire, j'ai bien créé un tableau en feuille Paramètre mais je ne sais point.



Merci
Nico
 

Pièces jointes

  • Agenda v23.xlsm
    97.8 KB · Affichages: 3
Vote positif 0 Vote négatif

Phil69970

XLDnaute Barbatruc
Nicolas

Tu as 2 TS



Pour repérer 1 TS regarde si il ya une poignée de recopie en bas à droite du "supposé TS"

Il y a une poignée de recopie c'est donc un TS


Et ici il n'y a pas de poignée de recopie ce n'est pas 1 TS


De plus tu devrais faire le ménage
 
Vote positif 0 Vote négatif

jcf6464

XLDnaute Impliqué
Bonjour à vous tous et le forum

Pourquoi ne te sert tu pas de la feuille fêtes pour remplir les anniversaires des calendriers cela fonctionne en modifiant les entrées dans le codes

bonne continuation jcf

bon travail
Ci-joint le fichier modifier à vérifier
 

Pièces jointes

  • Agenda v23.xlsm
    123.4 KB · Affichages: 1
Vote positif 0 Vote négatif

Nicolas JACQUIN

XLDnaute Impliqué
Supporter XLD

Re,
A la base j'ai fais un copié collé du tableau des fêtes et puis renommé le tableau, enfin je pensais.
Pour le ménage je suis d'accord
 
Vote positif 0 Vote négatif

Nicolas JACQUIN

XLDnaute Impliqué
Supporter XLD
jcf6464 à dit:
Bonjour à vous tous et le forum

Pourquoi ne te sert tu pas de la feuille fêtes pour remplir les anniversaires des calendriers cela fonctionne en modifiant les entrées dans le codes

bonne continuation jcf

bon travail
Cliquez pour agrandir...

Bonjour jcf6464,

J'avais pensé à l'idée, mais je cherchais à faire au plus simple pour l'utilisateur, en mettant dans la feuille Paramètre, mais même en choisissant cette option je n'y arrive pas.

Merci
 
Vote positif 0 Vote négatif

Phil69970

XLDnaute Barbatruc
Nicolas

Des que tu crées ton TS "t_aniv" tout fonctionne chez moi
Remarque en testant un peu :
J'ai modifié le "minuit" en 0 car sinon cela me fait une erreur pour l'heure de début
J'ai modifié le "minuit" en 24 car sinon cela me fait une erreur pour l'heure de fin






Regarde bien c'est 1 TS il ya une poignée de recopie


A noter que j'ai renommé "t_anniv1" mais tu peux le supprimer si tu veux
 
Dernière édition:
Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.

Discussions similaires

  • Résolu(e)
XL 2016 Tableau croisé dynamique
Réponses
2
Affichages
101
piga25
Z
  • Résolu(e)
XL 2021 Tester l'existence d'un nom d'onglet
Réponses
3
Affichages
246
jm.andryszak
J
  • Question
XL 2021 Création d'un Tableau croisé dynamique en évitant de charger certaines lignes.
Réponses
4
Affichages
353
jeff1494
J
  • Question
XL 2016 Tableau structuré avec UserForm dans classeur multipages
Réponses
2
Affichages
446
jorge1201
J
T
  • Question
XL 2016 Preparer mon publipostage avant export
Réponses
0
Affichages
76
tuti
T
P
  • Question
Microsoft 365 Problème lors de la création d'un fichier
Réponses
4
Affichages
378
ChTi160
Y
  • Question
XL 2016 Création d'un publipostage avec PJ PDF sur Outlook
Réponses
2
Affichages
137
Phil69970
  • Question
Microsoft 365 "concatener" certaines colonnes d'onglets
2
Réponses
15
Affichages
736
Phil69970
O
  • Question
XL 2019 Code VBA pour automatiser la programmation des rotations des ouvriers qui travaillent à temps partiel et se relaient par période de temps constante.
2 3
Réponses
35
Affichages
1 K
olivier1984
O
A
  • Résolu(e)
XL 2021 Céer un fichier (.text) avec VBA pour enregistrer les évènements dans un journal
Réponses
4
Affichages
462
arnoldbrice19
A
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…