VBA: création d'un tournoi de foot

golna120389

XLDnaute Nouveau
Bonjour à tous!

Voilà j'ai un problème, je dois réaliser un programme pour la gestion d'un tournoi de foot et en fait j'aimerais savoir comment l'on pourrait faire pour que l'utilisateur puisse choisir le nombre d'équipe à inscrire 2, 4...(je comptais afficher une liste déroulante mais je ne sais pas comment le traduire en code), et ensuite l'utilisateur devra saisir les équipe une à une : ces dernières seront renvoyées vers une feuille précise..

Voilà j'sspère être assez claire dans mes explications..
 

GI_tang

XLDnaute Nouveau
Re : VBA: création d'un tournoi de foot

voila

ca serai bien de chercher un peu avant de poser des questions car c'est pas très compliqué

Code:
Sub Macro1()

Dim nomequipe() As String

Cells.Select
Selection.ClearContents


nbrequipe = InputBox("sélectionner le nombre d'équipe")

ReDim nomequipe(1 To nbrequipe)

If nbrequipe = 0 Then
    End
End If

Range("A1").Select
Selection.Offset(0, 0).Value = "numéro de l'équipe"
Selection.Offset(1, 0).Value = "nom de l'équipe"

For i = 1 To nbrequipe
    nomequipe(i) = InputBox("sélectionner le nom de l'équipe" & i)
    Selection.Offset(0, i).Value = "equipe n°" & i
    Selection.Offset(1, i) = nomequipe(i)
Next
End Sub
 

Discussions similaires

Réponses
8
Affichages
620