Live-Forum - Die aktuellen Beiträge
Datum
Titel
23.04.2024 14:59:21
Zellformel in VBA
23.04.2024 14:47:39
Formel SVERWEIS
23.04.2024 14:27:08
Excel - Zellen verketten anhand anderer Spalte
23.04.2024 14:23:45
Gehe zu Tabellenblatt
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
500to504
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
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
500to504
500to504
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Zielwertsuche über Eingabaufforderung

Zielwertsuche über Eingabaufforderung
13.10.2004 18:55:42
Rupert
Hallo Leute,
Ich würde gerne über ein eingabefeld eine Zielwertsuche generieren.
Das heisst, ich habe in B3 eine zahle von "1" stehen, will nun wissen welche zahl in B1 Stehen muss um den einen bestimmten Prozentsatz zu erreichen.
Dieser Prozentsatz müsste sich über die Eingabemaske eingeben lassen.
Habe schon google bemüht, jedoch nicht das passende gefunden.
Herzlichen Dank schon im Voraus
Rupert

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zielwertsuche über Eingabaufforderung
Bert
Zielwertsuche gibts doch als Funktion im Menü Extras.
Bert
AW: Zielwertsuche über Eingabaufforderung
Rupert
Soweit weiss ich das, möchte es gerne auf einen Button legen.
Gruss rupert
AW: Zielwertsuche über Eingabaufforderung
Ulf
"um den einen bestimmten Prozentsatz zu erreichen."
Prozentsatz wovon?
Ulf
AW: Zielwertsuche über Eingabaufforderung
13.10.2004 20:50:12
rupert
angenommen
A 1 (veränderbarer Wert)
A 2 (Fixer Wert)
A 3 (Formel in %)
Der Sollwert ist veränderbar
AW: Zielwertsuche über Eingabaufforderung
14.10.2004 09:09:23
rupert
ich hab mal das gefunden

Private Sub CommandButton1_Click()
Dim Zielwert As Integer
Dim Zelle As String
Zielwert = InputBox("Welcher Wert?")
Zelle = InputBox("Welche Zelle?")
If Zelle = "C7" Then
Range("D12").GoalSeek Goal:=Zielwert, ChangingCell:=Range("C7")
End If
End Sub

aber dies funktioniert nich ganz, weil ich als Wert "60%" nehmen will und dann kommt, "laufzeitfehler 13, Typen unvertäglich"
jemand noch ne idee
gruss rupert
Anzeige

Links zu Excel-Dialogen

CommandButton InputBox

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige