Måske skulle dette spørgsmål ligge under VBA, men:
jeg har optaget en Makro som kalder Problemløser/SOLVER Add-in. Hvis jeg aktiverer SOLVER manuelt fungerer det perfekt, men hvis jeg kalder den via makro får jeg fejl
Compile error: Sub or Function not defined.
SOLVER er defineret som reference i Tools under VBA.
Hvis SOLVER er valgt under TOOLS/REFERENCES bør excel have oprettet et extra modul i projektmappen, der hedder references og under det sat en reference til SOLVERE. Har den det ?
Set MyXL = New Excel.Application Set xlBook = MyXL.Workbooks.Add Set xlSheet = MyXL.Worksheets("Sheet1") If AddIns("Solver Add-In").Installed Then 'Reference Solver in the VBE MyXL.VBE.activeVBProject.References.Addfromfile ("{directory for Solver.xla") End If
Application.Run ("Solver.xla!SolverReset") 'Just a test. Do all your solver stuff here.
Application.DisplayAlerts = False MyXL.Quit Set MyXL = Nothing Set xlBook = Nothing Set xlSheet = Nothing
jpoulsen > Hvilken version af Excel bruger du? Jeg vil gerne se på regnearket, hvis du må sende det, men jeg har kun Excel 97, så hvis du bruger en nyere version kan jeg nok ikke hjælpe.
Hvis du vil prøve er adressen sjap9000 snabela hotmail punktum com
Da jeg åbnede dit regneark, fik jeg samme fejl som dig, men her skyldes det at min solver ligger et helt andet sted end din. Hos mig findes programmet i mappen
Tjah, jeg kan se, at jeg slet ikke får muligheden for at angive en reference til DLL'en, så det er nok ikke præcis det, der er dit problem. Men når jeg har angivet referencen til xla'en får jeg en "Et objekt er obligatorisk" i linien
solver.Auto_open
Hvis jeg udkommenterer linien, afvikles programmet uden fejl (men jeg ved ikke lige hvad den udkommenterede linie laver).
Synes godt om
Ny brugerNybegynder
Din løsning...
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.