Problem bei Datenexport Verfasst am: 25.10.2010, 10:56
Hi,
kann mir jemand verraten, wieso meine Daten für die Enthalpie alle in eine Spalte, anstatt in 10 Spalten geschrieben werden?
Code:
Option Explicit
Private Sub Berechnen_Click()
Dim dblCpd As Double
Dim dblLog10 As Double
Dim dblDruck As Double
Dim dblCpl As Double
Dim strText As String
Dim lngI As Long
Dim dblaX(1 To 10) As Double
Dim dblaDampfdruck(1 To 10) As Double
Dim dblaT(1 To 10) As Double
Dim dblaRV(1 To 10) As Double
Dim dblaEnthalpie(1 To 10) As Double
Dim dblaDichteLuft(1 To 10) As Double
Dim dblaLuftfeuchte(1 To 10) As Double