commande par touche clavier

[tany]

Bonjour à tous,

mettons dans A1 une date.
j'aimerai en appuyant sur + ou sur - au clavier que cette date change d' une journée... en VBA bien sûr
mais je ne vois pas comment m'y prendre.
Merci de vos conseils ou liens et bonne journée.

 

[MichD]

Re : commande par touche clavier

Bonjour,

Voici un fichier exemple à partir duquel tu peux t'inspirer!

 

[JBARBE]

Re : commande par touche clavier

Bonjour,

La commande + ou - ne peut se faire !!!

En revanche la commande CTRL + MAJ + G( Macro > Options )peut activer la macro suivante (très simple) dans la cellule A1 :

Sub Macro1()
Range("A1") = Range("A1") + 1
End Sub

 

[tany]

Re : commande par touche clavier

Merci à tous deux, cela me fait un bon départ.
mais puis-je abuser en posant cette question ?
si j' ai des dates dans la colonne A:A et que je sélectionne une cellule avant
d'effectuer un changement par + ou -
que deviennent les codes ?
en tous les cas merci beaucoup. Bonne semaine...

 

[MichD]

Re : commande par touche clavier

La seule section que tu dois modifier est ceci dans le module de la feuille "Feuil1"
dans le fichier exemple fourni. Seule cette ligne doit changer :
If Target.Column = 1 Then 1 pour la colonne 1 , tu peux adapter le numéro
de la colonne selon tes besoins.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Column = 1 Then
    Call Touche_Plus
    Call Touche_Moins
Else
    Call Touche_off
End If
End Sub