Kopieren von Formatierungen komplett verhindern

Bild

Betrifft: Kopieren von Formatierungen komplett verhindern
von: Pat132
Geschrieben am: 29.07.2015 15:23:25

Hallo und guten Tag,
ich habe eine relativ umfangreiche Datei mit der diverse Nutzer arbeiten. Da einige von denen in der Regel wenig Umgang mit Excel haben, habe ich natürlich einen großen Teil der Zellen geschützt. Das klappt soweit gut.
Problem ist, dass diejenigen Zellen, welche für Eintragungen frei sind, mitunter bestimmte bedingte und nicht bedingte Formatierungen beinhalten, die unter allen Umständen beibehalten werden sollten. Ich müsste also in nicht gesperrten Zellen die Bearbeitung einschränken. Andere Zellen sollen weiterhin komplett gesperrt sein.
Ich suche daher nach einem Weg, alle Möglichkeiten des Copy-Paste zu blocken: Tastenkombi STRG-V, Option über rechte Maustaste UND den Pinsel im Menüband...
Per Recherche bin ich schon auf folgenden Code gestoßen:


Private Sub Workbook_Activate()
 
 EnableControl 21, False ' Ausschneiden (cut)
 EnableControl 19, False ' Kopieren (copy)
 EnableControl 22, False ' Einfügen (paste)
 EnableControl 755, False ' Inhalte Einfügen (pastespecial)
' Tastenkombinationen abfangen
 Application.OnKey "^c", "" ' STRG + c kopieren abfangen (copy)
 Application.OnKey "^v", "" ' STRG + v einfügen abfangen (cut)
 Application.OnKey "^x", "" ' STRG + x ausschneiden abfangen (cut)
 Application.OnKey "+{DEL}", "" ' SHIFT + ENTF auschneiden abfangen (cut)
 Application.OnKey "+{INSERT}", "" ' SHIFT + EINFG einfügen abfangen (paste)

Damit kriege ich aber den unsäglichen Pinsel nicht weg...:-(
Gibt es da eine Möglichkeit, das Menüband durch VBA teilweise auszuschalten?
Ich bin dankbar für Eure Anregungen.
Gruß, Patrik

Bild

Betrifft: AW: Kopieren von Formatierungen komplett verhindern
von: Nepumuk
Geschrieben am: 29.07.2015 18:36:35
Hallo,
ein einzelnes Element einer Gruppe kannst du nicht beeinflussen. Du könntest aber die ganze Gruppe (Zwischenablage) ausblenden. Der entsprechende XML-Code:
<customUI xmlns="http://schemas.microsoft.com/office/2006/01/customui">
<ribbon>
<tabs>
<tab idMso="TabHome">
<group idMso="GroupClipboard" visible="false">
</group>
</tab>
</tabs>
</ribbon>
</customUI>
Gruß
Nepumuk

Bild

Betrifft: AW: Kopieren von Formatierungen komplett verhindern
von: Pat132
Geschrieben am: 31.07.2015 07:11:07
Guten Morgen Nepumuk,
vielen Dank, das sieht interessant aus! Wo hinterlege ich denn den Code? Und ist gewährleistet, dass die Funktionen der Zwischenablage wieder verfügbar sind, wenn meine Datei geschlossen wird?
Gruß, Patrik

Bild

Betrifft: AW: Kopieren von Formatierungen komplett verhindern
von: Nepumuk
Geschrieben am: 31.07.2015 07:36:28
Hallo,
du musst die Mappe mit dem Custom-UI-Editor öffnen und den XML-Code unter dem Office 2007 Custom-UI-Part hinterlegen. Die Änderung gilt nur in dieser Mappe. Wenn du eine zweite Mappe parallel offen hast, dann steht dir in der zweiten Mappe das komplette Menü zur Verfügung.
Den Editor kannst du z.B. hier herunterladen:
http://www.heise.de/download/custom-ui-editor-tool-1142755.html
Gruß
Nepumuk

Bild

Betrifft: AW: Kopieren von Formatierungen komplett verhindern
von: Pat132
Geschrieben am: 31.07.2015 07:38:16
Ich danke Dir! Das werde ich mal testen.
perspektivisch ein schönes Wochenende!
Gruß, Patrik

 Bild

Beiträge aus den Excel-Beispielen zum Thema "Kopieren von Formatierungen komplett verhindern"