Définir variable combobox

Bonjour à tous !

Je voudrais utiliser la valeur sélectionné dans une combobox (numsemaine) dans une boucle While mais je ne sais pas comment définir la variable.

Private Sub valider_Click()

Dim numsemaine As ComboBox

n = 5

Sheets(" RTG INTERNATIONAL").Select

While Cells(n, 1) <> numsemaine

n = n + 1

Wend

Merci d'avance.

Bonjour

Un essai

Tu peux définir ta variable en Integer

Tu n'es pas obligé de sélectionner une feuille (par Select) pour lire des infos

Attention ton nom de feuille comporte une espace avant le nom (source d'erreur)

Private Sub valider_Click()
Dim NumSemaine As Integer

  If Me.ComboBox1.ListIndex = -1 Then Exit Sub
  NumSemaine = Me.ComboBox1
  n = 5
  Sheets(" RTG INTERNATIONAL").Select
  While Cells(n, 1) <> NumSemaine
    n = n + 1
  Wend
End Sub