Office: Neues Blatt erstellen, Namen per Inputbox abfragen

Also den ersten Teil habe ich eingebaut und funktioniert. Danke.
Wo Licht ist, da ist ...
Der Code
Code:

verursacht einen Fehler 1004. Ich habe ihn an verschiedenen Positionen ausprobiert, nichts. Immer dieser Fehler.
Meine Lösung hatte funktioniert, auch die Erweiterung der Range erfolgte, aber mit leeren Zellen.

 

Hi Bernd,

weshalb musst du diese Bereiche überhaupt leeren? Ich würde ja ein Tabellenblatt ohne jegliche Eintragungen als Vorlage nehmen, dieses ausgeblendet lassen, bei Bedarf einblenden und kopieren.

 

Hi Beverly,

ich habe den Vorschlag einmal umgesetzt. Der Erfolge war noch nicht da.
Den Code bin ich mit meinen Kenntnissen durchgegangen, hatte aber keinen Fehler gefunden. Manchmal ist es zum Haare raufen.
Bis zu dem Teil Code:

läuft es durch, ohne Probleme.
Wie Du siehst, auch mit dem neuen Muster. Es ist sogar Wurscht, ob Muster oder ein anderes Blatt. Er fügt das neue an und kopiert jetzt zum Schluß die kopierte "Range("zuKopieren")" in das neue "Sheets(strName)". Genau an die Stelle, wie in Deinem Script angegeben.
Wir machen ja das neue zum ActiveSheet und, wenn ich das richtig verstehe, nutzen mit With das Blatt "Stundenabrechnung". Daraus kopieren wir die "Range("zuKopieren")". Und dann passiert, was nicht gewollt ist. Die kopierte "Range("zuKopieren")" befindet ebenfalls sich im neuen "Sheets(strName)".
Meine Letzte Frage daran, so zur Einstimmung:
Erweitert sich die "Range("Monteure")", wenn sie voll ist? Bisher doch nicht, oder?

Übrigens, über Deine HP bin ich auf einen gewissen Ort aufmerksam geworden. Tolle Gegend. Ich war da früher mindestens 2x die Woche.

 

Hi Bernd,

irgendwie komme ich jetzt leider nicht mehr mit. Einerseits schreibst du

Und etwas weiter schreibst du dagegen

Was ist denn nun richtig? Wo soll der Bereich hinkopiert werden?

 

Dann geht Es Dir ähnlich wie mir.
Die "Range("zuKopieren")" befindet sich nach dem gesamten Durchlauf des Scriptes im "Sheet("Stundenabrechnung")" und im neuen Sheet. Es soll aber nur im Sheet"Stundenabrechnung" an die richtige Position kopiert werden.
In der "Range("zuKopieren")" sind ja die Formeln hinterlegt, welche mit jeder weiteren Zeile auch gebraucht werden. Wenn es eine bessere Lösung gibt, ...
Leise dämmert mir da was und meine Versuche heute, waren eher nischt.

 

Hi Bernd,

ergänze in dieser Zeile den Punkt vor Cells(....):

Code:

 

Hi,

habe ich gemacht. Es scheint zu laufen. Ich mach ein paar Durchgänge und wenn alles gut geht, atmen wir mal durch. Diese kleinen Zeichen, mit den großen Auswirkungen.*mad.gif*
Danke, danke, danke, für die Hilfe und die Geduld *Smilie *Smilie

 

Hi Beverly,

da gibt es doch noch ein Problem und ich hoffe auf Deine Hilfe.
Wenn ich im Blatt eines MA oben auf einen "Monatslink" klicke, fliege ich permanent in das Referenzblatt. Also der Grundlage aller hinzugefügten.
Code:

wird ja dafür genutzt.
Den Code dafür im Modul habe ich schon etwas überreizt, für meine Einschätzung, zig Versuche. Code:

Wie Du siehst, ich habe versucht das gerade genutzte Sheet als absolut aktives zu setzen und auch die Ranges ensprechend zu referenzieren. Aber ich habe wohl kein Glück oder wieder einen Knick am denken.

 

Hallo Bernd,

setze dir einen Haltepunkt (F9-Taste) bei der Codezeile Code:

dann siehst Du, wo Du aus dem Referenzblatt fliegst.

Gruß Stefan

 

Hi Bernd,

da mir deine aktuelle Mappe nicht vorliegt kann ich leider nichts dazu sagen.

 

Hi Beverly,

ich schicke es Dir wieder per Mail

 

Scheibenkleister. Ich habe die falsche geschickt. Jetzt kann ich Dir die Datei erst morgen früh senden, weil ich mir nach Hause auch die falsche geschickt habe.
Bleibt mir für heute nur, Dir einen schönen Abend zu wünschen.
Bis morgen

 

Hi Bernd,

aus deinem Kauderwelsch-Code entnehme ich, dass das Ziel-Tabellenblatt das aktive Tabellenblatt sein soll - washalb dieses dann erst selektieren, wenn es doch bereits aktiv ist?

Ich erhalte außerdem einen "Laufzeitfehler 13: Typen unverträglich" in deiner Zeile

Code:

Der rührt daher, dass du ZielE als Woksheets deklariert hast - es muss nur Worksheet heißen.

Ich kann nicht nachvollziehen, dass in das Tabellenblatt Muster gegangen wird. Mit folgendem Code verbleibt man im aktiven Mitarbeiter-Blatt und der gewünschte Bereich wird angezeigt:

Code:

 

Hi Bernd,

ich habe jetzt die Erklärung für dein Problem gefunden - es sind die Hyperlinks: lösche alle und das Problem ist beseitigt.

 

Der Codekauderwelsch entstand ja weil ich versucht hatte, die Zeilrefrenzierung irgendwie hinzubekommen.
Es scheint ja eine einfache Lösung zu geben. Werde ich testen und mich melden