Fonctions match, index et indirect

Résolu/Fermé

Laetitiayao Messages postés 54 Date d'inscription vendredi 13 juillet 2018 Statut Membre Dernière intervention 31 août 2018 - 26 juil. 2018 à 18:10
Laetitiayao Messages postés 54 Date d'inscription vendredi 13 juillet 2018 Statut Membre Dernière intervention 31 août 2018 - 29 juil. 2018 à 22:43

Bonjour à tous,
j'ai les formules suivantes sous excel, que je cherche à écrire en VBA mais je n'y arrive pas je galère depuis ce matin.

range("AC2")=MATCH(TRUE,INDEX((AC5:AC30<>0),0),0)+4

range("BM3")=INDIRECT("y"&AC2)

j'ai vraiment besoin d'aide, merci infiniment

A voir également:

Fonctions match, index et indirect
Fonction si et - Guide
Voir match en direct gratuitement - Guide
Index téléphonique - Guide
Live match tv gratuit ✓ - Forum Cinéma / Télé
Match hockey en direct gratuit - Forum Réseaux sociaux

1 réponse

Réponse 1 / 1

yg_be Messages postés 22730 Date d'inscription lundi 9 juin 2008 Statut Contributeur Dernière intervention 26 avril 2024 1 477
Modifié le 27 juil. 2018 à 10:33

bonjour, pour le second:

range("BM3") = Range("y" & [AC2])

pourquoi veux-tu remplacer ces formules par du code vba?

Laetitiayao Messages postés 54 Date d'inscription vendredi 13 juillet 2018 Statut Membre Dernière intervention 31 août 2018
27 juil. 2018 à 11:15

Bonjour Yg_be, merci de ta réponse.
je travaille sur un fichier existant ou tout les calculs étaient déja fait dans excel, ma mission (stagiaire) c'est d'écrire une macro avec bouton de commande pour que les cellules se remplissent automatiquement

yg_be Messages postés 22730 Date d'inscription lundi 9 juin 2008 Statut Contributeur Dernière intervention 26 avril 2024 1 477 > Laetitiayao Messages postés 54 Date d'inscription vendredi 13 juillet 2018 Statut Membre Dernière intervention 31 août 2018
27 juil. 2018 à 11:36

il est possible par vba de mettre des formules dans des cellules, par exemple:

range("AC2").FormulaLocal = "=MATCH(TRUE,INDEX((AC5:AC30<>0),0),0)+4"

Laetitiayao Messages postés 54 Date d'inscription vendredi 13 juillet 2018 Statut Membre Dernière intervention 31 août 2018
27 juil. 2018 à 11:39

Oui je l'avais fait exactement pareil via l'enregistreur de macro, mais mon responsable ne veux pas de ça.

Laetitiayao Messages postés 54 Date d'inscription vendredi 13 juillet 2018 Statut Membre Dernière intervention 31 août 2018
27 juil. 2018 à 12:32

J'ai appliqué ta solution, mais je recois un message d'erreur, je crois qu'il y a un leger problème mais je n'arrive pas à determiner ou

voilà ce que je ferais pour la première formule:

Dim cl As Range
For Each cl In [AC5:AC30]
    If cl <> 0 Then
        Range("AC2") = cl.Row
        Exit For
    End If
Next cl

Discussions similaires

télécharger sur des sites comme index of

Index+Equiv avec 3 critères

Canadien de montreal en direct

Fonction INDEX/EQUIV - 2 critères Colonne & 1 critère Ligne

Excel Utilisation RechercheV et Indirect

Discussions similaires

Newsletters