FONCTION LookUp A MODIFIER

  • Initiateur de la discussion Initiateur de la discussion br44
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

B

br44

Guest
Bonjour le forum

me voilà de retour aprés quelque temps de silence .
j'ai un petit problème pour adapter une fonction .Dans la procédure qui suit je voudrait pouvoir mettre la prioritée sur un classeur est non sur une feuille puisqu'elle n'existe pas .

ma procédure :

For Each Ws In Array('Détail','Facture')
With ThisWorkbook.Sheets(Ws)
.Range('G3').Value=RefClient
NomClient.Value=MyFunctionLoolUp(.Range('C3').Value)
.Range('A4).Value=NomClient
.Range('C3').Value=Mois.Value
End With
Next Ws

Private Function MyFunctionLookUp(ByVal RefClient As String)As String
Dim Plage As Range
Dim Cell As Range

With ThisWorkbook.Sheets('RefClient')
Set Plage=.Range(.Range('A2'),.Range('A65536').End(xlUp))
End With

For Eacth Cell In Plage
If Cell=RefClient Then
MyFunctionLookUp=Cell.offset(0,1)
Exit For
End if
Next
End Fonction

Il faudrait que ja puisse mettre l'addresse suivante pour trouver la 'RefClient',puisque je n'es pas de feuille'Client'),mais un classeur

Workbooks('C.xls').Sheets('Feuil1')

je vous remercie par avance des réponses que vous pourrez me transmettre et me tient à votres disposition pour toutes infos complèmentaires .
A BIENTOT SUR LE FORUM BR44
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

  • Question Question
Microsoft 365 worksheet_change
Réponses
29
Affichages
280
  • Question Question
Microsoft 365 Export données
Réponses
4
Affichages
517
Réponses
1
Affichages
475
Réponses
2
Affichages
730
Réponses
0
Affichages
547
Réponses
3
Affichages
612
Réponses
0
Affichages
387
Retour