Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
516to520
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
516to520
516to520
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Vervielfälltigung von Datenblättern

Vervielfälltigung von Datenblättern
11.11.2004 17:19:39
Datenblättern
Hallo,
ich möchte dieses angehängte Arbeitsblatt, so oft vervielfälltigen, das ich für jede Woche ein Besucherdatenblatt habe. Da ich aber in jedem Datenblatt die Kalenderwoche und die Tage ändern muss, suche ich eine schnelle Lösung des Problems.
Wer kann mir helfen?
Gruß
Rainer
https://www.herber.de/bbs/user/13327.xls

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Vervielfälltigung von Datenblättern
11.11.2004 17:36:58
Datenblättern
kannst du nicht mehr nur aus der RECHERCHE
AW: Vervielfälltigung von Datenblättern
Datenblättern


Hallo
starte dies mal aus  tabelle1 heraus.
vieleicht ist es das... 
     
Public Sub t()
Dim i As Integer
Application.ScreenUpdating = 
False
For i = 2 To 53
      Worksheets("tabelle1").Copy after:=Sheets(Worksheets.Count)
            
With Sheets(i)
                  .Name = i + 1 & ".Kalenderwoche"
                  .[c3] = i + 1
                  .[e3] = Sheets("tabelle1").[e3] + (i - 1) * 7
                  .[h3] = Sheets("tabelle1").[h3] + (i - 1) * 7
                  Range("b6:i7").ClearContents
            
End With
Next
Application.ScreenUpdating = 
True
End Sub
ransi
 


Anzeige

300 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige