Version imprimable
Bonjour à tous,
j'ai la formule suivant que je souhaiterai inclure dans une macroSi avec des formules "simples" je suis à l'aise, avec des imbrications de fonction (notamment OFFSET pour DECALER), je suis vite largué.Code:=INDEX(AC:AC;LIGNE(DECALER(DAS!AC6;NBVAL(DAS!AC:AC)-1;0))-1;1)
Pour l'instant j'en suis là :Après je sèche.Code:msgbox application.WorksheetFunction.Index("AC:AC",rows(offset( ?????
Merci d'avance pour le coup de main.
Curt
Bonjour,
A mon avis, vouloir traduire une formule excel en VBA ne me paraît pas être la bonne solution, surtout quand il y a beaucoup de fonctions imbriquées. Soit vous conservez la formule excel dans une cellule et vous récupérez le résultat que vous affichez dans un msgbox, soit vous faites un bout de code qui va chercher ce résultat.
1er cas, récupération du résultat d'une formule (exemple résultat en A1)
2ème cas, recherche par code(d'après la formule utilisée, il semblerait que vous alliez chercher le contenu de l'avant dernière cellule de la colonne AC de la feuille DAS), ceci pourrait se traduire parCode:MsgBox [A1]
Reste à savoir si c'est bien ce que vous voulezCode:MsgBox Sheets("DAS").Cells(Sheets("DAS").Range("AC" & Rows.Count).End(xlUp).Row - 1, "AC")
Cdlt
Bonjour,
Voici :
Code:
2
Bonsoir à tous,
et merci à vous deux.
Les deux solutions fonctionnent:
- comparer un résultat entre deux cellules calculées est une solution. Mais si l'utilisateur efface l'une ou les deux cellules, le traitement est mort. On peut évidemment protéger et/ou masquer les cellules mais c'est vouloir ajouter des étages à la fusée et (à mon sens) ça peut alourdir la maintenance du classeur (dans une moindre mesure évidemment)
- La solution par VBA est certes plus compliquée à mettre en œuvre (imbrication de fonction à "traduire" en VBA) mais elle a l'avantage de faire abstraction des suppressions involontaires. C'est cette solution que je retiens.
Merci en tout cas à vous deux pour l'éclairage et les solutions proposées. (un p'tit pouce+ à chacun :ave:)
Curt