Ich bin Einsteiger und habe ein kleines Problem von dem ich hoffe, es mit eurer Hilfe lösen zu können.
Ich habe ein Programm für eine Rohdichtenberechnung geschrieben.
Die Ergebnise dieser Berechungen werden auf einem Tabellenblatt in der Spalt 6, Zeile 1 -10 abgelegt.
(max. 10 sollen zwischengespeichert werden)
Sub ProbedatenR()
Dim Z As Integer
For Z = 1 To 10
If Worksheets("Tab1").Cells(Z, 6) = 0 Then
Worksheets("Tab1").Cells(Z, 6) = Textbox12
If Worksheets("Tab1").Cells(Z, 6) > 0 Then Exit For
End If
Next Z
End Sub
Soweit klappt auch alles, nun soll er aber bei der 11 Berechung, die 1 abgelegte Berechung überschreiben und bei der 12 Berechung dann die 2 abgelegte überscheiben, bei der 13 Berechnung die 3 und so weiter...
Also müsste er sich doch, wenn er in die 12 Berechung geht und die dann in Zeile 2 schreiben soll merken können, das er schon bei der 11 Berechung in Zeile 1 Neu geschrieben bzw. überschrieben hat.
Hoffe ihr könnt nachvollziehen wo ich drauf hinaus will.
Mein Lösungsansatz wäre ein Vergleich oder ähnliches, hoffe ihr könnt mir helfen.
Mit freundlichem Gruß
Julian