RechercheV en VBA

[bonoboas]

Bonjour population excelienne; 😀

Voici une macro que j'ai créée avec l'aide de ce forum...sauf que je suis bloqué par une ligne de code.

Composition de mon classeur :
- Une feuille devis dans laquelle je fais mon bordereau de prix
- Feuilles bibliothèques : installation, démolition, go...ces feuilles me servent à choisir les prestations que je veux...(chaque onglet possède une matrice nommée par le même nom....Jetez un oeil sur : insertion--->définir)


Fonctionnement de ma macro (macro pour faire les devis) :
Je clique sur la cellule pour insérer une prestation
Je clique sur le bouton pour lancer la macro
Et là, j'ai des onglets, avec des prestations que je choisis en cliquant dessus; et hop !!! je les insères sur mon bordereau devis...jusque la ca marche impec...

Sauf que je voudrais insérer la désignation complète qui se trouve en colonne B des
ongles bibliothèques, l'unité (colonne C); et le prix unitaire (colonne D)

La colonne A des feuilles bibliothèques c'est ce qui s'affiche dans le user form.

Je pense qu'avec une rechercheV dans la matrice de l'onglet ça devrait être possible...

Mais comment orthographier cette ligne de code pour mettre la colonne B ( et non la colonne A comme c'est sur le fichier joint), la colonne C (unité) et la colonne D des feuilles bibliothèque

Dites moi ce que vous en pensez...

A bientôt....et merci à tous pour être arrivé jusque là...

 

[Hervé]

Re : RechercheV en VBA

salut

🙂

je te montre juste pour la listbox2, je te laisse adapter pour les 3 autres.

Private Sub ListBox2_Click()
Dim c As Range
Set c = [installation].Find(ListBox2)
If Not c Is Nothing Then
    ActiveCell = c.Offset(0, 1)
    ActiveCell.Offset(0, 1) = c.Offset(0, 2)
    ActiveCell.Offset(0, 2) = c.Offset(0, 3)
End If
  Unload Me
End Sub

bye

 

[Hippolite]

Re : RechercheV en VBA

Bonjour,
Regarde "WorksheetFunction" pour utiliser les fonctions excel, en l'occurence "RechercheV"

 

[bonoboas]

Re : RechercheV en VBA

Trop fort mec....vous êtes trop fort...

 

[bonoboas]

Re : RechercheV en VBA

Merci beaucoup Hervé, avez-vous une solution pour que les filtres "1er lettre" et "contient" fonctionnent sur les autres onglets...ca ne marche que pour le premier onglet....

 

[Hervé]

Re : RechercheV en VBA

re 😀

merci de me préciser comment doivent fonctionner les deux textbox stp

a te lire

a plus

 

[bonoboas]

Re : RechercheV en VBA

Les deux textbox fonctionnent impec sur l'onglet titre...mais comment faire pour les autres ???

A plus