Microsoft Excel

Herbers Excel/VBA-Archiv

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

Verständnisfrage

Betrifft: Verständnisfrage von: LaluPeter
Geschrieben am: 11.11.2014 12:49:10

Hallo, ich habe eine allgemeine Verständisfrage.

und zwar berechne ich mir mir einer Funktion einen Wert, und lasse den Wert in eine Zelle schreiben.

Nachher will ich diesen Wert aus der Zelle als Variable speichern und in ein Edit Feld schreiben.
Ich dachte es funktioniert so:

Range("B36").Select
ActiveCell.FormulaR1C1 = _
"=TREND(R[-32]C[2]:R[-10]C[2],R[-32]C:R[-10]C^{1,2,3,4},R[-2]C^{1,2,3,4})"

p = Range("B36")

TextBox3.Value = p

Problem: In die Excel Tabelle wird in Zelle B36 etwas reingeschrieben aber in der Textbox erscheint nur eine 0.

Woran liegt das?

Ich will es eben gerne mit einer Variablen schreiben..

Wenn ich in der Textbox direkt die Zelle anspreche, wird der richtige Wert angezeigt.

Ich wäre froh, wenn ihr mir helfen könntet.
Danke

  

Betrifft: AW: Verständnisfrage von: Hajo_Zi
Geschrieben am: 11.11.2014 12:56:13

bei mir steht auf P der Wert. Deine Datei sehe ich nicht.

Sub Test123()
Dim P As Double
Range("B36").FormulaR1C1 = _
 "=TREND(R[-32]C[2]:R[-10]C[2],R[-32]C:R[-10]C^{1,2,3,4},R[-2]C^{1,2,3,4})"
 P = Range("B36")
End Sub
Gruß Hajo