Recherche:

Hello,

Je passais par là...
Je ne sais pas où tu en est mais je viens de comprendre pourquoi la macro Workbook_open ne peut pas marcher : Tu n'ouvres pas le fichier... :cry:
Pile une semaine...

Bonne chance !

Hello, c'est re-moi...


Comment dis-tu à l'utilisateur de lancer la macro ? Utilises-tu une macro Workbook_open() ? Cela éviterait de soliciter l'utilisateur.
L'enregistrement et la fermeture...

Désolé mais là, je suis sec.
Mais où sont donc les Tan, CatBull, AlainTech, Bbil, Tofalu, Bidou, DarkVader et autres "sachants" du forum :sleep:
Ah ! s'ils passaient par ici, ils sauraient te...

Oui, je crois que tu dois désigner le nom du classeur... :cry: mais avec VB... :?:

A+

Que fait ta macro ? Juste activer la macro complémentaire ?

A+

Ok,

Dans ce que tu veux faire, je n'ai pas bien compris ça :
ou si j'ai compris, je ne sais pas faire ça tel quel...

J'ai vu passé, il y a un mois ou deux, un post sur une demande d'un xla...

Oui, "il peut le faire !"

Tu places ton code dans


Sub Workbook_Open()
'...Ton code
End sub

A l'ouverture du .xls, il exécutera tout ce que tu voudras... :wink:

Oui, je me doute que ce que je fais en VBA doit être adapté au VB mais là, je ne peux pas t'aider.
Cependant, pourquoi déclares-tu "SolverExcel As Object" ?
Ne serait-ce pas à l'appli de s'en...

Voilà, si ça peut te convenir


AddIns("Conversion_Francs_Euros.xla").Installed = True

A+

En attendant, j'ai ça dans l'aide


Set a = AddIns("Macro complémentaire Solveur")

A+

Ok, je dois avoir ça quelque part...

A tout'

Tant qu'à faire, j'ai aussi ça :


SolverLoad loadArea:=Range("A33:A38")
SolverChange cellRef:=Range("F4:F6"), relation:=1, formulaText:=200
SolverAdd cellRef:=Range("F4:F6"),relation:=1,...

Hello,

Pour cette ligne,



J'ai trouvé cette syntaxe dans l'aide VBA


SolverOK setCell:=Range("BénéficeTotal"), maxMinVal:=1, byChange:=Range("C4:E6")