Macros

Fermé
sploiret Messages postés 3 Date d'inscription vendredi 16 octobre 2015 Statut Membre Dernière intervention 17 octobre 2015 - 17 oct. 2015 à 16:24
via55 Messages postés 14495 Date d'inscription mercredi 16 janvier 2013 Statut Membre Dernière intervention 7 novembre 2024 - 17 oct. 2015 à 20:03
Bonjour,

J'aurais besoin de plusieurs informations concernant le programme à entrer dans les macros ou les formules pour effectuer des affichages.

Déjà un aperçu de mon tableur :







1°) Dans le tableau de droite je cherche a remplacer les " 0 " par des " Entrez ici votre recherche " qui s'efface dès que l'utilisateur clique.


Comme suis :





2°) Dans les cases dessous je souhaite afficher les lignes qui répondent à la demande:


Par exemple si la personne cherche la fiche 3 :





3°) Et enfin, je voudrais avoir une saisie automatique dans les cases de sélections. Je m'explique, si la personne commence à taper le nom, les mots commençant par les lettres tapés (mais présent dans la liste) s'affiche ...

J'espère avoir été suffisamment clair, pour info les capture d'écran ne sont pas programmé ils sont juste a titre d'information pour ma demande

Bonne journée

1 réponse

via55 Messages postés 14495 Date d'inscription mercredi 16 janvier 2013 Statut Membre Dernière intervention 7 novembre 2024 2 734
17 oct. 2015 à 17:22
Re,

1) Plutôt que de rouvrir une nouvelle discussion il est plus judicieux de continuer le fil de la première déjà ouverte

2) As tu regardé l'exemple par formules que je t'ai fourni en réponse à cette 1ere discussion ?

3) On verra après pour la saisie semi automatique (pour cela voir exemple sur le site http://boisgontierjacques.free.fr/

Cdlmnt
Via
0
sploiret Messages postés 3 Date d'inscription vendredi 16 octobre 2015 Statut Membre Dernière intervention 17 octobre 2015
17 oct. 2015 à 18:51
Oui, j'ai bien regarder l'exemple, j'essaye de programmer via les macro mais " erreur 424" reviens sans arret ...

Pour info :

Sub attente()
If "F4" = "" Then
If Target.Value = "Indiquez votre recherche ici" Then Target.Value = ""
ElseIf Range("F4").Value = "" Then
Range("F4").Value = "Indiquez votre recherche ici"
End If
End Sub
0
via55 Messages postés 14495 Date d'inscription mercredi 16 janvier 2013 Statut Membre Dernière intervention 7 novembre 2024 2 734 > sploiret Messages postés 3 Date d'inscription vendredi 16 octobre 2015 Statut Membre Dernière intervention 17 octobre 2015
17 oct. 2015 à 20:03
Re

A mon avis ta macro est inutile car :
- soit il y aura dans la cellule une liste de choix (comme dans mon exemple) et il ne peut y avoir en même temps autre chose inscrit par une macro
- soit il y aura une liste de choix avec saisie semi-automatique comme tu le souhaites (voir exemple sur le site de Boisgontier , la gestion se faisant par une macro) mais là aussi on ne peux faire inscrire Indiquez votre recherche dans la même cellule

Soit tu mets "Indiquez votre recherche dans la cellule ci dessous" dans la cellule au dessus de celle de la liste de choix
Soit tu mets ton message en commentaire de la cellule qui s'affiche au survol de la souris
Ce sera plus simple et plus léger

L'important est par formules (comme dans mon, exemple) ou par macro (à composer) de faire les recherches en fonction des choix
Par formules c'est parfaitement possible de retourner les diverses réponses comme je l'ai montré dans mon exemple avec des INDEX EQUIV
Et si tu n'y arrives pas joins un exemple de ton fichier au lieu d'images qui ne sont pas d'une grande utilité pour t'aider

Cdlmnt
Via
0