IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Macros et VBA Excel Discussion :

interdire la copie de cellules


Sujet :

Macros et VBA Excel

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Expert confirmé Avatar de casefayere
    Homme Profil pro
    RETRAITE
    Inscrit en
    Décembre 2006
    Messages
    5 138
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 70
    Localisation : France, Ardennes (Champagne Ardenne)

    Informations professionnelles :
    Activité : RETRAITE
    Secteur : Agroalimentaire - Agriculture

    Informations forums :
    Inscription : Décembre 2006
    Messages : 5 138
    Par défaut interdire la copie de cellules
    Bonjour, peut on interdire de copie une selection de cellules dans une colonne ou empecher de les coller ,

    Merci de vos réponses
    Cordialement,
    Dom
    _____________________________________________
    Vous êtes nouveau ? pour baliser votre code, cliquer sur cet exemple : Anomaly
    pensez à cliquer sur :resolu: si votre problème l'est
    Par contre, il est désagréable de voir une discussion résolue sans message final du demandeur (satisfaction, désarroi, remerciement, conclusion...)

  2. #2
    Inactif  
    Profil pro
    Inscrit en
    Juin 2007
    Messages
    2 054
    Détails du profil
    Informations personnelles :
    Localisation : Belgique

    Informations forums :
    Inscription : Juin 2007
    Messages : 2 054
    Par défaut
    Bonjour,
    Un peu plus d'explications sur ce que tu veux faire permettrait de mieux comprendre.
    Toutefois il y à moyen de 'verrouillé' certaines cellules..
    la solution suivant ta réponse...
    A+

  3. #3
    Inactif  
    Avatar de ouskel'n'or
    Profil pro
    Inscrit en
    Février 2005
    Messages
    12 464
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Février 2005
    Messages : 12 464
    Par défaut
    J'ai un truc un peu brutal mais efficace... A placer dans la feuille de code de la feuille de calculs concernée
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Target.Column = 3 Then _
        Cells(Target.Row, Target.Column).Offset(0, 1).Select
     
    End Sub
    Tu peux de même le faire pour une cellule ou une poignée de cellules déterminée

    Edit
    Mais tu peux aussi verrouiller les cellules concernées, déverrouiller les autres et protéger ta feuille en interdisant l'accès aux cellules verrouillées

  4. #4
    Expert confirmé Avatar de casefayere
    Homme Profil pro
    RETRAITE
    Inscrit en
    Décembre 2006
    Messages
    5 138
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 70
    Localisation : France, Ardennes (Champagne Ardenne)

    Informations professionnelles :
    Activité : RETRAITE
    Secteur : Agroalimentaire - Agriculture

    Informations forums :
    Inscription : Décembre 2006
    Messages : 5 138
    Par défaut interdire
    re-bonjour à tous,
    à ouskel'nor, je ne doit pas verrouiller les cellules de la meme colonne quelles qu'elles soient car les saisies à venir se font dès la première cellule rencontrée (dans la même colonne). je veux juste empêcher à un quidam quelconque de faciliter sa saisie en recopiant des cellules déjà saisie (ce qui empécherait certaines macros de fonctionner).

    à LEFORESTIER, regardes ma réponse ci-dessus : je veux simplement éviter de décider de copier des cellules déjà existantes pour les coller dès la première cellule vide ou je serais obligé de réfléchir plus sur mes macros qui fonctionnent dans worksheets_change (macros de mises à jour automatique d'autres colonnes)

    Merci à vous

    ps : j'ai résolu le problème pour les saisies réincrémentées
    a+
    Cordialement,
    Dom
    _____________________________________________
    Vous êtes nouveau ? pour baliser votre code, cliquer sur cet exemple : Anomaly
    pensez à cliquer sur :resolu: si votre problème l'est
    Par contre, il est désagréable de voir une discussion résolue sans message final du demandeur (satisfaction, désarroi, remerciement, conclusion...)

  5. #5
    Inactif  
    Avatar de ouskel'n'or
    Profil pro
    Inscrit en
    Février 2005
    Messages
    12 464
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Février 2005
    Messages : 12 464
    Par défaut
    Si je reformule pour les besoins de la solution que je pourrais te proposer, tu ne veux pas pouvoir, manuellement, copier/modifier une cellule déjà renseignée, mais tu veux pouvoir saisir dans les autres ? C'est bien ça ?
    A+

  6. #6
    Expert confirmé Avatar de casefayere
    Homme Profil pro
    RETRAITE
    Inscrit en
    Décembre 2006
    Messages
    5 138
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 70
    Localisation : France, Ardennes (Champagne Ardenne)

    Informations professionnelles :
    Activité : RETRAITE
    Secteur : Agroalimentaire - Agriculture

    Informations forums :
    Inscription : Décembre 2006
    Messages : 5 138
    Par défaut suite
    je ne veux pas copier les cellules déjà renseignées dans le but de les coller à la suite des cellules déjà saisies car je fais ce travail pôur des gens qui ne connaissent pas ou très peu excel (afin de leur éviter des erreurs)

    on peut modifier une cellule renseignéede la même colonne sans problème, faire une incrémentation, c'est prevu aussi mais pas copier

    exemple; la colonne A est calculée (avec vba) ainsi que la colonne B, la colonne C peut etre renseignée, ce que je ne veux pas

    cellules renseignées c2:c10 et l'opérateur veut faire une copie de c3:c5 àà la suite de c10, cà je veux l'empécher
    Cordialement,
    Dom
    _____________________________________________
    Vous êtes nouveau ? pour baliser votre code, cliquer sur cet exemple : Anomaly
    pensez à cliquer sur :resolu: si votre problème l'est
    Par contre, il est désagréable de voir une discussion résolue sans message final du demandeur (satisfaction, désarroi, remerciement, conclusion...)

  7. #7
    Inactif  
    Avatar de ouskel'n'or
    Profil pro
    Inscrit en
    Février 2005
    Messages
    12 464
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Février 2005
    Messages : 12 464
    Par défaut
    Je vais donc supposer que la réponse à ma question est "oui !"
    Teste ce code. Il peut être adapté.
    Comme tu as du code dans worksheets_change, j'utilise une fonction qui, si elle te retourne True (cellule déjà renseignée) empêche le code qui suit de s'execute. En outre, elle place la cellule active sur la première cellule vide de la colonne.
    Si ce n'est pas ce que tu veux, alors c'est que je n'ai toujours pas compris
    A+

    Edit
    Oui, si je ne mets pas le code, ça marche pas
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Verif(Target) Then Exit Sub
    End Sub
     
    Function Verif(Cell) As Boolean
        If Cell <> "" Then _
            Cells(Cell.Row, Cell.Column).Offset(1, 0).Select
    End Function

  8. #8
    Membre chevronné
    Profil pro
    Inscrit en
    Octobre 2007
    Messages
    308
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Octobre 2007
    Messages : 308
    Par défaut
    Bonjour le forum

    méthode aussi assez brutale :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    dans l'évènement Selection_Change 
    If Target.Column = 3 Then Application.CutCopyMode = False
    Ainsi toute recopie par copier et ou couper/coller interdite dans la colonne 3

  9. #9
    Inactif  
    Profil pro
    Inscrit en
    Juin 2007
    Messages
    2 054
    Détails du profil
    Informations personnelles :
    Localisation : Belgique

    Informations forums :
    Inscription : Juin 2007
    Messages : 2 054
    Par défaut
    Re,
    Je crois qu'il veux empêché la copie par l'utilisateur.. mais c'est toujours pas très clair.
    Pour empêché la copie..

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    Private Sub Worksheet_SelectionChange(ByVal Target As Range)
        Application.CutCopyMode = False
    End Sub
    A+
    Edit: je n'avais pas vu ton dernier message

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. [VBA-E]Interdire la selection de cellule dans une feuille
    Par Tartenpion dans le forum Macros et VBA Excel
    Réponses: 1
    Dernier message: 09/03/2006, 23h24
  2. [VBA-E]récup controle copie de cellules de fichiers
    Par Chin dans le forum Macros et VBA Excel
    Réponses: 2
    Dernier message: 27/02/2006, 10h26
  3. [VBA-E]Erreur lors d'une copie de cellules
    Par illight dans le forum Macros et VBA Excel
    Réponses: 4
    Dernier message: 08/02/2006, 11h22
  4. Interdire la copie des fichiers partagés en réseau
    Par Essilife dans le forum Administration
    Réponses: 4
    Dernier message: 16/01/2006, 23h46
  5. Réponses: 1
    Dernier message: 07/01/2006, 23h33

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo