Bouton pour déplacer les résultats de case
Syqe
-
Syqe -
Syqe -
Bonjour,
Je souhaiterais un coup de main, j'aimerais, si c'est possible avec Excel, créer un bouton qui permet de déplacer ce qui est dans certaine cases. Pour expliquer concrètement, j'ai une case (disons B2) qui est la date du dernier rendez-vous, B3 qui est la date du prochain et la colonne F qui est l'historique des rendez vous, j'aimerais, avec un bouton, que la date dans B3 aille dans la case B2 et que la date de la case B2 aille dans la colonne F, et à chaque appuis sur le bouton la cible descend(première fois F1, deuxième fois F2 etc...) afin d'avoir un historique des rendez vous. est-ce que c'est possible selon vous, j'espère avoir été assez clair et merci!
Je souhaiterais un coup de main, j'aimerais, si c'est possible avec Excel, créer un bouton qui permet de déplacer ce qui est dans certaine cases. Pour expliquer concrètement, j'ai une case (disons B2) qui est la date du dernier rendez-vous, B3 qui est la date du prochain et la colonne F qui est l'historique des rendez vous, j'aimerais, avec un bouton, que la date dans B3 aille dans la case B2 et que la date de la case B2 aille dans la colonne F, et à chaque appuis sur le bouton la cible descend(première fois F1, deuxième fois F2 etc...) afin d'avoir un historique des rendez vous. est-ce que c'est possible selon vous, j'espère avoir été assez clair et merci!
A voir également:
- Bouton pour déplacer les résultats de case
- Déplacer colonne excel - Guide
- Resultats foot - Télécharger - Vie quotidienne
- Deplacer barre de tache windows 11 - Guide
- Lexer resultats - Télécharger - Sport
- Bouton reinitialisation pc - Guide
1 réponse
Bonjour
1) Mettre un titre en F1 (la 1ere cellule de F ne doit pas être vide pour la recherche de la macro)
2) macro à associer au bouton :
Cdlmnt
Via
1) Mettre un titre en F1 (la 1ere cellule de F ne doit pas être vide pour la recherche de la macro)
2) macro à associer au bouton :
ligne = Columns(6).Find("*", , , , xlByColumns, xlPrevious).Row + 1 '1ere ligne vide en F
Range("F" & ligne) = Range("B2")
Range("B2") = Range("b3")
Range("B3") = ""
Cdlmnt
Via
Syqe
Wow merci beaucoup, ça va m'aider à faire des trucs simples pour les collègues!