Problème de IF ...
Résolu
simkmil
Messages postés
481
Date d'inscription
Statut
Membre
Dernière intervention
-
f894009 Messages postés 17277 Date d'inscription Statut Membre Dernière intervention -
f894009 Messages postés 17277 Date d'inscription Statut Membre Dernière intervention -
A voir également:
- Problème de IF ...
- If exist - Forum Java
- The realtek network controller was not found. if deep sleep mode is enabled please plug the cable ✓ - Forum Pilotes (drivers)
- If char ✓ - Forum Programmation
- The Realtek Network Controller was not found. - Forum Pilotes (drivers)
- Php if multiple conditions ✓ - Forum PHP
3 réponses
Bonjour Whismeril,
Ca flotte?
Y a plus simple que les boucles sur tableaux et c'est Excel qui fait le taf
simkmil:
Ca flotte?
Y a plus simple que les boucles sur tableaux et c'est Excel qui fait le taf
simkmil:
Sub repliques()
Dim Plage As Range
With Worksheets("Théatre")
Set Plage = .Range("A8:A36")
N = Application.CountIf(Plage, "Marie-Thérèse") + Application.CountIf(Plage, "PAPOUNET")
End With
Set Palge = Nothing
MsgBox N
'Worksheets("Théatre").Cells(3050, A) = N
End Sub
Bonsoir
Il me semble que l’on t’as déjà demandé plusieurs fois de faire l’effort de présenter ton code lisiblement pour le lecteur, rappel ici https://codes-sources.commentcamarche.net/faq/11288-les-balises-de-code le petit tuto qui explique comment faire
Pour ton problème, tu pourrais gagner du temps d’exécution en utilisant un tableau voir ce tuto https://silkyroad.developpez.com/vba/tableaux/
D’autre part tu initialises N à 1, ce qui signifie qu’à la première occurrence, il vaudra 2, à la deuxième il vaudra 3 etc… Ce qui à priori est faux sauf si la cellule A37 contient Papounet.
Ensuite tu vas compter jusqu’à A3050, or dans ton texte tu parles de 3500.
Enfin, tu vas écraser la cellule A3050 pour y écrire le résultat
Il me semble que l’on t’as déjà demandé plusieurs fois de faire l’effort de présenter ton code lisiblement pour le lecteur, rappel ici https://codes-sources.commentcamarche.net/faq/11288-les-balises-de-code le petit tuto qui explique comment faire
Pour ton problème, tu pourrais gagner du temps d’exécution en utilisant un tableau voir ce tuto https://silkyroad.developpez.com/vba/tableaux/
D’autre part tu initialises N à 1, ce qui signifie qu’à la première occurrence, il vaudra 2, à la deuxième il vaudra 3 etc… Ce qui à priori est faux sauf si la cellule A37 contient Papounet.
Ensuite tu vas compter jusqu’à A3050, or dans ton texte tu parles de 3500.
Enfin, tu vas écraser la cellule A3050 pour y écrire le résultat
Bonjour, en effet, c'est bien mieux avec les balises de code; mais à chaque fois, je vais dans <> qui indique Code et je choisis BASIC puisque c'est cela qu'il faut prendre pour le VBA et à part une balise en début, rien ne change. J'ai beau regarder le tuto que vous m'avez envoyé, le suivre au mieux et j'obtiens toujours la même chose. Je dois faire une erreur quelque part.
Ce n'est vraiment pas une mauvaise volonté de ma part.
Hormis cela, ton code fonctionne parfaitement.
Merci beaucoup
Ce n'est vraiment pas une mauvaise volonté de ma part.
Hormis cela, ton code fonctionne parfaitement.
Merci beaucoup
J'oubliai:
Adapter la plage de cellules
oui ça va et toi?
Comme dans son message, simkmil a écrit et que VBA c'est pas mon langage de prédilection, je suis resté dans ce qu'il avait codé.
@Simkmil, tu voies c'est quand même, plus clair et agréable à lire avec les balises de code non?
Pour le moment ca roule.
que VBA c'est pas mon langage de prédilection
Ben moi, se sont les formules qui ont une legere animausite envers moi