vba Schleifchen-Übung
07.04.2017 16:32:47
silex1
ich bin dabei mir vba anzutun. Schleifchen sind gerade dran...;-)
Die Aufgabe lautet: in einer Tabelle (hab 10x10 Felder mir gewählt) die Zeilen mit den Spalten zu multiplizieren.
Hab schon in Heimarbeit geschafft, dass sich ab der aktiven Zelle diese Tabelle automatisch erstellt, gefüllt mit Zufallszahlen in Kopf und Spalte.
Sub tabErstellen()
Dim i As Integer
For i = 1 To 10
Worksheets("Tabelle2").Activate
ActiveCell.Offset(i, 0).Value = Int((10 * Rnd) + 1)
ActiveCell.Offset(0, i).Value = Int((10 * Rnd) + 1)
Next
' For Z = 1 To 10
' ActiveCell.Offset(i + 1, i).Value
' Next
End Sub
Doch wie geht es weiter? Wie wird von der aktiven Zelle aus, die Tabelle nun befüllt?Hab dies mal versucht (auskommentierter Bereich), jedoch denke ich wohl zu kompliziert...oder ist dies die falsche Schleifenform?
Für Denkansätze dankbar
René