XL 2013 Afficher des UserForms en fonction des mois

chaelie2015 · 31 Août 2023

Bonsoir FORUM

J'ai développé trois UserForms, chacun étant spécifiquement dédié à une cellule précise dans la feuille intitulée 'Jours fériés'. Plus précisément, il s'agit des cellules de la plage I2:I45 où des formules génèrent des chiffres correspondant à des mois.

Mon objectif est le suivant : à partir de la feuille 'CRT', je souhaite examiner la cellule AM6 (qui contient également une formule générant un chiffre de mois) et vérifier si ce chiffre correspond à l'un des chiffres présents dans la colonne I de la feuille 'Jours fériés'. Si une correspondance est trouvée, je voudrais alors afficher l'UserForm associé à cette cellule.

Je vous remercie d'avance pour toute aide ou conseil que vous pourriez me fournir !

A+

vgendron · 4 Septembre 2023

Bonjour

Je ne vois pas l'interet d'afficher un formulaire puis un autre..
à quoi servent tes formulaires?

ci dessous pas de tempo, le second formulaire est affiché lorsque tu fermes le premier

VB:

Private Sub Worksheet_Change(ByVal Target As Range)
    Dim USF As Object
    If Intersect(Target, Range("AM6")) Is Nothing Then Exit Sub
    With Sheets("Jours fériés")
        For i = 2 To 45
            If .Range("I" & i) = Target Then
            
    '        Set trouve = .Range("I2:I45").Find(Target, LookIn:=xlValues)
    '        If Not trouve Is Nothing Then
                'NomUsf = trouve.Offset(0, 1)
                NomUsf = .Range("J" & i)
                For Each USF In ThisWorkbook.VBProject.VBComponents
                    If...

TooFatBoy · 7 Septembre 2023

Le message #7, lui, est parfaitement correct puisque la macro est appelée suite à la modification d'une cellule quelconque de la feuille.

chaelie2015 · 7 Septembre 2023

TooFatBoy à dit:
Le message #7, lui, est parfaitement correct puisque la macro est appelée suite à la modification d'une cellule quelconque de la feuille.

Re
Dans mon message # 1
<....Mon objectif est le suivant : à partir de la feuille 'CRT', je souhaite examiner la cellule AM6 (qui contient également une formule générant un chiffre de mois) et vérifier si ce chiffre correspond à l'un des chiffres présents dans la colonne I de la feuille 'Jours fériés'. Si une correspondance est trouvée, je voudrais alors afficher l'UserForm associé à cette cellule.>
A+

chaelie2015 · 8 Septembre 2023

Bonjour à tous,
je tiens à vous informer que mon problème a été résolu dans un autre contexte.

File : Erreur d'exécution "50289"

Merci

XL 2013 Afficher des UserForms en fonction des mois

chaelie2015

XLDnaute Accro

vgendron

TooFatBoy

XLDnaute Barbatruc

chaelie2015

XLDnaute Accro

chaelie2015

XLDnaute Accro

File : Erreur d'exécution "50289"

Discussions similaires

XL 2013 Afficher des UserForms en fonction des mois

chaelie2015

XLDnaute Accro

TooFatBoy

XLDnaute Barbatruc

chaelie2015

XLDnaute Accro

chaelie2015

XLDnaute Accro

File : Erreur d'exécution "50289"​

Discussions similaires

File : Erreur d'exécution "50289"