Discussion :

[omzo86]

Bonjour à tous,
Je suis un novice en VBA et je bloque sur un truc. Je voudrais mettre en gras une ligne dans un sous formulaire lorsque je coche un radio bouton.
Mon problème c'est qu'il me mets toute la colonne et pas celle qui est coché
voici mon code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
 
Private Sub Validé_AfterUpdate()
Me.Refresh
Dim i As Integer
Dim index As Integer
index = Me.SelTop - 1
 
 
For i = 0 To Form_SFrm_Elements_Facturation.Count
 
   If Validé <> 0 And (i = index) Then
        Me.Lib_Elfac.FontBold = False
        '[Code ElFac].FontBold = False
        '[Montant HT].FontBold = False
        'Date_Deb_Elfac.FontBold = False
        'Date_Fin_Elfac.FontBold = False
 
    Else
        Me.Lib_Elfac.FontBold = True
        '[Code ElFac].FontBold = True
        '[Montant HT].FontBold = True
        'Date_Deb_Elfac.FontBold = True
        'Date_Fin_Elfac.FontBold = True
 
 
    End If
Next

Pourriez-vous m'aider SVP
Merci d'avance

[madefemere]

Bonjour,

Pourquoi ne pas faire cela avec la Mise en Forme Conditionnelle ?
Parce qu'il ne faut pas oublier que dans un formulaire en mode "continu", les mises en formes s'appliquent à tous les enregistrements mais pas uniquement à une ligne (sauf avec une MFC).

Cordialement,

[omzo86]

Merci pour votre réponse
Je vais faire des recherches dessus
et pourtant avec me.nomduchamp , je récupéré bien le nom concerné mais mais la proprieté Fontbold ne s'applique pas
c'est ce que je ne comprends pas

[omzo86]

Bonjour,
J'y arrive tjrs pas
Est ce que quelqu'un aurait un début de piste pour moi svp

[madefemere]

Bonjour,

Est-ce que l'exemple joint est la solution que tu cherches ?

Cordialement,

[omzo86]

Merci beaucoup
c'est ce que je voulais
je me suis cassé la tête avec le VBA alors que fallait passer par là
Merci encore