Thema Datum  Von Nutzer Rating
Antwort
22.05.2017 14:56:16 Officer_Bierschnitt
NotSolved
22.05.2017 15:05:41 SJ
NotSolved
23.05.2017 19:00:18 WErner
NotSolved
Blau Existenz eines Sheets prüfen
24.05.2017 08:34:16 Officer_Bierschnitt
NotSolved
24.05.2017 11:43:58 Werner
NotSolved
24.05.2017 12:39:01 Officer_Bierschnitt
Solved
24.05.2017 15:17:37 Werner
Solved
26.05.2017 09:50:20 Officer_Bierschnitt
NotSolved
26.05.2017 14:05:10 Werner
NotSolved

Ansicht des Beitrags:
Von:
Officer_Bierschnitt
Datum:
24.05.2017 08:34:16
Views:
727
Rating: Antwort:
  Ja
Thema:
Existenz eines Sheets prüfen
Hallo, zum Anlegen des Sheets hab ich schon einen Code, das stimmt - ist relativ einfach, da gibt es ein Sheet "Vorlage", wo das Layout schon vorliegt - die haben das ja bisher immer manuell gemacht. Ich geh einfach auf dieses Sheet, füge ein neues ein, das erscheint ja standardmäßig links davon, dann kopier ich von dem "Vorlage" das Layout und kopier es da drauf, dann benenn ich das Sheet um und dann kann ich die Zahlen da einfügen. Das sieht dann so aus >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>><<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<< Sheets("Vorlage").Select Sheets.Add 'Damit wird ein neues Sheet eingefügt, immer links vom aktuellen. Sheets("Vorlage").Select Cells.Select Selection.Copy ActiveSheet.Previous.Select ActiveSheet.Paste ActiveSheet.Name = v_Sheetname Range("A4").Select Application.CutCopyMode = False ActiveCell.FormulaR1C1 = "Kalenderwoche " & WorksheetFunction.WeekNum(Date) >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>><<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<< Abprüfen, ob es schon existiert, müsste ich eigtl. nur, falls irgendein Genie auf die Idee kommt, am Freitag doch schon mal eins einzufügen - aber das würde dann halt vermutlich überschrieben, dann passt's auch. Das check ich noch. Jetzt bin ich erst mal an einem anderen Codeblock dran. Danke vielmals! Gruß, Officer_Bierschnitt

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
22.05.2017 14:56:16 Officer_Bierschnitt
NotSolved
22.05.2017 15:05:41 SJ
NotSolved
23.05.2017 19:00:18 WErner
NotSolved
Blau Existenz eines Sheets prüfen
24.05.2017 08:34:16 Officer_Bierschnitt
NotSolved
24.05.2017 11:43:58 Werner
NotSolved
24.05.2017 12:39:01 Officer_Bierschnitt
Solved
24.05.2017 15:17:37 Werner
Solved
26.05.2017 09:50:20 Officer_Bierschnitt
NotSolved
26.05.2017 14:05:10 Werner
NotSolved