ich habe eine Datei (Test.dat), die aus 10.000.000 (in Worten 10 Millionen) zeilen besteht.
Da Excel nur über 65000 Zeilen pro Blatt lesen kann, suche ich
eine Möglichkeit wie man die anderen Zeilen in die Blätter
Tabelle2, Tabelle3, etc. bis Tabelle411, automatisch importiert.
Wahrscheinlich werde ich jedoch mit Tabelle101 anfangen, dann
kann man die Blätter sortieren und erhält die richtige reihenfolge.
Bitte um hilfe bzw. gedankenanstösse.
Alternativ hierzu würde ich sonst gerne wissen, wie man bei VBA
so programmiert, dass eine datei nur 65000 Zeilen lang ist und
dann eine neue begonnen wird.
vielen Dank.
mfg
matthias
p.s. Programmcode VBA
Sub lotto()
Dim z1 As Integer
Dim z2 As Integer
Dim z3 As Integer
Dim z4 As Integer
Dim z5 As Integer
Dim z6 As Integer
Dim v1 As Integer
Dim v2 As Integer
v1 = 1
v2 = 49
Dim ff As Integer
ff = FreeFile
Open "test.dat" For Output As ff
For z1 = v1 To v2
For z2 = v1 To v2
For z3 = v1 To v2
For z4 = v1 To v2
For z5 = v1 To v2
For z6 = v1 To v2
If z1 < z2 Then
If z2 < z3 Then
If z3 < z4 Then
If z4 < z5 Then
If z5 < z6 Then
Print #ff, z1; z2; z3; z4; z5; z6
End If
End If
End If
End If
End If
Next
Next
Next
Next
Next
Next
Close
End Sub