Bouton Macro renvoyer dans un autre onglet sur une cellule
Résolu
Olivier
-
Olivier -
Olivier -
Bonjour,
J'ai un Excel avec 2 onglets :
- Onglet "Suivi"
- Onglet "Action"
Dans l'onglet "Action", j'aimerais placer un bouton que lorsque je clique dessus, il me renvoie dans l'onglet "Suivi", précisément sur la Cellule dans l'Onglet "Suivi" contenant le même mot que la celulle D2 dans l'onglet "Action".
En synthèse,
Dans l'onglet action, j'ai :
- Un bouton
- La Cellule D2 contenant un mot.
Quand, je clique sur le bouton, je dois être renvoyé (dans l'Onglet "Suivi"), précisément sur la cellule contenant le même mot que dans la cellule D2 de l'onglet "Action".
D'avance merci!
Olivier
J'ai un Excel avec 2 onglets :
- Onglet "Suivi"
- Onglet "Action"
Dans l'onglet "Action", j'aimerais placer un bouton que lorsque je clique dessus, il me renvoie dans l'onglet "Suivi", précisément sur la Cellule dans l'Onglet "Suivi" contenant le même mot que la celulle D2 dans l'onglet "Action".
En synthèse,
Dans l'onglet action, j'ai :
- Un bouton
- La Cellule D2 contenant un mot.
Quand, je clique sur le bouton, je dois être renvoyé (dans l'Onglet "Suivi"), précisément sur la cellule contenant le même mot que dans la cellule D2 de l'onglet "Action".
D'avance merci!
Olivier
Configuration: Windows / Chrome 94.0.4606.71
A voir également:
- Bouton Macro renvoyer dans un autre onglet sur une cellule
- Telecharger macro convertir chiffre en lettre excel - Télécharger - Tableur
- Aller à la ligne dans une cellule excel - Guide
- Comment faire une capture d'écran sur un samsung sans bouton ? - Guide
- Rouvrir un onglet fermé - Guide
- Excel cellule couleur si condition texte - Guide
2 réponses
Bonjour,
Vous connaissez la programmation VBA Excel?
Le mot en question est situe n'importe ou dans la feuille "Suivi"?
Vous connaissez la programmation VBA Excel?
Le mot en question est situe n'importe ou dans la feuille "Suivi"?
Bonjour,
comme ceci:
Voilà, à mettre dans un module et à associer à un bouton
comme ceci:
Option Explicit
Sub test()
Dim PremCell As String, mot As String
Dim Cell As Range
mot = Worksheets("Action").Range("D2").Value
Worksheets("Suivi").Activate
Set Cell = Cells.Find(mot)
If Not Cell Is Nothing Then
PremCell = Cell.Address
Range(PremCell).Select
End If
End Sub
Voilà, à mettre dans un module et à associer à un bouton
Un peu
Oui le mot en D2 de l'onglet "Action" est d'office dans l'Onglet "Suivi"