Userform

Bonjour,
j'ai une userform avec son code vba et il m' a ete demande de faire au moins une modification a cette userform en ajoutant le choix de plusieurs indice ou la date de debut et fin de periode .
je suis nouvelle a vba alors je trouve du mal .
voila le code que j'ai

Private Sub CmdAnnuler_Click()
Unload Me
End Sub

Private Sub CmdValider_Click()

Dim wb As Workbook
Dim wsD As Worksheet
Dim wsR As Worksheet
Dim wsSt As Worksheet

Dim rgR As Range

Set wb = ThisWorkbook
Set wsD = wb.Worksheets("Data")
Set wsR = wb.Worksheets("Rendements")
Set wsSt = wb.Worksheets("statistiques")

wsR.Cells.Clear
wsSt.Cells.Clear

ProcRend Range(RefRend), Range(RefData), CboIndice, OpbCont

Set rgR = Range(RefRend).Offset(1, 1).Resize(Range(RefData).Rows.Count - 2, 1)

ProcStat Range(RefSt), CboIndice, rgR

End Sub

Private Sub UserForm_Initialize()
Me.CboIndice.RowSource = ("indices!indices")
Me.FrRnd.OpbCont.Value = True
Me.RefData = ThisWorkbook.Worksheets("Data").UsedRange.Address(external:=True)

End Sub

et pour ajouter alors une date de debut et de fin par exemple, comment ajouter le nouveau code a ceci ?
C'est urgent , Merci d'avance

3 réponses

  1. Bonjour,

    ajoutant le choix de plusieurs indice ou la date de debut et fin de periode . Faut savoir, parce que les modifs ne sont pas les memes pour l'UF et pour les procedures ProcRend et ProcStat qu'il ne faut pas oublier de modifer
    1. si je veux une date de debut et de fin de periode c est comment?
      Merci pour votre reponse rapide
    2. @KrisRe,
      au plus simple:
      vous ajoutez deux textboxs pour date debut et date de fin avec un controle pour etre sur que c'est une date et que debut avant fin
      un peu plus complexe:
      vous ajoutez deux textboxs pour date debut et date de fin avec saisie dates par un popup calendrier et la juste a controler que debut avant fin
      un exemple: https://www.cjoint.com/c/EJEoEcxPWcf
      extraire le fichier, ouvrir, onglet depot, clic sur formulaire....., double clic sur textbox a cote de date

      dans les deux cas, passez les deux dates en parametres au deux procedures
    3. @f894009regarder ce que j'ai pour le moment , si vous pourriez me faire la modification vous m'auriez sauvez la vie , c est a rendre ce soir !
      http://www.cjoint.com/c/EJEpgSkQmhG
      MILLE MERCI
  2. Juste une modif avec ajout de date de debut et fin de periode , comment ajouter son code ?
    Merci d avance
    1. Re,

      Ce soir quelle heure, parce que je dois m'absenter deux heures ????
      1. il me le faut avant 23:30 , ca serait possible alors ?
      2. @KrisRe,

        Je regarde la chose, deux textboxs avec controle de date.
        Et les procedures qui les modifie ????
      3. @f894009ca serait trop pour vous ?
        je suis desolee mais c'est trop dur pour moi surtout que je suis en plein partiels
        alors ce qui est ok pour vous me sera assez
        MERCI BEAUCOUP
      4. @KrisRe,

        fichier modifie pour saisie dates, mais a mon avis ces dates ne sont pas a utiliser dans les procedures ProcRend et ProcStat. Vous savez pourquoi il vous a ete demande de rajouter ces dates ?????

        https://www.cjoint.com/c/EJEsuZzxtlf
      5. @f894009c'est super merci beaucoup
        en fait, on m'a demande de faire ainsi juste pour s'habituer a la userform, y avait pas un but precis , par contre c est obligatoire et evalue
        une petite question encore : dans la msgbox je mets des dates ? ou je laisse comme ca car j ai essaye de faire ca :
        MsgBox "jj/mm/aaaa"
        mais ca n a pas fonctionne ? je laisse comme vs l'avez fait ?