943 Aufrufe
Gefragt in Tabellenkalkulation von
Ich habe eine Kundendatei in enem Tabellenblatt erstellt. dieses Blatt ist geschützt. Da diese Kundendatei andere Mitarbeiter (örtlich getrennt) auch nutzen sollen, möchte ich, das jeder selbst diese Tabellenblätter kopiere und umbenennen kann. Also für jeden neuen Kunden ein neues Blatt.
Dabei soll der Schutz aber erhalten bleiben.
Wie kann ich das machen, ohne jeden eine Arbeitsmappe von z.B. 300 Kunden -Tabellenblättern zur Verfügung stellen zu müssen.
Hinweis: ich bin ziemlich Neuling in Excel, kann zwar einiges mit Foreln aber mit Programmierung sehr wenig.

Danke

2 Antworten

0 Punkte
Beantwortet von nighty Experte (6.6k Punkte)
hi all ^^

1 erstell dir einen commandbutton1
2 gebe diesen code dort ein

3
Private Sub CommandButton1_Click()
ActiveSheet.Unprotect ("DeinPasswort")
ActiveSheet.Copy Before:=ThisWorkbook.Sheets(1)
ActiveSheet.Protect ("DeinPasswort")
End Sub


4 schütze das blatt
5 schütze das projekt im vbeditor
6 nun kann der Nutzer den button betätigen mit schutz

gruss nighty

p.s.
wer sich mit solchen dingen beschäftigt sollte ein wenig vb kenntnise besitzen zum nachzuvollziehen
0 Punkte
Beantwortet von
hallo nighty,
danke für deine Lösung, ich werde sie in Kürze anwenden und hoffe das ich das hinkriege. Bin zur Zt. leider etwas krank. Du hast Recht ich sollte mich mit der Programmierung beschäftigen. Kannst du mir hierfür Literatur empfehlen für einen Anfänger. Danke und ich melde mich wieder.
...