Recuperer selection listbox en variable

Salut a tous !

J'ai crée un UserForm avec a l'intérieur deux listbox. Dans ces deux listbox il y a tout mes onglets qui y sont référencé. J'aimerais lorsque je sélectionne les deux onglets et que je clique sur mon bouton de validation que dans ma macro principal deux variables (F1 et F2) deviennent donc les deux onglets sélectionnés.

J'ai ajouté une image pour voir a quoi ressemble mon userform

Début de mon code

Sub MAJdeltasiepr()

Dim Cel As Range
Dim libelP1$, intitP1$, totalP1$, libelP2$, intitP2$, totalP2$, libelD$, intitD$, totalD$
Dim F1 As Worksheet, F2 As Worksheet, F3 As Worksheet
Dim tablo1(3, 12)
Dim iRto%, iCtO%, k%       'variable pour le parcours du Tablo (iR= Row, iC = Column)
Dim iRP1%, iRP2%, iRD%

  Set F1 = Sheets(CreaDelta.ListBox1)
  Set F2 = Sheets(CreaDelta.ListBox2)
  Set F3 = Sheets("test delta F3")

Bonjour

Déclares tes variables F1 et F2 en Public

Ensuite lors de l'appuie sur ton bouton,, testes si données sont sélectionnées dans tes ListBox et affectent ces données à F1 et F2

C'est comme cela que je ferai

Mais sans ton fichier .......

Merci pour l'aide, mais j'ai reussi a résoudre mon probleme !

A plus tard !

Bonjour

padawan95 a écrit :

mais j'ai reussi a résoudre mon probleme !

Si ce n'est pas un secret : Partage

Ce n'est pas du tout un secret !

Rien de bien méchant, j'aurais du juste réfléchir plus longtemps avant de poster ! Il suffisait simplement d'ajouter

.value

a la fin des "chemins" pour les listbox.

Sub MAJdeltasiepr()

Dim Cel As Range
Dim libelP1$, intitP1$, totalP1$, libelP2$, intitP2$, totalP2$, libelD$, intitD$, totalD$
Dim F1 As Worksheet, F2 As Worksheet, F3 As Worksheet
Dim tablo1(3, 12)
Dim iRto%, iCtO%, k%       'variable pour le parcours du Tablo (iR= Row, iC = Column)
Dim iRP1%, iRP2%, iRD%

  Set F1 = Sheets(delta.ListBox1.Value)
  Set F2 = Sheets(delta.ListBox2.Value)
  Set F3 = Sheets("OutilDelta")

Bonjour

Ok pas de souci et merci

Le principe d'un site c'est de partager

Même si la réponse te parait anodine, elle peut aider d'autres personnes confrontées au même problème

Absolument ! Je suis entierement d'accord !

Je suis bien content de tomber sur un topic avec la réponse que je cherche