Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
852to856
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
852to856
852to856
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Nur jeden 41.Wert nehmen

Nur jeden 41.Wert nehmen
18.03.2007 18:40:00
David
Hallo,
ich habe folgendes Problem:
ich möchte dass aus meiner Spalte D jeder 41.Wert genommen und 41mal in die Spalte E geschrieben wird und dies bei über 16tausend Zeilen. Also wenn ich bei Spalte E "runterziehe" soll es Excel automatisch machen.
ich hab mal ein teil der datei hochgeladen, ich hoffe dann versteht man was ich machen möchte.
https://www.herber.de/bbs/user/41156.xls
Beste Grüße

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Nur jeden 41.Wert nehmen
18.03.2007 18:56:41
mumpel
Hallo!
Mit diesem Makro dürfte es gehen. 16000 ist letzte Zeile, bitte anpassen. Die 1 stehen lassen.

Sub Test()
On Error Resume Next
Dim i As Integer
Application.ScreenUpdating = False
For i = 1 To 16000 Step 41 '
Cells(i, 4).Copy Cells(i, 5)
Next i
Application.ScreenUpdating = True
End Sub

Gruss Rene
AW: Nur jeden 41.Wert nehmen
18.03.2007 19:16:33
Daniel
Hallo
probiers mal mit dieser Formel in E1 und dann nach unten kopieren:
=WENN(REST(ZEILE();41)=0;D1;E2)
Gruß, Daniel
AW: Nur jeden 41.Wert nehmen
18.03.2007 19:29:00
Christian
Hallo,
=BEREICH.VERSCHIEBEN($D$1;(ZEILE(A1)*41)-1;0)
MfG Christian
AW: Nur jeden 41.Wert nehmen
18.03.2007 19:36:27
David
Danke ihr beiden! Hat geklappt!
Anzeige
noch ne Variante
18.03.2007 19:44:00
Daniel
=INDEX(D:D;AUFRUNDEN(ZEILE()/41;0)*41)

313 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige