Microsoft Excel

Herbers Excel/VBA-Archiv

Informationen und Beispiele zum Thema InputBox
BildScreenshot zu InputBox InputBox-Seite mit Beispielarbeitsmappe aufrufen
Informationen und Beispiele zum Thema MsgBox
BildScreenshot zu MsgBox MsgBox-Seite mit Beispielarbeitsmappe aufrufen

Inputbox, Wert zur Berechnung verwenden | Herbers Excel-Forum


Betrifft: Inputbox, Wert zur Berechnung verwenden von: Maxkuba
Geschrieben am: 31.12.2009 05:57:23

Hallo Leute,
wie kann ich in eine Formel den eingegebenen Wert aus einer Inputbox verwenden? Hab leider in der Suche nix passendes gefunden..


Dim myInp As Integer
    myInp = InputBox("Eingabe bitte im Format ##.##")
    
    ' Eingabeüberprüfung
    ' If Not myInp Like "#.##" And Not myInp Like "##.##" Then Exit Sub
    
    ' Ausgabe des Dezimalwertes
    MsgBox (Evaluate("=" & myInp))

    Range("V2").FormulaR1C1 = "=RC[-1]/ myInp " '-> Hier wuerde ich gerne den Wert aus der  _
Inputbox zur Berechnung verwenden

  

Betrifft: AW: Inputbox, Wert zur Berechnung verwenden von: hary
Geschrieben am: 31.12.2009 07:04:01

Moin
Den InputBox Inhalt mit & an die Formel anhaengen.

Dim myInp As Integer
    myInp = InputBox("Eingabe bitte im Format ##.##")
    ' Eingabeüberprüfung
    ' If Not myInp Like "#.##" And Not myInp Like "##.##" Then Exit Sub
    ' Ausgabe des Dezimalwertes
    MsgBox (Evaluate("=" & myInp))
    Range("V2").FormulaR1C1 = "=RC[-1]/" & myInp '-> myInp mit & anhaengen
gruss hary



  

Betrifft: AW: Inputbox, Wert zur Berechnung verwenden von: Maxkuba
Geschrieben am: 31.12.2009 07:23:19

Super geht wunderbaerchen! Vielen Dank :-)
Gruss aus Indien, Max


Beiträge aus den Excel-Beispielen zum Thema "Inputbox, Wert zur Berechnung verwenden"