CODE VBA (activer un bouton)

Version imprimable

26/11/2021, 13h23
mokh27

1 pièce(s) jointe(s)

CODE VBA (activer un bouton)

Bonjour,
Je sollicite votre aide pour faire activer le bouton "RECHERCHE" afin de trouver un article dans la colonne
"D É S I G N A T I O N" avec un code VBA.
Ci joint mon fichier.
Merci d'avance.

1 pièce(s) jointe(s)

Bonjour,

Une façon de faire est de "filtrer" le tableau par recherche du texte dans la 2e colonne:

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
Option Explicit
 
Sub Recherche()
    Dim sText As String
    ActiveSheet.ListObjects("Tableau1").Range.AutoFilter
    sText = InputBox("Texte à rechercher:", "Texte", "")
    If sText <> "" Then
        ActiveSheet.ListObjects("Tableau1").Range.AutoFilter Field:=2, Criteria1:="=*" & sText & "*"
    End If
End Sub
 
Sub VoirTout()
    ActiveSheet.ListObjects("Tableau1").Range.AutoFilter
End Sub

Cordialement.

27/11/2021, 01h11
Alex020181

1 pièce(s) jointe(s)

Bonjour Bernard,

Voici une proposition.

J'ai ajouté un formulaire de recherche avec un menu déroulant reprenant les références de la feuille stock.

Quand une désignation est choisie une msgbox t'affiche le numéro de ligne Excel où est enregistrée cette référence.

A toi ensuite de continuer pour faire ce que tu veux maintenant que ton numéro de ligne est identifié.

Teste et dis nous.
27/11/2021, 17h43
mokh27

Merci beaucoup pour votre aide; C'est ce que je cherchais !
*Mais il y a un problème :*Quand je fais une modification, je n'arrive pas à enregistrer le travail.*
27/11/2021, 18h11
Alex020181

Peux-tu être plus explicite ?

La solution donnée par Éric fonctionne bien sur mon PC.

Tu cliques sur le bouton de recherche puis tu entres ton texte.
Dans le tableau tu modifies tes données et c'est tout.

Chez moi cela fonctionne.
27/11/2021, 18h17
mokh27

Merci
C'est bon
ça marche
10/12/2021, 16h17
mokh27

1 pièce(s) jointe(s)

Je sollicite votre assistance;
En appuyant sur le bouton « RECHERCHE » je veux trouver un article se trouvant dans la colonne « Désignation » et je veux faire activer le bouton "*VOIR TOUT*"
Merci d'avance.
Pièce jointe 610016
07/01/2022, 15h58
mokh27

2 pièce(s) jointe(s)

bouton de recherhe

Salut tout le monde
Je souhaite avoir dans le classeur 1 à l’onglet « Facture » le bouton de recherche
comme celui du classeur 2 avec les memes propriétés
Merci d'avance
07/01/2022, 18h49
riton00

1 pièce(s) jointe(s)

Bonsoir,

Voir si la Pj correspond à ta demande :pc:

Slts
07/01/2022, 19h51
mokh27

Merci pour ta réponse
Mais je veux que le bouton renvoie à l'onglet "Stock"