Thema Datum  Von Nutzer Rating
Antwort
Rot VBA Schleife und Solver und Hilfe
 25.06.2014 16:49:13 Redzero
NotSolved
25.06.2014 22:32:05 Gast29123
NotSolved
25.06.2014 22:43:31 Redzero
NotSolved
26.06.2014 14:00:40 Gast42698
NotSolved
25.06.2014 22:51:40 Redzero
NotSolved

Ansicht des Beitrags:
Von:
Redzero		 Datum:
25.06.2014 16:49:13		 Views:
1272		 Rating:
     
Antwort:
  Ja
Thema:
VBA Schleife und Solver und Hilfe

Hallo,

 

ich würde gerne den unten stehenden Befehl für eine Range umformen. Anstatt wie unten beschrieben, soll dies nicht für die "Cell(21,2)" (gleich mit "B21) geschehen sondern für die Range (B21:BI115).

Ausformuliert: Wenn in Zelle B21 eine 1 steht dann soll Solver diese Zelle als Binärvariabel deklariere. Andernfalls als 0.

 

Statt dies jetzt für jede Zelle zu programmieren, würde ich gerne die Range mit einem Befehl abdecken...Leider hab ich kein Plan wie...Meine VBA Kenntnisse sind miserabel:)

 

Public Function SolverMitVBA()
 
 
If ActiveCell.Cells(21, 2) = 1 Then
Solver.SolverAdd CellRef:="B21", Relation:=5, FormulaText:="binär"
ElseIf ActiveCell.Cells(21, 2) = 0 Then
Solver.SolverAdd CellRef:="B21", Relation:=2, FormulaText:="0"


End If

 

 

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
Rot VBA Schleife und Solver und Hilfe
 25.06.2014 16:49:13 Redzero
NotSolved
25.06.2014 22:32:05 Gast29123
NotSolved
25.06.2014 22:43:31 Redzero
NotSolved
26.06.2014 14:00:40 Gast42698
NotSolved
25.06.2014 22:51:40 Redzero
NotSolved