Question d'un novice en macro excel qui vient de découvrir le site.
peut on m'aider à faire une macro qui automatiserais les opérations
suivantes :
- Lorsque je suis dans une cellule, appui sur la touche "enter" et je me
trouve dans 3 cellules sur la droite. (par exemple je saisie des données dans
la cellule A1, ensuite les prochaînes informations doivent être saisies dans
la cellule A4, l'automatisation, en appuyant sur une touche par exemple
"enter" me permettrait directement d'^tre dans la bonnecellule).
- Lorsque je fais un double clic avec la souris, déplace la valeur d'une
cellule vers une autre cellule
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Jacky
Bonjour Jack 43 Il y a bien ceci: Dans le module de la feuille (Clique droit sur l'onglet de la feuille et visualiser le code) '---------- Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Excel.Range, Cancel As Boolean) [a10] = [a1] End Sub '------------- Private Sub Worksheet_Change(ByVal Target As Excel.Range) If Target <> "" Then Target.Offset(3, 0).Select End Sub '-------------- Reste à faire les contrôles des cellules à tester.
Salutations JJ
"JACK 43" <JACK a écrit dans le message de news:
Question d'un novice en macro excel qui vient de découvrir le site.
peut on m'aider à faire une macro qui automatiserais les opérations suivantes :
- Lorsque je suis dans une cellule, appui sur la touche "enter" et je me trouve dans 3 cellules sur la droite. (par exemple je saisie des données dans
la cellule A1, ensuite les prochaînes informations doivent être saisies dans
la cellule A4, l'automatisation, en appuyant sur une touche par exemple "enter" me permettrait directement d'^tre dans la bonnecellule).
- Lorsque je fais un double clic avec la souris, déplace la valeur d'une cellule vers une autre cellule
MERCI
Bonjour Jack 43
Il y a bien ceci:
Dans le module de la feuille (Clique droit sur l'onglet de la feuille et
visualiser le code)
'----------
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Excel.Range, Cancel
As Boolean)
[a10] = [a1]
End Sub
'-------------
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Target <> "" Then Target.Offset(3, 0).Select
End Sub
'--------------
Reste à faire les contrôles des cellules à tester.
Salutations
JJ
"JACK 43" <JACK 43@discussions.microsoft.com> a écrit dans le message de
news:456A99BE-91EC-4572-8031-E0B72F2B8F6B@microsoft.com...
Question d'un novice en macro excel qui vient de découvrir le site.
peut on m'aider à faire une macro qui automatiserais les opérations
suivantes :
- Lorsque je suis dans une cellule, appui sur la touche "enter" et je me
trouve dans 3 cellules sur la droite. (par exemple je saisie des données
dans
la cellule A1, ensuite les prochaînes informations doivent être saisies
dans
la cellule A4, l'automatisation, en appuyant sur une touche par exemple
"enter" me permettrait directement d'^tre dans la bonnecellule).
- Lorsque je fais un double clic avec la souris, déplace la valeur d'une
cellule vers une autre cellule
Bonjour Jack 43 Il y a bien ceci: Dans le module de la feuille (Clique droit sur l'onglet de la feuille et visualiser le code) '---------- Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Excel.Range, Cancel As Boolean) [a10] = [a1] End Sub '------------- Private Sub Worksheet_Change(ByVal Target As Excel.Range) If Target <> "" Then Target.Offset(3, 0).Select End Sub '-------------- Reste à faire les contrôles des cellules à tester.
Salutations JJ
"JACK 43" <JACK a écrit dans le message de news:
Question d'un novice en macro excel qui vient de découvrir le site.
peut on m'aider à faire une macro qui automatiserais les opérations suivantes :
- Lorsque je suis dans une cellule, appui sur la touche "enter" et je me trouve dans 3 cellules sur la droite. (par exemple je saisie des données dans
la cellule A1, ensuite les prochaînes informations doivent être saisies dans
la cellule A4, l'automatisation, en appuyant sur une touche par exemple "enter" me permettrait directement d'^tre dans la bonnecellule).
- Lorsque je fais un double clic avec la souris, déplace la valeur d'une cellule vers une autre cellule
MERCI
Philippe.R
Bonjour, Clic droit sur l'onglet de ta feuille et choisis "Visualiser le code" tout en bas du menu Dans la feuille blanche ainsi ouverte, tu colles :
Private Sub Worksheet_Change(ByVal Target As Range) 'MPFE le 26/02/2005 'pour l'utilisation de la touche entrée du pavé numérique Application.OnKey "{Enter}", "va" 'pour l'utilisation de la touche entrée de la zone alpha Application.OnKey "~", "va" End Sub
dans la fenêtre de gauche, tu repères le nom de ton classeur, tu cliques droit dessus et tu choisis "insertion" puis "module" et tu y colles :
Sub va() 'MPFE le 26/02/2005 'descend de 3 lignes ActiveCell.Offset(3, 0).Select End Sub
-- Amicales Salutations XL 97 / 2000 / 2002 Préférez suivre facilement sur le forum : news://msnews.microsoft.com/microsoft.public.fr.excel (Voulez-vous vous abonner ? -> Oui)
"JACK 43" <JACK a écrit dans le message de news:
Question d'un novice en macro excel qui vient de découvrir le site.
peut on m'aider à faire une macro qui automatiserais les opérations suivantes :
- Lorsque je suis dans une cellule, appui sur la touche "enter" et je me trouve dans 3 cellules sur la droite. (par exemple je saisie des données dans la cellule A1, ensuite les prochaînes informations doivent être saisies dans la cellule A4, l'automatisation, en appuyant sur une touche par exemple "enter" me permettrait directement d'^tre dans la bonnecellule).
- Lorsque je fais un double clic avec la souris, déplace la valeur d'une cellule vers une autre cellule
MERCI
Bonjour,
Clic droit sur l'onglet de ta feuille et choisis "Visualiser le code" tout en bas du menu
Dans la feuille blanche ainsi ouverte, tu colles :
Private Sub Worksheet_Change(ByVal Target As Range)
'MPFE le 26/02/2005
'pour l'utilisation de la touche entrée du pavé numérique
Application.OnKey "{Enter}", "va"
'pour l'utilisation de la touche entrée de la zone alpha
Application.OnKey "~", "va"
End Sub
dans la fenêtre de gauche, tu repères le nom de ton classeur, tu cliques droit dessus et tu choisis
"insertion" puis "module" et tu y colles :
Sub va()
'MPFE le 26/02/2005
'descend de 3 lignes
ActiveCell.Offset(3, 0).Select
End Sub
--
Amicales Salutations
XL 97 / 2000 / 2002
Préférez suivre facilement sur le forum :
news://msnews.microsoft.com/microsoft.public.fr.excel
(Voulez-vous vous abonner ? -> Oui)
"JACK 43" <JACK 43@discussions.microsoft.com> a écrit dans le message de news:
456A99BE-91EC-4572-8031-E0B72F2B8F6B@microsoft.com...
Question d'un novice en macro excel qui vient de découvrir le site.
peut on m'aider à faire une macro qui automatiserais les opérations
suivantes :
- Lorsque je suis dans une cellule, appui sur la touche "enter" et je me
trouve dans 3 cellules sur la droite. (par exemple je saisie des données dans
la cellule A1, ensuite les prochaînes informations doivent être saisies dans
la cellule A4, l'automatisation, en appuyant sur une touche par exemple
"enter" me permettrait directement d'^tre dans la bonnecellule).
- Lorsque je fais un double clic avec la souris, déplace la valeur d'une
cellule vers une autre cellule
Bonjour, Clic droit sur l'onglet de ta feuille et choisis "Visualiser le code" tout en bas du menu Dans la feuille blanche ainsi ouverte, tu colles :
Private Sub Worksheet_Change(ByVal Target As Range) 'MPFE le 26/02/2005 'pour l'utilisation de la touche entrée du pavé numérique Application.OnKey "{Enter}", "va" 'pour l'utilisation de la touche entrée de la zone alpha Application.OnKey "~", "va" End Sub
dans la fenêtre de gauche, tu repères le nom de ton classeur, tu cliques droit dessus et tu choisis "insertion" puis "module" et tu y colles :
Sub va() 'MPFE le 26/02/2005 'descend de 3 lignes ActiveCell.Offset(3, 0).Select End Sub
-- Amicales Salutations XL 97 / 2000 / 2002 Préférez suivre facilement sur le forum : news://msnews.microsoft.com/microsoft.public.fr.excel (Voulez-vous vous abonner ? -> Oui)
"JACK 43" <JACK a écrit dans le message de news:
Question d'un novice en macro excel qui vient de découvrir le site.
peut on m'aider à faire une macro qui automatiserais les opérations suivantes :
- Lorsque je suis dans une cellule, appui sur la touche "enter" et je me trouve dans 3 cellules sur la droite. (par exemple je saisie des données dans la cellule A1, ensuite les prochaînes informations doivent être saisies dans la cellule A4, l'automatisation, en appuyant sur une touche par exemple "enter" me permettrait directement d'^tre dans la bonnecellule).
- Lorsque je fais un double clic avec la souris, déplace la valeur d'une cellule vers une autre cellule
