Liaison entre deux cellules
Résolu/Fermé
A voir également:
- Liaison entre deux cellules
- Excel fusionner deux cellules - Guide
- Deux comptes whatsapp - Guide
- Itinéraire google map entre deux adresses - Guide
- Formule excel pour additionner plusieurs cellules - Guide
- Deux ecran pc - Guide
4 réponses
via55
Messages postés
14407
Date d'inscription
mercredi 16 janvier 2013
Statut
Membre
Dernière intervention
5 mai 2024
2 704
Modifié par via55 le 21/12/2013 à 21:55
Modifié par via55 le 21/12/2013 à 21:55
Bonsoir
2 possibilités :
Entrer une valeur précise dans une cellule précise déclenche par formule dans une autre cellule l' affichage de la date du jour
ou un double clic dans une cellule précise déclenche une macro en VBA qui fait afficher la date dans une autre cellule
exemple : https://www.cjoint.com/?0Lvv01Tx3A9
Cdlmnt
"L'imagination est plus importante que le savoir." A. Einstein
2 possibilités :
Entrer une valeur précise dans une cellule précise déclenche par formule dans une autre cellule l' affichage de la date du jour
ou un double clic dans une cellule précise déclenche une macro en VBA qui fait afficher la date dans une autre cellule
exemple : https://www.cjoint.com/?0Lvv01Tx3A9
Cdlmnt
"L'imagination est plus importante que le savoir." A. Einstein
C'est bon j'ai reussi merci bien via55.
Encore besoin d'aide par contre:
Comment faire pour passer a la case du dessous dès que je double clique sur ma cellule?
Encore besoin d'aide par contre:
Comment faire pour passer a la case du dessous dès que je double clique sur ma cellule?
via55
Messages postés
14407
Date d'inscription
mercredi 16 janvier 2013
Statut
Membre
Dernière intervention
5 mai 2024
2 704
22 déc. 2013 à 01:17
22 déc. 2013 à 01:17
si tu veux te positionner en B6 tu rajoutes cette ligne dans la macro juste avant le End Sub :
Range("B6").Select
Range("B6").Select
Salut via55
En faite je voudrais que quand j'appui sur mon bouton que j'ai créé j'ajoute la date en B6 puis dès que j'appui de nouveau j'ajoute la date en B7 et ainsi de suite.
Parce que la ça me fait: Range("B6").Value = Date
Range("B7").Value = Date
Alors si il faut que je mettent toutes les cases de la colonne j'ai pas fini^^
Ya pas un code pour ça?
Merci
En faite je voudrais que quand j'appui sur mon bouton que j'ai créé j'ajoute la date en B6 puis dès que j'appui de nouveau j'ajoute la date en B7 et ainsi de suite.
Parce que la ça me fait: Range("B6").Value = Date
Range("B7").Value = Date
Alors si il faut que je mettent toutes les cases de la colonne j'ai pas fini^^
Ya pas un code pour ça?
Merci
via55
Messages postés
14407
Date d'inscription
mercredi 16 janvier 2013
Statut
Membre
Dernière intervention
5 mai 2024
2 704
22 déc. 2013 à 14:36
22 déc. 2013 à 14:36
Bonjour nono
D'abord tu parles de cliquer dans une cellule maintenant de bouton, ce n'est pas pareil !
Que veux tu faire exactement ? Que chaque fois que tu clic sur le bouton la date du jour s'inscrive en colonne B en dessous de la dernière entrée ? Où doit s'inscrire la 1ere date ?
Sois clair et précis dans ta demande ou mieux post un exemple de ton fichier sur cjoint.com
D'abord tu parles de cliquer dans une cellule maintenant de bouton, ce n'est pas pareil !
Que veux tu faire exactement ? Que chaque fois que tu clic sur le bouton la date du jour s'inscrive en colonne B en dessous de la dernière entrée ? Où doit s'inscrire la 1ere date ?
Sois clair et précis dans ta demande ou mieux post un exemple de ton fichier sur cjoint.com
via55
Messages postés
14407
Date d'inscription
mercredi 16 janvier 2013
Statut
Membre
Dernière intervention
5 mai 2024
2 704
22 déc. 2013 à 16:58
22 déc. 2013 à 16:58
OK, dans ce cas remplace la macro du bouton par celle-ci :
Private Sub Intervention_Click()
dernligne = Range("B" & Rows.Count).End(xlUp).Row
Range("B" & dernligne + 1).Value = Date
End Sub
qui recherche la dernière ligne non vide de la colonne B et inscris la date du jour dans la cellule en-dessous
Cdlmnt
Private Sub Intervention_Click()
dernligne = Range("B" & Rows.Count).End(xlUp).Row
Range("B" & dernligne + 1).Value = Date
End Sub
qui recherche la dernière ligne non vide de la colonne B et inscris la date du jour dans la cellule en-dessous
Cdlmnt
Merci tu m'es d'une grande aide via55.
Autre chose je t'ai fait une petite explication avec le lien :http://cjoint.com/?3LwtQIpA7ci
Autre chose je t'ai fait une petite explication avec le lien :http://cjoint.com/?3LwtQIpA7ci
via55
Messages postés
14407
Date d'inscription
mercredi 16 janvier 2013
Statut
Membre
Dernière intervention
5 mai 2024
2 704
22 déc. 2013 à 20:25
22 déc. 2013 à 20:25
Il suffit de rechercher la derniere ligne non vide dans la colonne C
soit dans la macro changer le "B" en "C" dans la ligne :
dernligne = Range("C" & Rows.Count).End(xlUp).Row
Cdlmnt
soit dans la macro changer le "B" en "C" dans la ligne :
dernligne = Range("C" & Rows.Count).End(xlUp).Row
Cdlmnt
via55
Messages postés
14407
Date d'inscription
mercredi 16 janvier 2013
Statut
Membre
Dernière intervention
5 mai 2024
2 704
22 déc. 2013 à 22:29
22 déc. 2013 à 22:29
Pas de souci tu ne m'embêtes pas !
une fois que la date est mise dans la cellule, si tu veux être automatiquement positionnée dessus il suffit de rajouter une ligne à la macro :
Range("B" & dernligne + 1).Select
ou si tu veux être positionné directement dans la colonne suivante pour choix :
Range("C" & dernligne + 1).Select
Cdlmnt
une fois que la date est mise dans la cellule, si tu veux être automatiquement positionnée dessus il suffit de rajouter une ligne à la macro :
Range("B" & dernligne + 1).Select
ou si tu veux être positionné directement dans la colonne suivante pour choix :
Range("C" & dernligne + 1).Select
Cdlmnt
via55
Messages postés
14407
Date d'inscription
mercredi 16 janvier 2013
Statut
Membre
Dernière intervention
5 mai 2024
2 704
22 déc. 2013 à 22:48
22 déc. 2013 à 22:48
c'est une passion surtout :)
21 déc. 2013 à 22:26