Office: (Office 2010) statt kopieren nur werte einfügen erlauben

Liebe KollegInnen,
ich arbeite momentan an einer Excel-Datei, die für eine große internationale Datensammlung eingesetzt wird. Die Datei enthält eine Reihe von bedingten Formatierungen, die die Datensammlung beschleunigen und die Anzahl der Feedbackschleifen verringern soll (es hat bereits eine Runde gegeben und wir nützen die Erfahrungen daraus). Das System funktioniert und hat die ersten Tests überstanden, aber es gibt ein Riesenproblem: wenn jemand Daten mit copy+paste einfügt, überschreibt er die bedingten Formatierungen und die Datei verliert ihren Nutzen. Gibt es eine Möglichkeit, kopieren zu verhindern und stattdessen nur werte einfügen zu erlauben? Ideal wäre natürlich eine Lösung, in der der Nutzer gar nicht merkt, dass er mit strg+c oder rechte Maustaste "Einfügen" nur Werte einfügt. *wink.gif*

Ich habe bereits durch alle möglich Foren gesurft, befürchte aber, dass mein Problem gar nicht lösbar ist. Erschwerend kommt hinzu, dass unterschiedlichste Excel Versionen genutzt werden....

Vielen Dank für eure Hilfe!
LG
Daniel

:)

 

Moin Daniel,

da sehe ich nur eine Möglichkeit: VBA. Und da denke ich, dass eine Eingabe-Maske für die Daten sinnvoll ist. Sprich: Tabelle gegen Eingaben komplett sperren, Dateneingabe in der Maske, per VBA/Makro den Schreibschutz aufheben, schreiben lassen und den Schutz wieder setzen. Das sollte auch über verschiedene Versionen machbar sein, zumindest wenn die älteste Version nicht älter ist als 2000.

 

Hallo

ggf müsstest du bei Workbook_Open mittels Application.OnKey die Tastenkombi Ctrl + v abfangen und auf eine einfache Funktion lenken und u.U. auch diverse Kontexmenues ("einfügen") ebenfalls auf diese Funktion umbiegen.

 

vielen dank für eure antworten. ich werd mal versuchen das umzusetzen!
lg
Daniel

 

Hallo nochmal,
ich habe nun einen fertigen VBA code gefunden, der zwar schon älter ist, aber tadellos funktioniert. Er bewirkt, dass bei Steuerung + Einfügen, aber auch rechte Maustaste + Einfügen nur Werte eingefügt werden. Leider funktioniert es nicht, wenn man auf "Start"/Einfügen klickt und wenn man rechte Maustaste/Einfügeoptionen+dann auf die ganz linke Möglichkeit geht. Habt ihr eine Idee, wie ich meinen Code erweitern kann, um für alle Arten von Einfügen nur das Einfügen von Werten zuzulassen?
Der entsprechende Teil des Code:
Public Sub ForcePasteSpecial()
LockInterface
Excel.Application.OnKey "^v", m_sPasteProcedure_c
Excel.Application.OnKey "+{INSERT}", m_sPasteProcedure_c
Excel.Application.OnKey "^x", m_sCutWarningProcedure_c
ReplacePasteButtons
CutButtonsEnable False
Exit_Proc:
On Error Resume Next
UnlockInterface
Exit Sub
Err_Hnd:
VBA.MsgBox VBA.Err.Description, m_lButtons_c, m_sTitle_c & CStr(VBA.Err.Number), VBA.Err.HelpFile, VBA.Err.HelpContext
Resume Exit_Proc
End Sub

LG
Daniel

 

Hallo
ich hab kein 2010, mein verdacht ist das du neben den Commandbars auch noch die Ribbons umbiegen musst. Aber als 2003'er hab ich leider keinen Plan von Ribbons.