Je souhaiterai faire une videothèque
Feuille1
En A le classement(1,2,3 ect....)
En B le titre du film
En C l'année de sortie
En D le genre
En F les comédiens (3 noms par film)
Comment en VBA en feuille 2 A1 en mettant 1 nom d'acteur
récupérer ses fims en colonne B
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Pascal
Bonjour Jean, Sans VBA et avec un tableau croisé dynamique, on fait de petites merveilles. Pascal
"Jean Berti" a écrit dans le message de news:
Bonsoir à tout le forum
Je souhaiterai faire une videothèque Feuille1 En A le classement(1,2,3 ect....) En B le titre du film En C l'année de sortie En D le genre En F les comédiens (3 noms par film) Comment en VBA en feuille 2 A1 en mettant 1 nom d'acteur récupérer ses fims en colonne B
Merci d'avance de vos lumières Jean
--- Antivirus avast! : message Entrant sain. Base de donnees virale (VPS) : 000724-0, 15/03/2007 Analyse le : 16/03/2007 07:32:08 avast! - copyright (c) 1988-2007 ALWIL Software. http://www.avast.com
--- Antivirus avast! : message Sortant sain. Base de donnees virale (VPS) : 000724-0, 15/03/2007 Analyse le : 16/03/2007 07:37:42 avast! - copyright (c) 1988-2007 ALWIL Software. http://www.avast.com
Bonjour Jean,
Sans VBA et avec un tableau croisé dynamique, on fait de petites merveilles.
Pascal
"Jean Berti" <jean.berti@free.fr> a écrit dans le message de news:
eEUbM53ZHHA.984@TK2MSFTNGP04.phx.gbl...
Bonsoir à tout le forum
Je souhaiterai faire une videothèque
Feuille1
En A le classement(1,2,3 ect....)
En B le titre du film
En C l'année de sortie
En D le genre
En F les comédiens (3 noms par film)
Comment en VBA en feuille 2 A1 en mettant 1 nom d'acteur
récupérer ses fims en colonne B
Merci d'avance de vos lumières
Jean
---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000724-0, 15/03/2007
Analyse le : 16/03/2007 07:32:08
avast! - copyright (c) 1988-2007 ALWIL Software.
http://www.avast.com
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000724-0, 15/03/2007
Analyse le : 16/03/2007 07:37:42
avast! - copyright (c) 1988-2007 ALWIL Software.
http://www.avast.com
Bonjour Jean, Sans VBA et avec un tableau croisé dynamique, on fait de petites merveilles. Pascal
"Jean Berti" a écrit dans le message de news:
Bonsoir à tout le forum
Je souhaiterai faire une videothèque Feuille1 En A le classement(1,2,3 ect....) En B le titre du film En C l'année de sortie En D le genre En F les comédiens (3 noms par film) Comment en VBA en feuille 2 A1 en mettant 1 nom d'acteur récupérer ses fims en colonne B
Merci d'avance de vos lumières Jean
--- Antivirus avast! : message Entrant sain. Base de donnees virale (VPS) : 000724-0, 15/03/2007 Analyse le : 16/03/2007 07:32:08 avast! - copyright (c) 1988-2007 ALWIL Software. http://www.avast.com
--- Antivirus avast! : message Sortant sain. Base de donnees virale (VPS) : 000724-0, 15/03/2007 Analyse le : 16/03/2007 07:37:42 avast! - copyright (c) 1988-2007 ALWIL Software. http://www.avast.com
JB
Bonjour,
Sub Extrait() [I2] = "*" & InputBox("Acteur?") & "*" Sheets("BD").[A1:F1000].AdvancedFilter Action:=xlFilterCopy, _ CriteriaRange:=[I1:I2], CopyToRange:=[A1:F1] End Sub
http://cjoint.com/?dqij0QHvCU
JB On 16 mar, 04:50, "Jean Berti" wrote:
Bonsoir à tout le forum
Je souhaiterai faire une videothèque Feuille1 En A le classement(1,2,3 ect....) En B le titre du film En C l'année de sortie En D le genre En F les comédiens (3 noms par film) Comment en VBA en feuille 2 A1 en mettant 1 nom d'acteur récupérer ses fims en colonne B
Merci d'avance de vos lumières Jean
Bonjour,
Sub Extrait()
[I2] = "*" & InputBox("Acteur?") & "*"
Sheets("BD").[A1:F1000].AdvancedFilter Action:=xlFilterCopy, _
CriteriaRange:=[I1:I2], CopyToRange:=[A1:F1]
End Sub
http://cjoint.com/?dqij0QHvCU
JB
On 16 mar, 04:50, "Jean Berti" <jean.be...@free.fr> wrote:
Bonsoir à tout le forum
Je souhaiterai faire une videothèque
Feuille1
En A le classement(1,2,3 ect....)
En B le titre du film
En C l'année de sortie
En D le genre
En F les comédiens (3 noms par film)
Comment en VBA en feuille 2 A1 en mettant 1 nom d'acteur
récupérer ses fims en colonne B
Sub Extrait() [I2] = "*" & InputBox("Acteur?") & "*" Sheets("BD").[A1:F1000].AdvancedFilter Action:=xlFilterCopy, _ CriteriaRange:=[I1:I2], CopyToRange:=[A1:F1] End Sub
http://cjoint.com/?dqij0QHvCU
JB On 16 mar, 04:50, "Jean Berti" wrote:
Bonsoir à tout le forum
Je souhaiterai faire une videothèque Feuille1 En A le classement(1,2,3 ect....) En B le titre du film En C l'année de sortie En D le genre En F les comédiens (3 noms par film) Comment en VBA en feuille 2 A1 en mettant 1 nom d'acteur récupérer ses fims en colonne B
Merci d'avance de vos lumières Jean
Jean Berti
Merci JB Fonctionne très bien avec acteurs, mais si je fais comédie ou 2006-----erreur Comment faire?
Merci encore Jean "JB" a écrit dans le message de news:
Bonjour,
Sub Extrait() [I2] = "*" & InputBox("Acteur?") & "*" Sheets("BD").[A1:F1000].AdvancedFilter Action:=xlFilterCopy, _ CriteriaRange:=[I1:I2], CopyToRange:=[A1:F1] End Sub
http://cjoint.com/?dqij0QHvCU
JB On 16 mar, 04:50, "Jean Berti" wrote:
Bonsoir à tout le forum
Je souhaiterai faire une videothèque Feuille1 En A le classement(1,2,3 ect....) En B le titre du film En C l'année de sortie En D le genre En F les comédiens (3 noms par film) Comment en VBA en feuille 2 A1 en mettant 1 nom d'acteur récupérer ses fims en colonne B
Merci d'avance de vos lumières Jean
Merci JB
Fonctionne très bien avec acteurs, mais si je fais comédie ou
2006-----erreur
Comment faire?
Merci encore
Jean
"JB" <boisgontier@hotmail.com> a écrit dans le message de news:
1174029012.445770.48640@o5g2000hsb.googlegroups.com...
Bonjour,
Sub Extrait()
[I2] = "*" & InputBox("Acteur?") & "*"
Sheets("BD").[A1:F1000].AdvancedFilter Action:=xlFilterCopy, _
CriteriaRange:=[I1:I2], CopyToRange:=[A1:F1]
End Sub
http://cjoint.com/?dqij0QHvCU
JB
On 16 mar, 04:50, "Jean Berti" <jean.be...@free.fr> wrote:
Bonsoir à tout le forum
Je souhaiterai faire une videothèque
Feuille1
En A le classement(1,2,3 ect....)
En B le titre du film
En C l'année de sortie
En D le genre
En F les comédiens (3 noms par film)
Comment en VBA en feuille 2 A1 en mettant 1 nom d'acteur
récupérer ses fims en colonne B
Merci JB Fonctionne très bien avec acteurs, mais si je fais comédie ou 2006-----erreur Comment faire?
Merci encore Jean "JB" a écrit dans le message de news:
Bonjour,
Sub Extrait() [I2] = "*" & InputBox("Acteur?") & "*" Sheets("BD").[A1:F1000].AdvancedFilter Action:=xlFilterCopy, _ CriteriaRange:=[I1:I2], CopyToRange:=[A1:F1] End Sub
http://cjoint.com/?dqij0QHvCU
JB On 16 mar, 04:50, "Jean Berti" wrote:
Bonsoir à tout le forum
Je souhaiterai faire une videothèque Feuille1 En A le classement(1,2,3 ect....) En B le titre du film En C l'année de sortie En D le genre En F les comédiens (3 noms par film) Comment en VBA en feuille 2 A1 en mettant 1 nom d'acteur récupérer ses fims en colonne B