VBA code gevraagd

[jan excel]

In een File met meerdere Sheets wil ik dat de gebruiker alleen in Sheet4 niet de copy/plakken functie kan toepassen.

Zelf dacht ik zo iets maar dit werkt niet:

Private Sub ActivateSheet()
Application.Cutcopy.Mode = False

End Sub

Weet iemand welke code benodigd is om dit te bereiken.

bedankt alvast,
JAN

 

[Cobbe]

Ik heb een bestandje gemaakt voor u dat verhindert dat er gecopyPaste' wordt in Blad4.

Je kan dit gebruiken op eigen risico.

Want als er iets mis gaat heb je nogal wat problemen.

 

[jan excel]

Beste Cobbe,


Het werkt, prima.

Maar ik proef uit je woorden dat het niet zonder risico is.
Kun je aangeven wat de risico's eventueel kunnen zijn ?

In ieder geval zie ik nu geen problemen, heb het in mijn file gezet en getest.
In mijn file zijn best veel VBA code's opgenomen in de event, zoals gezegd nog geen conflicten of zo !!

Cobbe ben zeer blij met deze code en bedankt hiervoor.

Jan E

 

[popipipo]

Kun je aangeven wat de risico's eventueel kunnen zijn ?

De kans bestaat dat je ook in andere bestanden niet meer kunt plakken en kopiëren.
Zeker als het bestandje en of computer een storing heeft en vastloopt.

 

[jan excel]

Oke, bedankt.
Ga het implementeren en de toekomst zal uitwijzen of het problemen oplevert.
Zal de status voor deze vraag op opgelost zetten.

 

[Cobbe]

Ja, wat Willem zei is het grootste probleem maar dan ook weer niet echt.

Als het misloopt kan je de code in een leeg bestand draaien en alles zou weer normaal moeten lopen.

Dus is het probleem toch echt niet zo groot, hé.

Dus goed de code bewaren is de boodschap!!!!!