Daniel200666
XLDnaute Occasionnel
bonjour
je sais que c'est possible mais je crois avoir vu quelque part qu'il était possible de conditionner des affichages selon le respect d'hypothèse basée sur 1 et 0
j'ai prévu mes hypothèses mais je n'arrive pas à créer par exemple un logo ou un bandeau validant mes hypothèses
j'ai créé une macro de cette manière là
Sub Analyse()
'
' Analyse Macro
' Macro enregistrée le 01/10/2024
'
ActiveSheet.Unprotect ("cbipro")
Rows("47:54").EntireRow.Select
Selection.EntireRow.Hidden = True
If Cells(44, 7).Value > 0 Then
Rows("47:47").EntireRow.Select
Else
If Cells(44, 6).Value > 0 Then
Rows("48:48").EntireRow.Select
Else
Rows("49:54").EntireRow.Select
End If
End If
Selection.EntireRow.Hidden = False
ActiveSheet.Protect ("cbipro")
End Sub
Pour obtenir quelque chose comme cela avec un bandeau en rouge ou en vert selon que c'est ok ou non
je me permets de joindre un fichier pour vous montrer le résultat que je voudrais mais là je suis bien perdu !!!
Merci beaucoup pour votre aide à tous et bonne journée
je sais que c'est possible mais je crois avoir vu quelque part qu'il était possible de conditionner des affichages selon le respect d'hypothèse basée sur 1 et 0
j'ai prévu mes hypothèses mais je n'arrive pas à créer par exemple un logo ou un bandeau validant mes hypothèses
j'ai créé une macro de cette manière là
Sub Analyse()
'
' Analyse Macro
' Macro enregistrée le 01/10/2024
'
ActiveSheet.Unprotect ("cbipro")
Rows("47:54").EntireRow.Select
Selection.EntireRow.Hidden = True
If Cells(44, 7).Value > 0 Then
Rows("47:47").EntireRow.Select
Else
If Cells(44, 6).Value > 0 Then
Rows("48:48").EntireRow.Select
Else
Rows("49:54").EntireRow.Select
End If
End If
Selection.EntireRow.Hidden = False
ActiveSheet.Protect ("cbipro")
End Sub
Pour obtenir quelque chose comme cela avec un bandeau en rouge ou en vert selon que c'est ok ou non
je me permets de joindre un fichier pour vous montrer le résultat que je voudrais mais là je suis bien perdu !!!
Merci beaucoup pour votre aide à tous et bonne journée