Supportnet / Forum / Tabellenkalkulation
Wert aus B1 soll in C5 übernommen werden mit Zähler 1-24, dann Wert B1+4, Zähler1-24 usw.
Frage
Hallo Zusammen,
ich habe einen Wert in B1 (z.b. 256), den ich in C5...C148 wie folgt darstellen möchte:
[b]256,1 [/b] (-> durch Komma getrennt soll hier ein Zähler von 1-24 mit ausgegeben werden)
[b]256,2
.
.
.
256,24
260,1 [/b] ( -> hier kommt die Erhöhung des vorgegeben Wertes (B1) um 4 und das gleiche Soll wieder nach dem Komma von Zähler 1-24 gehen)
Diese Prozedur soll 5 mal durchlaufen, so dass ich im Grunde insgesamt 6 Bereiche mit jeweils 24 "Adressen" habe.
Kann mir jemand weiterhelfen. Ich hab´s versucht, aber irgendwie habe ich nicht die richtige Idee gehabt.
Herzlichen Dank
nightdream
Antwort 1 von Event
Hallo
Kopiere nachfolgenden Code in den Codebereich einer Schaltfläche:
Hoffe ich hab Dich richtig interpretiert.
Gruß
Kopiere nachfolgenden Code in den Codebereich einer Schaltfläche:
Option Explicit
Private Sub CommandButton1_Click()
Dim i!, j%, wertb1%
wertb1 = Range("B1").Value
For j = 5 To 148 Step 24
For i = 1 To 24
ActiveSheet.Cells(i + j - 1, 3).Value = wertb1 & "," & CStr(i)
Next i
wertb1 = wertb1 + 4
Next j
End SubHoffe ich hab Dich richtig interpretiert.
Gruß
Antwort 2 von nightdream
Herzlichen Dank event !
Das wars genau! Bin leider in VBA nicht fit :-(
Gruß
nightdream
Das wars genau! Bin leider in VBA nicht fit :-(
Gruß
nightdream

