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 saisie dans une cellule.


Sujet :

Macros et VBA Excel

  1. #1
    Membre averti
    Profil pro
    Inscrit en
    Mars 2007
    Messages
    42
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Mars 2007
    Messages : 42
    Par défaut Interdire la saisie dans une cellule.
    Bonsoir à tous.
    Je débute avec excel et j'ai un problème que je n'arrive pas à résoudre.
    Dans les cellules colonne D je saisis des nombres , en fonction de leur valeur je souhaite interdire ou pas la saisie dans les cellules adjacentes colonnes E et F. Comment puis-je faire.
    Merci pour votre aide.

  2. #2
    Expert éminent Avatar de mercatog
    Homme Profil pro
    Inscrit en
    Juillet 2008
    Messages
    9 435
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : Autre

    Informations forums :
    Inscription : Juillet 2008
    Messages : 9 435
    Par défaut
    bonsoir,
    un exemple
    si dans colonne D la valeur 10, tu ne peux pas sélectionner les cellules adjacentes E et F
    à mettre dans le code de la feuille
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Not Intersect(Target, Columns("E:F")) Is Nothing Then
        If Range("D" & Target.Row).Value = 10 Then Range("D" & Target.Row).Select 'à adapter
    End If
    End Sub

  3. #3
    Membre averti
    Profil pro
    Inscrit en
    Mars 2007
    Messages
    42
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Mars 2007
    Messages : 42
    Par défaut Saisies interdites dans les cellules
    Bonjour .
    Merci à Mercatog pour sa réponse rapide.
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Not Intersect(Target, Columns("E:F")) Is Nothing Then
        If Range("D" & Target.Row).Value = 10 Then Range("D" & Target.Row).Select 'à adapter
    End If
    End Sub
    ça m' a permis de progresser dans ce que je souhaite faire.
    Il y aura d'autres questions.
    Bien cordialement.
    A +

Discussions similaires

  1. limiter la saisie dans une cellule
    Par lecail65 dans le forum Macros et VBA Excel
    Réponses: 11
    Dernier message: 12/12/2007, 12h37
  2. Interdire la saisie dans une cellule
    Par NEC14 dans le forum Macros et VBA Excel
    Réponses: 7
    Dernier message: 20/11/2007, 12h49
  3. Interdire la saisie dans une combobox
    Par natie_49 dans le forum VB 6 et antérieur
    Réponses: 4
    Dernier message: 19/12/2006, 12h27
  4. comment interdire la saisie dans une combolist
    Par awatif dans le forum VB 6 et antérieur
    Réponses: 2
    Dernier message: 06/10/2006, 23h03
  5. [VBA-E]controle de saisie dans une cellule
    Par greg778 dans le forum Macros et VBA Excel
    Réponses: 10
    Dernier message: 03/03/2006, 16h43

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