bonjour,
Au milieu d'une de mes fonction, j'ai une inputbox dans laquel je suis sencé renter un nom. Je voudrais qu'a la place, il y ai une listbox (menu déroulant) dont les noms de la liste se trouve sur dans le 1er colonne d'une autre feuille (sheets("Noms")). Mais je ne sais pas comment faire.
Pour le moment j'ai ceci
Au milieu d'une de mes fonction, j'ai une inputbox dans laquel je suis sencé renter un nom. Je voudrais qu'a la place, il y ai une listbox (menu déroulant) dont les noms de la liste se trouve sur dans le 1er colonne d'une autre feuille (sheets("Noms")). Mais je ne sais pas comment faire.
Pour le moment j'ai ceci
Code:
nom = InputBox("Vous allez prêter le " + instrum + Chr(13) + Chr(13) + "Veuillez entrer le nom de la personne à qui il sera prêté", titre)
If nom = "" Then 'Si on entre rien ou clique sur annuler
errvide = MsgBox("Vous n'avez rien entré ou souhaitez annuler." + Chr(13) + "Que voulez-vous faire?", vbRetryCancel + vbQuestion, titre)
'Il demande ce que l'on veut vraiment faire
If errvide = vbRetry Then 'Si on veut recommencer
GoTo reessayer 'Il relance la demande
End 'Et termine celle en cours
Else: End 'Si on veut annuler, il termine l'instance actuelle.
End If
End If