UserForm de Contrôle de Donnée

[YannC.]

Bonjour,

Voici mon probleme, j'ai utilisé le fichier ci joint pour avoir un UserForm de controle de donnée. Mais le probleme, c'est que je n'arrive pas à le faire fonctionner pour plusieurs onglet de feuille suivant une date donnée dans la feuille 'INTERFACE'.

Si quelqu'un peux m'aider. Merci beaucoup

P.S. : Le fichier excel a été compresser en format ZIP.

 

[BERRACHED said]

Re : UserForm de Contrôle de Donnée

Salut,le linuxien

il fonctionne parfaitement je ne sais ce que tu veux ? il est concu ainsi thierry la fait pour controler un feuille c'est a dire il est static dit nous ce que tu veux faire ?

Cordialement

 

[BERRACHED said]

Re : UserForm de Contrôle de Donnée

Ré

voila une adaptation je ne sais pas si elle te convien

Cordialement

 

[YannC.]

Re : UserForm de Contrôle de Donnée

Bonjour et merci de ta réponse. Ce fichier fonctionne parfaitement, mais seulement pour un onglet. Donc ici pour 2008. Ce que je voudrais, c'est que suivant l'année inserer en feuille 'interface', que l'user affiche les info de l'année choisi. Merci

 

[Guest]

Re : UserForm de Contrôle de Donnée

Bonjour Linuxien,

Voici un truc pour éviter d'avoir à faire de multiple macro d'appel:

Code du userform

Private Sub UserForm_Initialize()
    Dim Sh As Worksheet
    Dim Adresse As String
    Dim An As String
    On Error Resume Next
    An = CStr(ThisWorkbook.Sheets("Interface").Range("F4"))
    Set Sh = ThisWorkbook.Sheets(An)
    If Not Sh Is Nothing Then
        Dim CTRL As Control
        For Each CTRL In USF.Controls
            If CTRL.Tag <> "" Then
                Adresse = CTRL.Tag
                CTRL.Value = sh.Range(Adresse)
            End If
        Next CTRL
    End If
End Sub

A Bientôt

 

[YannC.]

Re : UserForm de Contrôle de Donnée

Merci beaucoup à tous les deux. Grace à vos explication, j'ai pu reussir ce que je souhaitais. MErci encore