Fonction Or en vba
Résolu/Fermé
hakimr
Messages postés
188
Date d'inscription
lundi 1 mai 2017
Statut
Membre
Dernière intervention
17 mars 2023
-
Modifié le 16 nov. 2019 à 10:34
hakimr Messages postés 188 Date d'inscription lundi 1 mai 2017 Statut Membre Dernière intervention 17 mars 2023 - 16 nov. 2019 à 11:07
hakimr Messages postés 188 Date d'inscription lundi 1 mai 2017 Statut Membre Dernière intervention 17 mars 2023 - 16 nov. 2019 à 11:07
A voir également:
- Fonction Or en vba
- Erreur 1004 vba ✓ - Forum VB / VBA
- Fonction find vba - Astuces et Solutions
- Fonction si et - Guide
- Vba range avec variable ✓ - Forum VB / VBA
- Couleur or photoshop ✓ - Forum Webmastering
2 réponses
Frenchie83
Messages postés
2239
Date d'inscription
lundi 6 mai 2013
Statut
Membre
Dernière intervention
28 janvier 2023
335
16 nov. 2019 à 10:32
16 nov. 2019 à 10:32
Bonjour,
Avec Select case par exemple
Cdlt
Avec Select case par exemple
Select Case [C7].Value
Case Is = 3, 5, 8, 11
ActiveSheet.Shapes("image 58").Visible = True
ActiveSheet.Shapes("image 55").Visible = True
Case Else
ActiveSheet.Shapes("image 58").Visible = False
ActiveSheet.Shapes("image 55").Visible = False
End Select
Cdlt
hakimr
Messages postés
188
Date d'inscription
lundi 1 mai 2017
Statut
Membre
Dernière intervention
17 mars 2023
1
16 nov. 2019 à 10:34
16 nov. 2019 à 10:34
Bonjour a tous
le m'explique encore
jai deux images nommées image 58 et image 55 dans une feuliie excell
je veux écrire si (ou(c7=(3;5;8;11);image 58 et image 55 seront visible;ne seront pas visible)
comment est ce que je peu traduire en vba ou bien ya t'il une autre solution sans vba
merci pour votre attention
le m'explique encore
jai deux images nommées image 58 et image 55 dans une feuliie excell
je veux écrire si (ou(c7=(3;5;8;11);image 58 et image 55 seront visible;ne seront pas visible)
comment est ce que je peu traduire en vba ou bien ya t'il une autre solution sans vba
merci pour votre attention
Frenchie83
Messages postés
2239
Date d'inscription
lundi 6 mai 2013
Statut
Membre
Dernière intervention
28 janvier 2023
335
16 nov. 2019 à 10:38
16 nov. 2019 à 10:38
ma proposition ne convient pas?
hakimr
Messages postés
188
Date d'inscription
lundi 1 mai 2017
Statut
Membre
Dernière intervention
17 mars 2023
1
16 nov. 2019 à 11:07
16 nov. 2019 à 11:07
Si ça conviend et ça marche bien Mr Frenchie
merci a tous
merci a tous
16 nov. 2019 à 10:46
dim vu as boolean Select Case [C7].Value Case Is = 3, 5, 8, 11 vu = True Case Else vu= False End Select ActiveSheet.Shapes("image 58").Visible = vu ActiveSheet.Shapes("image 55").Visible = vu