Vous utilisez un navigateur obsolète. Il se peut que ce site ou d'autres sites Web ne s'affichent pas correctement. Vous devez le mettre à jour ou utiliser un navigateur alternatif.
En essayant d'ouvrir votre fichier, non seulement il ne s'est pas ouvert mais en plus un autre classeur ouvert n'ayant rien à voir s'est fermé sans enregistrer les modifications. :mad:
Bonjour.
À essayer aussi :
Sub Creation()
With ThisWorkbook.Worksheets("Paramètre")
Agenda .[B3].Value, Month(CDate("1 " & .[C3].Value & " " & .[B3].Value))
End With
End Sub
Bonsoir.
Mais vous l'avez, quand vous passez dessus. Mais comme vous ne faite alors plus Exit For, vous avez ensuite la précédente etc. jusqu'à la 1, qui est la dernière retenue au bout du compte !
Bonjour.
Pour en I3 :=SI(B3="";"";H3-H2)C'est :[I3].FormulaR1C1 = "=IF(RC[-7]="""","""",RC[-1]-R[-1]C[-1])"Mais je préfèrerais sans doute :
[I3].FormulaR1C1 = "=IF(RC2="""","""",RC8-R[-1]C8)"
Bonsoir.
Il y a toujours aussi ma ressource pour les couleurs.
https://excel-downloads.com/resources/elaboration-et-utilisation-de-jeux-de-couleurs.1064/
Bonjour.
Dans les cas de figure où l'objet de la discussion s'applique, je déclare généralement une Private ExecInduite As Boolean. Pour inhiber l'évènement je fais ExecInduite = True devant le changement du contrôle concerné, ExecInduite = False derrière et généralement dans la ligne même...
Mais je suis en train de voir que ça ne va pas parce que d'après la légende le sucre tout seul n'est pas dans le paquet du début. Dans ce cas on va faire autrement, sauf erreur de ma part, en AA32 :=CHOISIR(1+4*(AF15>=15)+2*(AF16>=15)+(AF17>=15);8;7;5;4;6;3;2;1)
Parce qu'ils ont des poids différents: 4 pour le sucre, 2 pour le gras et 1 pour le sodium.
Faites une table de vérité de tous les cas, vous verrez bien.
"NON" à AH16 donne 0 + 2 + 0 +1 = 3 tandis que
"NON" à AH17 donne 0 + 0 + 1 +1 = 2
Toujours le même principe, en AA32 :=4*(AH15="NON")+2*(AH16="NON")+(AH17="NON")
Faite des essais, bon sang, avant de décider que ça ne va pas.
Notez que vous pourriez aussi utiliser les vraies conditions de départ :=4*(AF15<15)+2*(AF16<15)+(AF17<15)
En y ajoutant 1, au vu de la légende (je l'ai...
Il n'y a pas de ET à utiliser pour obtenir le résultat décrit.
Sommez simplement les expressions booléennes vraie multipliée les poids binaire 4, 2, 1. Par exemple, pour obtenir respectivement 1 et 2 pour vos deux premiers cas (mais ça va alors de 1 à 8) ...
Toujours non, il n'est pas possible de détecter l'utilisation d'un bouton de filtre, mais dans chaque macro vous pouvez tester si la feuille est à l'état filtrée, soit pour abandonner son exécution dans ce cas, soit pour afficher tout préalablement.
Ce site utilise des cookies pour personnaliser le contenu, adapter votre expérience et vous garder connecté si vous vous enregistrez.
En continuant à utiliser ce site, vous consentez à notre utilisation de cookies.