Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
252to256
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
252to256
252to256
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Nach Solver Probs mit Select+Range-Methode

Nach Solver Probs mit Select+Range-Methode
13.05.2003 18:18:23
Martin
`nAbend zusammen (hoffe, ist noch jemand da)

Nachdem ein Makro mehrere Solverberechungen durchgeführt hat, möchte ich den Wert ein ein anderes Sheet als Wert kopieren. Leider bekomme ich trotz dieses einfachen Makros ständig eine Fehlermeldung, dass die Select.Range-Methode nicht durchgeführt werden kann.

Sheets("Valuation").Select
SolverOk SetCell:="$c$297", MaxMinVal:=3, ValueOf:="0", ByChange:="$c$296"
SolverSolve userFinish:=True
Sheets("Help").Select
Range("E27").Select
Selection.Copy
Range("F27").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Sheets("Valuation").Select

Kann mir bitte jemand helfen??

Schönen Dank!

Gruß
Martin

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: Nach Solver Probs mit Select+Range-Methode
13.05.2003 19:33:02
Hans W. Hofmann

...
With Sheets("Help")
.Range("F27").Value=.Range("E27").Value
End With

Gruß HW

Vielen Dank!
14.05.2003 08:52:04
Martin

.

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige