Explications

[zeltron24]

Bonjour à tous,

Voici ma demande, dans un classeur, j'ai des macros dont celle ci :

Private Sub BtnModifier_Click()
    BtnAjout.Caption = "ENREGISTRER"
    ModifierUnInscrit = True
    FrmRecherche.Show
End Sub

Ma question est celle ci: Comment fonctionne l'instruction : ModifierUnInscrit = True.
Je ne vois pas de macro à ce nom, ce n'est pas non plus une variable, ni un module de classe. Je ne trouve pas de code se référent à ce nom ou cela se trouve t-il ?
Merci de me donner quelques explications à ce sujet.
Je ne parviens ni à enregistrer ou modifier une rangée.

 

[Dranreb]

Re : Explications

Bonjour.

Public ModifierUnInscrit As Boolean dans le module ModInscription

Remarque: Un Boolean représente à lui seul une condition. Donc dans les If et ElseIf, supprimez les = True, et remplacez les ModifierUnInscrit = False par Not ModifierUnInscrit

 

[sousou]

Re : Explications

Bonjour.
Modifier est une variable boolenne déclarée dans la procédure Modinscription et utilisée régulièrement
Mise à true ou à false et testée
Public ModifierUnInscrit As Boolean


Bonjour à tous en retard

 

[pierrejean]

Re : Explications

Bonjour zeltron24

ModifierUnInscrit est une variable du Module ModInscription

Public RappelerUnInscritAnMoinsUn As Boolean
Public ModifierUnInscrit As Boolean
Public SortieCorrecteUsfRecherche As Boolean
Public LigneDeDestination As Long

 

[zeltron24]

Re : Explications

Merci à tous pour vos réponses
Donc si j'ai bien compris cela correspond à un 1 ou un 0 dans la condition, mais pourquoi je n'arrive pas à modifier ou enregistrer la ligne sélectionnée dans rechercher un inscrit de la saison précédente ?

 

[zeltron24]

Re : Explications

Re,

Cela fait plusieurs heures que je me penche sur ce problème d'enregistrement et de modification sans succés. J'arrive à enregistrer que les OptionButton mais pas les TextBox.
Je serais hyper content si vous pourriez venir à mon secours.
Merci

 

[zeltron24]

Re : Explications

Bonjour à tous,
N'ayant pas eu l'aide souhaitée, je me suis acharné à trouver les formules afin d'avancer dans mon travail.
J'arrive à mettre dans les txtbox les valeurs des cellules concernées, mais impossible de trouver le code afin de mettre à true la valeur des optionbutton correspondant à la cellule adéquate.
Je travaille sur la formule suivante:

    If od.Cells(Range("S").ListIndex + 2, 19) = "FEMININ" Then
        FrmInscription.OptionButton1.Value = True
ElseIf od.Cells(Range("S").ListIndex + 2, 19) = "MASCULIN" Then
        FrmInscription.OptionButton2.Value = True
End If

Mais j'ai une erreur aussi je souhaiterai de l'aide afin de pouvoir continuer sur le formulaire "FrmInscription" qui s'ouvre avec le bouton "Inscription".
Merci d'avance pour votre aide.

Voici ce que j'ai trouvé et qui fonctionne :

    If od.Cells(Me.ComboBox1.ListIndex + 2, 19) = "FEMININ" Then
        FrmInscription.OptionButton1.Value = True
ElseIf od.Cells(Me.ComboBox1.ListIndex + 2, 19) = "MASCULIN" Then
        FrmInscription.OptionButton2.Value = True
End If

Le souci c'est que cela ne fonctionne que pour le premier groupe (sexe)