Bonjour,
je suis actuellement en train de faire un petit programme en en VBA pour simplifier le chiffrage de devis.
j'ai un userform qui me permet d'entrer les valeurs d'un matériau et son module récupère un prix dans une feuille bibliothèque avec une fonction index.
Je me suis rendu compte en cherchant à répondre à une autre question que je travaillais sur une vieille version d'excel (97-2003)
: ("https://www.excel-downloads.com/threads/recherche-de-la-premiere-ligne-vide.20045348/")
J'ai essayé de passer le fichier dans une version plus récente.
Malheureusement la fonction index ne fonctionne plus et me renvoie le message "erreur d'execution '438' "
Quel pourrait en être la cause ?
Merci d'avance.
je suis actuellement en train de faire un petit programme en en VBA pour simplifier le chiffrage de devis.
j'ai un userform qui me permet d'entrer les valeurs d'un matériau et son module récupère un prix dans une feuille bibliothèque avec une fonction index.
Je me suis rendu compte en cherchant à répondre à une autre question que je travaillais sur une vieille version d'excel (97-2003)
: ("https://www.excel-downloads.com/threads/recherche-de-la-premiere-ligne-vide.20045348/")
J'ai essayé de passer le fichier dans une version plus récente.
Malheureusement la fonction index ne fonctionne plus et me renvoie le message "erreur d'execution '438' "
VB:
Set rngData = .Range("H4:I31") 'definition de la plage de recherche de prix
Set rngLabelRow = .Range("C4:C31") 'definition de la plage de recherche de section
Set rngLabelColumn = .Range("H2:I2") 'definition de la plage de recherche d'essence
PrixOss = Application.WorksheetFunction.Index(rngData, .Match(SectOss, rngLabelRow, 0), .Match(EssOss, rngLabelColumn, 0))
Quel pourrait en être la cause ?
Merci d'avance.