Précédent   Forum des professionnels en informatique > Logiciels > Microsoft Office > Excel
Excel Forum d'entraide sur Excel. Vos questions sur les fonctions, formules, manipulations, et tout sujet qui ne trouve pas sa place dans un sous-forum.
Partagez cette discussion sur d'autres réseaux sociaux : Viadeo Twitter Google Facebook Digg Delicious MySpace Yahoo
Réponse Proposer ce sujet en actualité
 
Outils de la discussion
Publicité
'
Vieux 03/12/2010, 11h35   #1
Nouveau Membre du Club
 
Inscription : juillet 2010
Messages : 236
Détails du profil
Informations forums :
Inscription : juillet 2010
Messages : 236
Points : 36
Points : 36
Par défaut Ne pas pouvoir modifier une cellule en fonction de la valeur d'une autre

Autre question :

Je voudrais que si "non" apparait dans B2 alors il est impossible d'inscrire quelque chose dans B3.
8e8eClo est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 03/12/2010, 12h06   #2
Membre Expert
 
Avatar de rvtoulon
 
Homme Hervé
Agent Technique
Inscription : mars 2009
Messages : 814
Détails du profil
Informations personnelles :
Nom : Homme Hervé
Âge : 36
Localisation : France, Var (Provence Alpes Côte d'Azur)

Informations professionnelles :
Activité : Agent Technique
Secteur : Santé

Informations forums :
Inscription : mars 2009
Messages : 814
Points : 1 413
Points : 1 413
Re,
je ne sais pas si c'est possible avec une formule, mais il y a une solution vba:



il faut avant tout:
  1. Sélectionner toute les cellules de la feuille
  2. faire un clic droit et choisir "Format de cellule" puis l'onglet "Protection"
  3. tu décoches vérouillée
  4. Ensuite tu sélectionnes la cellule B3 et tu répètes les opérations 2 et 3 mais cette fois Vérouillée doit être coché
  5. Ensuite tu ouvres l'éditeur VBA (ALT+F11) et dans l'explorateur de projet (petite fenêtre a gauche) tu clics 2 fois sur la feuil ou se trouve la cellule que tu veux vérouiller.
  6. et tu colles ce code :
Code :
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
Private Sub Worksheet_Change(ByVal Target As Range)
 
If Target.Address = [B2].Address Then
  If Target.Value = "non" Then
      ActiveSheet.Protect DrawingObjects:=False, Contents:=True, Scenarios:= _
        False, AllowFormattingCells:=True, AllowFormattingColumns:=True, _
        AllowFormattingRows:=True, AllowInsertingColumns:=True, AllowInsertingRows _
        :=True, AllowInsertingHyperlinks:=True, AllowDeletingColumns:=True, _
        AllowDeletingRows:=True, AllowSorting:=True, AllowFiltering:=True, _
        AllowUsingPivotTables:=True
   ElseIf Target.Value = "oui" Then
    ActiveSheet.Unprotect
   End If
 
End If
End Sub
Avec ceci si tu met "oui" en B2, B3 pas de vérouillage, si tu met "non" en B2 alors B3 sera vérouillée.


Si il existe une solution avec une formule je suis preneur.
__________________
@+

Si vous avez trouvé la solution à votre problème n'oubliez pas d'appuyer sur
Et n'oubliez pas de voter en appuyant sur si ce message a repondu à vos attentes.
Ou sur si ce n'est pas le cas
rvtoulon est actuellement connecté   Envoyer un message privé Réponse avec citation 00
Vieux 03/12/2010, 13h57   #3
Nouveau Membre du Club
 
Inscription : juillet 2010
Messages : 236
Détails du profil
Informations forums :
Inscription : juillet 2010
Messages : 236
Points : 36
Points : 36
Merci !
8e8eClo est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 03/12/2010, 17h08   #4
Responsable
Office & Excel

 
Avatar de Pierre Fauconnier
 
Homme Pierre Fauconnier
Formateur et développeur informatique indépendant
Inscription : novembre 2003
Messages : 8 198
Détails du profil
Informations personnelles :
Nom : Homme Pierre Fauconnier
Âge : 45
Localisation : Belgique

Informations professionnelles :
Activité : Formateur et développeur informatique indépendant
Secteur : Enseignement

Informations forums :
Inscription : novembre 2003
Messages : 8 198
Points : 14 422
Points : 14 422
Envoyer un message via Skype™ à Pierre Fauconnier
Salut.

Tu peux aussi utiliser la validation (Donnée > Validation)

__________________
"Plus les hommes seront éclairés, plus ils seront libres" (Voltaire)
---------------

Ma nouvelle vidéo: comparer des listes via une MFC - Mes articles sur DVP
Vous souhaitez rédiger pour DVP? Contactez-moi
Amoureux de la langue française? Venez corriger nos ressources
VBA pour Excel? Pensez D'ABORD en EXCEL avant de penser en VBA...
N'oubliez pas de VOTER (en bas à droite d'un message)

---------------
Pierre Fauconnier est déconnecté   Envoyer un message privé Réponse avec citation 30
Vieux 03/12/2010, 17h19   #5
Membre Expert
 
Avatar de rvtoulon
 
Homme Hervé
Agent Technique
Inscription : mars 2009
Messages : 814
Détails du profil
Informations personnelles :
Nom : Homme Hervé
Âge : 36
Localisation : France, Var (Provence Alpes Côte d'Azur)

Informations professionnelles :
Activité : Agent Technique
Secteur : Santé

Informations forums :
Inscription : mars 2009
Messages : 814
Points : 1 413
Points : 1 413
Bonjour, Pierre Fauconnier
Je ne savais pas que l'on pouvait utiliser la validation des données pour cela c'est plus simple.
__________________
@+

Si vous avez trouvé la solution à votre problème n'oubliez pas d'appuyer sur
Et n'oubliez pas de voter en appuyant sur si ce message a repondu à vos attentes.
Ou sur si ce n'est pas le cas
rvtoulon est actuellement connecté   Envoyer un message privé Réponse avec citation 00
Vieux 07/12/2010, 08h58   #6
Nouveau Membre du Club
 
Inscription : juillet 2010
Messages : 236
Détails du profil
Informations forums :
Inscription : juillet 2010
Messages : 236
Points : 36
Points : 36
Merci pour la solution. Cependant avec validation de données, je ne peux pas faire référence à une autre feuille.

Sinon, est-il possible (je pense) de faire ceci :
si B2=non alors B3=non sinon laisser le choix entre oui ou non (via une liste de choix).

Merci
8e8eClo est déconnecté   Envoyer un message privé Réponse avec citation 00
Réponse Proposer ce sujet en actualité Cette discussion est résolue.
Outils de la discussion



Fuseau horaire GMT +2. Il est actuellement 07h54.


 
 
 
 
Partenaires

Hébergement Web