Rétablir le choix d'une liste avec une Macro

Résolu/Fermé

ThomasMexcel Messages postés 28 Date d'inscription jeudi 8 juin 2017 Statut Membre Dernière intervention 28 mars 2018 - 28 juin 2017 à 17:42
ThomasMexcel Messages postés 28 Date d'inscription jeudi 8 juin 2017 Statut Membre Dernière intervention 28 mars 2018 - 29 juin 2017 à 08:41

Bonjour,
J'ai un fichier excel avec 2 onglets (1&2). Lorsque j'arrive sur l'onglet 2, une liste déroulante dans une cellule me permet d'afficher le choix Oui ou Non (le choix de oui lance une macro mais le sujet n'est pas la).

J'aimerais faire en sorte que lorsque je retourne sur l'onglet 1, la valeur de Non se réaffiche dans la case de sélection. De cette façon, quand je reviens plus tard sur l'onglet 2, le choix par défaut est repassé à Non.

Comment faire avec une macro ? Bien sur l'objectif n'est pas de rechoisir Non manuellement avant de retourner sur l'onglet 1...

Merci de votre aide.

A voir également:

Rétablir le choix d'une liste avec une Macro
Liste déroulante de choix excel - Guide
Telecharger macro convertir chiffre en lettre excel - Télécharger - Tableur
Retablir configuration usine chromecast - Guide
Liste déroulante en cascade - Guide
Macro word - Guide

1 réponse

Réponse 1 / 1

f894009 Messages postés 17217 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 27 décembre 2024 1 712
28 juin 2017 à 17:58

Bonjour,

avec la procedure

Private Sub Workbook_SheetActivate(ByVal Sh As Object)

dans Thisworkbook ca devrait le faire

ThomasMexcel Messages postés 28 Date d'inscription jeudi 8 juin 2017 Statut Membre Dernière intervention 28 mars 2018
28 juin 2017 à 18:01

Non le choix reste sur Oui quand je reviens ...

f894009 Messages postés 17217 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 27 décembre 2024 1 712 > ThomasMexcel Messages postés 28 Date d'inscription jeudi 8 juin 2017 Statut Membre Dernière intervention 28 mars 2018
28 juin 2017 à 21:01

Re,
Il faut ajouter du code pour initialisation de la cellule de votre liste déroulante, va pas se faire huit seul

ThomasMexcel Messages postés 28 Date d'inscription jeudi 8 juin 2017 Statut Membre Dernière intervention 28 mars 2018
29 juin 2017 à 08:41

Trop fastidieux pour cette simple application. J'ai finalement réussi en faisant tout simple :
'automatisation du choix non par defaut
If [AN8] = [B42] Then
[AN8] = [B41]
End If
en utilisant les choix de la liste...

Merci pour votre aide, bonne journée

Discussions similaires

SITES MARCHANDS NON SECURISES

Sauvegegarder le document avec un nom trouvé dans ce doc

Rechercher un numéro sur liste rouge

Suppression listes déroulantes