Excel 2010 bureautique
Résolu
camilleaaa
Messages postés
51
Date d'inscription
Statut
Membre
Dernière intervention
-
camilleaaa Messages postés 51 Date d'inscription Statut Membre Dernière intervention -
camilleaaa Messages postés 51 Date d'inscription Statut Membre Dernière intervention -
Bonjour,
je veux que, quand je clique sur une cellule de excel 2010, ça me marque directement X .Est-ce que c'est possible,
S'il vous plâit quelqu'un peux m'aider?
Merci d'avance
je veux que, quand je clique sur une cellule de excel 2010, ça me marque directement X .Est-ce que c'est possible,
S'il vous plâit quelqu'un peux m'aider?
Merci d'avance
A voir également:
- Excel 2010 bureautique
- Suite bureautique - Guide
- Logiciel bureautique gratuit - Guide
- Liste déroulante excel - Guide
- Déplacer colonne excel - Guide
- Clé activation office 2010 gratuit - Télécharger - Sécurité
6 réponses
Re bonjour !
Tu ne precise pas si tu veux ca systématiquement dans toute une feuille ou si c'est sur une plage seulement
A+
Yves
Tu ne precise pas si tu veux ca systématiquement dans toute une feuille ou si c'est sur une plage seulement
A+
Yves
Salut.
Et pourquoi tu ne veux pas cliquer sur la lettre X , tout simplement ?
Parce que pour obtenir exactement ce que tu expliques, ce sera très compliqué : dans chaque cellule il faudra insérer un bouton de contrôle Activex et lui affecter une macro ... Beaucoup de complications pour pas grand-chose !
Si tu acceptes un compromis avec 2 clics au lieu d'un seul, je te suggère de sélectionner les cellules devant contenir X et d'y insérer une liste déroulante de cellule avec la seule donnée X comme source ... Pareil pour les cellules devant contenir Y. ---- Ainsi tu empêches les utilisateurs de saisir autre chose que X (ou Y) dans les cellules concernées.
Cordialement.
C'est bien, la retraite ! Surtout aux Antilles ... :-)
☻ Raymond ♂
Et pourquoi tu ne veux pas cliquer sur la lettre X , tout simplement ?
Parce que pour obtenir exactement ce que tu expliques, ce sera très compliqué : dans chaque cellule il faudra insérer un bouton de contrôle Activex et lui affecter une macro ... Beaucoup de complications pour pas grand-chose !
Si tu acceptes un compromis avec 2 clics au lieu d'un seul, je te suggère de sélectionner les cellules devant contenir X et d'y insérer une liste déroulante de cellule avec la seule donnée X comme source ... Pareil pour les cellules devant contenir Y. ---- Ainsi tu empêches les utilisateurs de saisir autre chose que X (ou Y) dans les cellules concernées.
Cordialement.
C'est bien, la retraite ! Surtout aux Antilles ... :-)
☻ Raymond ♂
Bonjour
il semble qu'un menu déroulant avec l'option X pour trois colonnes et Y pour l'autre puisse résoudre votre problème facilement sans passer par VBA, si vous ne voulez pas utiliser le clavier.
Si toutefois vous tenez à un automatisme poussé:
clic droit sur le nom de l'onglet et dans la liste sélectionnez:
Visualiser le code
et coller ce libellé
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'_localiser l'action de colonne B (>1) à D (<5) incluses
If Target.Column > 1 And Target.Column < 5 Then
ActiveCell.Value = "X"
End If
'_localiser l'action dans colonne E (=5)
If Target.Column = 5 Then
ActiveCell.Value = "Y"
End If
End Sub
Pour ajuster à votre configuration
ce code colle X si vous sélectionnez une cellule dans les colonnes B,C,D donc avec la ligne >1 and <5
et colle Y dans une cellule de la colonne 5 (E)
il suffit d'ajuster ces N° pour les aligner sur vos besoins
crdlmnt
Errare humanum est, perseverare diabolicum
il semble qu'un menu déroulant avec l'option X pour trois colonnes et Y pour l'autre puisse résoudre votre problème facilement sans passer par VBA, si vous ne voulez pas utiliser le clavier.
Si toutefois vous tenez à un automatisme poussé:
clic droit sur le nom de l'onglet et dans la liste sélectionnez:
Visualiser le code
et coller ce libellé
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'_localiser l'action de colonne B (>1) à D (<5) incluses
If Target.Column > 1 And Target.Column < 5 Then
ActiveCell.Value = "X"
End If
'_localiser l'action dans colonne E (=5)
If Target.Column = 5 Then
ActiveCell.Value = "Y"
End If
End Sub
Pour ajuster à votre configuration
ce code colle X si vous sélectionnez une cellule dans les colonnes B,C,D donc avec la ligne >1 and <5
et colle Y dans une cellule de la colonne 5 (E)
il suffit d'ajuster ces N° pour les aligner sur vos besoins
crdlmnt
Errare humanum est, perseverare diabolicum
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
Bonjour Vaucluse merci beaucoup.
et quand j'ai 6 colonnes de D à I. sur le colonne D je veux marquer c, sur le colonne E je veux marquer nc et sur les colonnes F, G , H, I je veux marquer x. j'essaie avec la même méthode mais je n'arrive pas....
et quand j'ai 6 colonnes de D à I. sur le colonne D je veux marquer c, sur le colonne E je veux marquer nc et sur les colonnes F, G , H, I je veux marquer x. j'essaie avec la même méthode mais je n'arrive pas....
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Column > 5 And Target.Column < 10 Then
ActiveCell.Value = "X"
End If
If Target.Column = 4 Then
ActiveCell.Value = "C"
End If
If Target.Column = 5 Then
ActiveCell.Value = "nc"
End If
End Sub
si vous n 'utilisez qu'une partie des lignes vous pouvez limiter ;le champ de la macro en hauteur
exemple pour ligne de 2 à 99
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Column > 5 And Target.Column < 10 And Target.Row > 1 And Target.Row < 100 Then
ActiveCell.Value = "X"
End If
If Target.Column = 4 And Target.Row > 1 And Target.Row < 100 Then
ActiveCell.Value = "C"
End If
If Target.Column = 5 And Target.Row > 1 And Target.Row < 100 Then
ActiveCell.Value = "nc"
End If
End Sub
If Target.Column > 5 And Target.Column < 10 Then
ActiveCell.Value = "X"
End If
If Target.Column = 4 Then
ActiveCell.Value = "C"
End If
If Target.Column = 5 Then
ActiveCell.Value = "nc"
End If
End Sub
si vous n 'utilisez qu'une partie des lignes vous pouvez limiter ;le champ de la macro en hauteur
exemple pour ligne de 2 à 99
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Column > 5 And Target.Column < 10 And Target.Row > 1 And Target.Row < 100 Then
ActiveCell.Value = "X"
End If
If Target.Column = 4 And Target.Row > 1 And Target.Row < 100 Then
ActiveCell.Value = "C"
End If
If Target.Column = 5 And Target.Row > 1 And Target.Row < 100 Then
ActiveCell.Value = "nc"
End If
End Sub