Discussion :

[melodyyy]

Je sais cacher un bouton grâce à une check box, mais pas dans une autre macro...Je m'explique j'ai déja une macro et voudrait intégrer mon petit truc pour masquer le bouton. J'ai donc fait ça:

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
28
 
Sub Workbook_Open()
 
If Sheets("Accueil").Cells(9, 5).Value > 150 Then
Sheets("Bonnes pratiques SIFA").Visible = True
Sheets("Bonnes pratiques SIFA").Select
Else
 
If Sheets("Accueil").Cells(9, 5).Value < 150 Then
Sheets("Bonnes pratiques SIFA").Visible = False
Sheets("Accueil").Select
 
If Sheets("Accueil").Cells(9, 5).Value < 150 Then
Sheets("Index documentaire").Select
Rows("48:56").Select
Selection.EntireRow.Hidden = True
CommandButton10.Visible = False
Sheets("Accueil").Select
 
End If
 
'MsgBox ("Nous vous rappelons que PROFI sert également de PMP")
 
End If
 
End If
 
End Sub

Mais il me bloque à la commandbutton 10...je comprends pas...je vais pas mettre de if la quand même si ?

[Invité]

Bonjour Melodyyy,

Le 2ème et le 3ème "If" font appel à la même condition. Je ne vois pas comment cela pourrait fonctionner.

If Sheets("Accueil").Cells(9, 5).Value < 150 Then

If Sheets("Accueil").Cells(9, 5).Value < 150 Then

Si le 2ème est "ok" il sera écrasé par le 3ème et si le 2ème ne l'est pas le 3ème ne le sera jamais.

[melodyyy]

ah merde un des 2 doit etre retourné ! je réésssai merki

[melodyyy]

voila j'ai supprimé le 3eme...ça marche tjrs pas..

[Invité]

J'ai testé ce code et cela fonctionne :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
Sub Workbook_Open()
 
If Sheets("Accueil").Cells(9, 5).Value > 150 Then
Sheets("Bonnes pratiques SIFA").Visible = True
Sheets("Bonnes pratiques SIFA").Select
Else
 If Sheets("Accueil").Cells(9, 5).Value < 150 Then
Sheets("Bonnes pratiques SIFA").Visible = False
Sheets("Accueil").Select
End If
End If
End Sub

Mais il y a sans doute un autre problème :

vous testez la cellule E9 sur >150 et < 150

si la cellule contient 150 le traitement ne se fera jamais.

Code :

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

1
2
3
4
5
il faudrait >= 150 et < 150 
 
ou
 
> 150 et <= 150.

[melodyyy]

Certe ce code la marche, je l'utilise depuis le début
Mais il camoufle pas le bouton, (le masque) et ça j'y arrive pas. Si tu veux je sais le faire avec un évènement mais la....

Si tu sais je suis preneuse