Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
416to420
416to420
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Solver Verweis (Reference) dynamisch laden

Forumthread: Solver Verweis (Reference) dynamisch laden

Solver Verweis (Reference) dynamisch laden
Christoph
Hallo, vielleicht könnt Ihr mir helfen. Ich möchte für einen Code, in dem ich unterschiedliche Solverfunktionen verwende, die entsprechende Solver-Reference dynamisch laden. D.h. der Benutzer soll nicht erst unter Extras... Verweise... den Verweis Solver anklicken. Dies soll wenn möglich automatisch funktionieren. Doch leider weiß ich nicht genau wie ich das hinbekomme. Mit Verweisen habe ich noch nicht gearbeitet, deswegen auch wenig Ahnung. Vielen Dank für Eure Hilfe, schöne Grüße... Christoph
Anzeige
AW: Solver Verweis (Reference) dynamisch laden
K.Rola
Hallo,
ins Modul von "DieseArbeitsmappe":
Option Explicit

Private Sub Workbook_Open()
Call set_solver
End Sub

In ein Standardmodul:
Option Explicit
Sub set_solver()
Dim solv As String, appV As Long, x As Long, gibts As Boolean
gibts = False
appV = Val(Application.Version)
solv = "c:\programme\microsoft office\office" & appV & "\makro\solver\solver.xla"
With ThisWorkbook.VBProject
For x = 1 To .References.Count
If UCase(solv) = UCase(.References(x).FullPath) Then gibts = True
Next
If gibts = False Then .References.AddFromFile solv
End With
End Sub
Gruß K.Rola
Anzeige
AW: Solver Verweis (Reference) dynamisch laden
Ramses
Hallo K.Rola
ober EXCEL das versteht :-)) *lol*
"...Then gibts = True.."
Gruss Rainer
Vergiss es ...
Ramses
Hallo K.Rola
Sorry, da hat mir meine gebürtige Grammatik einen Streich gespielt weil ich den Code nur überflogen habe ;-)
Gruss Rainer
AW: Solver Verweis (Reference) dynamisch laden
Hans
Hallo,
Dein Code hat ein kleine Schwachstelle, wenn man an die vielen Netzinstallationen denkt.
Du solltest nach .References.Name = "SOLVER" suchen und den .FullPath dann zum Setzen der Referenz verwenden...
Gruß HW
Anzeige
AW: Solver Verweis (Reference) dynamisch laden
22.04.2004 10:20:28
Christoph
Hallo,
ich glaube genau das habe ich gerade als weitere Frage an den Kollegen geschickt. Habe Deinen Eintrag da noch nicht entdeckt. Du meinst also, einfach nach der solver.* suchen und dann den Pfad abfragen? Könntest Du vielleicht die 2 zeilen mit der Suchmethode und der Pfadabfrage kurz aufschreiben? Du hast die wahrscheinlich schon im Kopf, während ich erst lange suchen müßte.
Herzlichen Dank für Deine Hilfe! Christoph
Anzeige
AW: Solver Verweis (Reference) dynamisch laden
K.Rola
Hallo,
guter Tipp, werd ich tun. Leider hab ich mit Netzwerken keinerlei
Erfahrungen, so war mir das Problem nicht bewußt. Aber dafür gibts
euch ja.
Gruß K.Rola
AW: Solver Verweis (Reference) dynamisch laden
Hans
Ach, Entschuldigung. Ich hab auch Blödsinn geschrieben.
Natürlich müsste man die Liste .Addins durchgehen und dort den .Fullpath des Solver in Erfahrung bringen.
Habs doch noch gefunden, haben wir schon mal diskutiert: https://www.herber.de/forum/archiv/116to120/t118934.htm#118995
Gruß HW
Anzeige
AW: Solver Verweis (Reference) dynamisch laden
22.04.2004 13:08:03
Christoph
Vielen Dank. Es funktioniert wunderbar!
AW: Solver Verweis (Reference) dynamisch laden
22.04.2004 10:08:31
Christoph
HERZLICHEN DANK!!! BIN BEGEISTERT!!!
Es funktioniert wunderbar, wenn man in den Sicherheitseinstellungen den Zugriff auf VBProjekte erlaubt. Nun aber noch 2 kleine Frage:
1. Kann ich diese Sicherheitseinstellungen (Zugriff auf VBA Projekte) aus dem Code umstellen? (Wahrscheinlich nicht, aber ich kann ja mal fragen)
2. Da ich den Rechner, auf dem das Programm laufen soll nicht kenne, weiß ich auch den Office-Pfad nicht. Wie kann man den Abfragen.
Nochmals vielen lieben Dank... Christoph
Anzeige
;

Forumthreads zu verwandten Themen

Solver-Verweis automatisch setzen
Melanie

