Supportnet Computer
Planet of Tech

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:

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 Sub


Hoffe ich hab Dich richtig interpretiert.

Gruß

Antwort 2 von nightdream

Herzlichen Dank event !

Das wars genau! Bin leider in VBA nicht fit :-(

Gruß
nightdream

Ich möchte kostenlos eine Frage an die Mitglieder stellen:


Ähnliche Themen:


Suche in allen vorhandenen Beiträgen: