EXCEL ref autre feuille et utilisation du IF
fouad
-
pijaku Messages postés 13513 Date d'inscription Statut Modérateur Dernière intervention -
pijaku Messages postés 13513 Date d'inscription Statut Modérateur Dernière intervention -
Bonjour,
J'ai un problème sur Excel. Je dispose d'un fichier excel avec plusieur feuilles. Je souhaite mettre dans la feuille 1 un tableau sur lequel si je viens mettre le mot chaise dans la cellur A1, le programme va aller chercher les références de ce produit qui se trouve dans la feuille3.
L'idée c'est de dire sur la feuille : si le contenu de A1 égale au contenu d'une cellule qui se trouve entre A1 et A10 dans la feuille2 alors copier dans la cellule B1 la valeur correspondant à la cellule Bi de la feuille 2.
J'espère que j'ai été assez clair.
Je vous remercie par avance de votre aide car j'ai essayé beaucoup d'alternatives mais je n'y arrive pas.
J'ai un problème sur Excel. Je dispose d'un fichier excel avec plusieur feuilles. Je souhaite mettre dans la feuille 1 un tableau sur lequel si je viens mettre le mot chaise dans la cellur A1, le programme va aller chercher les références de ce produit qui se trouve dans la feuille3.
L'idée c'est de dire sur la feuille : si le contenu de A1 égale au contenu d'une cellule qui se trouve entre A1 et A10 dans la feuille2 alors copier dans la cellule B1 la valeur correspondant à la cellule Bi de la feuille 2.
J'espère que j'ai été assez clair.
Je vous remercie par avance de votre aide car j'ai essayé beaucoup d'alternatives mais je n'y arrive pas.
A voir également:
- EXCEL ref autre feuille et utilisation du IF
- Word et excel gratuit - Guide
- Liste déroulante excel - Guide
- Télécharger gratuitement notice d'utilisation - Guide
- Feuille de pointage excel - Télécharger - Tableur
- Si et ou excel - Guide
2 réponses
Bonjour,
Par VBA?
Alors voici le code d'une macro se déclenchant sur ordre depuis la feuille "Feuil1" (ALT+F8) :
On peux aussi l'adapter pour qu'elle se déclenche automatiquement au changement de valeur dans la cellule A1. Pour cela, voir du côté de Worksheet_Change()
Par VBA?
Alors voici le code d'une macro se déclenchant sur ordre depuis la feuille "Feuil1" (ALT+F8) :
Sub cherche()
Dim Trouve As Range
Dim Valeur_cherchee As String, Valeur_trouvee As String
If Sheets("Feuil1").Range("A1").Value <> "" Then
Valeur_cherchee = Sheets("Feuil1").Range("A1").Value
With Sheets("Feuil2")
Set Trouve = .Columns(1).Cells.Find(what:=Valeur_cherchee)
If Trouve Is Nothing Then
MsgBox "Pas trouvé"
Else
Valeur_trouvee = Trouve.Offset(0, 1).Value
End If
Set Trouve = Nothing
End With
End If
Sheets("Feuil1").Range("B1").Value = Valeur_trouvee
End Sub
On peux aussi l'adapter pour qu'elle se déclenche automatiquement au changement de valeur dans la cellule A1. Pour cela, voir du côté de Worksheet_Change()