Hallo liebes Forum,
ich bin ziemlich am Verzweifeln :-(!
Ich schreibe für meine Abschlussarbeit ein VBA-Programm, in dem der Solver-Befehl ausgeführt werden soll. Der Solverbefehl ist programmiert und das AddIn "Solver" ist auch installiert. Das Programm soll als Anwendung ausgeführt we...
31.10.2008 17:18:00
Thread-ID: 1020929
3 Beiträge
Solver ValueOf:=variable Zelle
S.

Hallo zusammen,
ich habe mir mit dem Makrorekorder einen Solver aufgezeichnet, den ich jetzt modifizieren will. Alles klappt prima, solange der ValueOf:= eine Zahl in Klammern enthält. Sobald ich eine variable Zelle (z. B. Cells(1,1) oder "$A$1") angebe, wird das Makro zwar ausgeführt, es e...
19.11.2008 16:57:00
Thread-ID: 1026112
2 Beiträge
Anzeige
Solver-Funtion VBA
Uwe

Hallo,
ich möchte gern mit der Solverfunktion einen Wert errechnen. In dem Feld "ValueOf" kann jedoch nur ein fester Wert angegeben werden. Ich möchte jedoch einen Bezug zu einer Zelle. Dies scheint aber wohl nicht zu funktionien.
folgendes Makro habe ich z.Zt.:
Sub Solvertest() s...
04.12.2008 14:21:11
Thread-ID: 1030177
2 Beiträge
Anzeige
Verwirrungen beim Solver
Stephan

Hallo zusammen,
ich versuche, eine Solver-Routine mittels eines Buttons zu starten. Der Button ist jeweils auf zwei separaten Tabellenblättern positioniert. Leider funktioniert die Berechnung nur dann einwandfrei, wenn auch die Ergebnisse auf dem Tabellenblatt ausgegeben werden, auf dem die...
09.02.2009 11:23:22
Thread-ID: 1048597
7 Beiträge
SOLVER Verweis
Peter

Hallo,
wie kann man in EXCEL 2007 den Verweis auf den Solver setzen? So wie bei EXCEL 2003 geht es ja leider nicht mehr.
14.03.2009 17:05:08
Thread-ID: 1060202
4 Beiträge
Solver automatisieren
Daniel

Hallo zusammen
ich habe folgendes Problem:
ich möchte mit Hilfe des Solvers den Wert in Spalte 1 so ändern, dass in Spalte 2 ein bestimmer Wert steht. So klappt das auch ganz gut, aber ich möchte das nun für beliebig viele Zeilen automatisieren, ohne für jede Zeile einzeln den Solver au...
05.05.2009 01:19:36
Thread-ID: 1072938
4 Beiträge
Solver-Dialog öffnet sich nicht
Lars

Hallo,
ich habe in einer Excel-Datei ein Solver-Problem aufgesetzt. Den Solver steuere ich über VBA. Das funktioniert auch tadellos. Jedoch lässt sich der normale Solver-Dialog nicht mehr öffnen. Das Solver-problem ist richtig gespeichert (Ausgabe mit SolverSave) und kommt auch zu richtigen...
07.05.2009 10:24:00
Thread-ID: 1073522
2 Beiträge
Anzeige
Umgehung eines nicht lösbaren Solver-Problems
Hoof

Hallo liebe Herber-Gemeinde,
ich stehe vor folgendem Problem:
Ich habe ein nicht konvergentes Solver-Problem mit 16 veränderbaren Zellen. Ich möchte eine vorgegebene Zielzelle maximieren. Der Solver schafft dies nicht, da es keine konstanten Zusammenhänge zwischen den veränderbaren Zell...
08.05.2009 11:51:42
Thread-ID: 1073850
11 Beiträge
Solver-Frage
MBorn

Hallo am Sonntag,
ich habe so oft ähnliche Problemstellungen, wie diese und glaube, das müßte
mit dem Solver doch gut zu lösen sein. Aber die Tutorials oder die Filmchen bei
Yolutube helfen mir nicht weiter. Vielleicht weiß einer von Euch Rat?

Die Frage ist, welche Werte in...
07.06.2009 16:52:38
Thread-ID: 1079723
3 Beiträge
Problem mit Solver
Stefan

Hallo,
ich hab ein problem mit dem Solver. Ich habe mir ein Makro geschrieben, in dem eine Solverberechnung eingebunden ist. Das funktioniert auch ohne Probleme. Jetzt habe ich aber auf einem Tabellenblatt zweimal dieses Makro eingebunden (mit Buttons zum Starten des Makros,usw.). Die Makro...
18.06.2009 14:16:46
Thread-ID: 1082591
3 Beiträge
Solver Probleme
Reinhard

Hallo Wissende,
in A1 steht =B1+C1
im Add-In manager habe ich Solver mitaktiviert.
Dann ein Makro aufgezeichnet und den Solver angeklickt.
Im Fensterchen (Solver-Parameter) habe ich dann Zielzelle A1 eingetragen, als Zielwert "Wwert" angehakt und 100 eingegeben.
Als "verände...
11.07.2009 22:11:02
Thread-ID: 1087926
6 Beiträge
Anzeige
Solver - Makro aufgezeichnet, lässt sich nicht abs
u_hoernchen

habe über Makro Aufzeichnen die Benutzung des Solvers aufgezeichnet. Der Code sieht dann aus wie folgt.
SolverOk SetCell:="$K$39", MaxMinVal:=3, ValueOf:="0", ByChange:="$K$16"
SolverSolve
Beim Abspielen hängt er sich dann allerdings bei "SolverOK" auf und sagt "Sub oder Function n...
20.07.2009 13:09:09
Thread-ID: 1089960
3 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige