VBA

Bonjour,

voila, je débute totalement en VBA, et je ne sais pas faire grand chose. J'ai un projet, c'est à dire, un userform avec dessus des textbox, combobox. Et j'aimerai qu'en écrivant dans la textbox cela envoi le texte ou la valeur dans ma feuille de calcul excel, quant a la combobox, j'aimerai sélectionner une liste de choix déja opérationnelle.

Comment faire ?

Merci
Configuration: Windows Vista
Firefox 3.0.15

3 réponses

  1. Pourrais-tu m'expliquer un peut ta démarche stp !!

    le range("AX") c'est pour la colonne avec la ligne mais la suite je ne comprends pas
    1. désolé mec il yavait répétion de ligne.

      Private Sub lenomdetonbouton_Click()
      Dim iRow As Long
      With Sheets("lenomdetafeuil")
      iRow = .Range("A65536").End(xlUp).Offset(1, 0).Row

      .Cells(iRow, 1).Value = Me.lenomdetontextbox.Value

      End With
      End Sub

      Private Sub UserForm_Initialize()
      lenomdetoncombobox.List() = Range("lenomdelapalge").Value
      End Sub
      1. salut mec,
        Private Sub lenomdetonbouton_Click()
        Dim iRow As Long
        With Sheets("lenomdetafeuil")
        iRow = .Range("A65536").End(xlUp).Offset(1, 0).Row

        .Cells(iRow, 1).Value = Me.lenomdetontextbox.Value

        End With

        iRow = .Range("A65536").End(xlUp).Offset(1, 0).Row
        .Cells(iRow, 1).Value = Me.lenomdetontextbox.Value

        End Sub

        Private Sub UserForm_Initialize()
        lenomdetoncombobox.List() = Range("lenomdelapalge").Value
        End Sub
        1. Merci, mais j'ai tout de même un problème L4 avec le .Range il me dit que c'est une référence incorrect !!