Question complexe (Combox,TCD), Amateurs s'abstenir!!!

[Tatiana29]

Salut tout le monde,

Me voilà sur un nouveau projet.
J'ai un fichier avec un ou deux TCD.
chaque TCD a le même filtre principal "Nom du sportif";
je souhaiterai une combobox qui permet de choisir un nom de sportif et ensuite on clique sur un bouton et les TCD s'actualisent avec le nom du sportif.

Est ce possible,si oui je me lance comme un javelot.

Tatiana

 

[Tatiana29]

Re : Question complexe (Combox,TCD), Amateurs s'abstenir!!!

j'ai mis un fichier exemple pour montrer l'étendu de ma mission.
Une base,un onglet avec 2 tcd et l'onglet macro!
tatiana

 

[Tatiana29]

Re : Question complexe (Combox,TCD), Amateurs s'abstenir!!!

j'ai mis un fichier exemple pour montrer l'étendu de ma mission.
Une base,un onglet avec 2 tcd et l'onglet macro!
tatiana

 

[mikeo]

Re : Question complexe (Combox,TCD), Amateurs s'abstenir!!!

Bonjour,

Vu le titre, je me suis abstenu. Mais tu trouveras sûrement des pros ici.
A+

 

[laetitia90]

Re : Question complexe (Combox,TCD), Amateurs s'abstenir!!!

bonjour Tatiana ,mikeo
avec un titre pareil aucune chance que quelqu'un ou quelqu'une te repondent!!!
aucun pros sur ce forum... que des petits amateurs

 

[peshko60]

Re : Question complexe (Combox,TCD), Amateurs s'abstenir!!!

Salut,

voilà une réponse d'amateur, un pro aurait trouvé bien plus prope...mais cela fonctionne :
Private Sub CommandButton1_Click()
Sheets("TCD").Select
Range("k1").Value = ComboBox1.Value
macro
Unload Me
End Sub
sub macro ()
ActiveSheet.PivotTables("Tableau croisé dynamique6").PivotFields("nom"). _
ClearAllFilters
ActiveSheet.PivotTables("Tableau croisé dynamique6").PivotFields("nom"). _
CurrentPage = Range("k1").Value
ActiveSheet.PivotTables("Tableau croisé dynamique7").PivotFields("nom"). _
ClearAllFilters
ActiveSheet.PivotTables("Tableau croisé dynamique7").PivotFields("nom"). _
CurrentPage = Range("k1").Value

end sub

 

[peshko60]

Re : Question complexe (Combox,TCD), Amateurs s'abstenir!!!

N'empêche, c'est vrai ton titre ne prête pas à la compassion.
D'autant plus qu'en réalité le problème n'est pas complexe car un amateur (et je le sui réellement) l'a résolu avec l'enregistreur de macro.

 

[Compte Supprimé 979]

Re : Question complexe (Combox,TCD), Amateurs s'abstenir!!!

Bonjour le fil

Comme quoi une "question complexe" pour une personne, peut paraitre "simple" pour une autre et "facilement" résolu

@peshko60, je n'ai pas bien compris a quoi servait

macro
Unload Me

Mais il faut dire que je n'ai pas ouvert le fichier

A+

 

[peshko60]

Re : Question complexe (Combox,TCD), Amateurs s'abstenir!!!

Salut BrunoM45
bon bah je suis parti de son fichier dans lequel un bouton ouvrait un formulaire avec une comobox et un bouton start.
de ce qu'elle disait j'ai compris qu'en cliquant sur le bouton elle voulait la mise à jour des tcd par macro (nom macro présent dans son fichier).
donc, étant amateur j'ai appliqué bettement ce qu'elle voulait ,en mettant le code dans la macro (car sinon sa macro "macro" était vide).il est clair que je ne voulais pas chercher des solutions plus élégantes...

et oui je me suis rendu compte que j'avais oublié de copier sub et end sub, j'ai modifié le message d'origine

 

[Tatiana29]

Re : Question complexe (Combox,TCD), Amateurs s'abstenir!!!

Un grand merci à vous!
C'etait du second degrès!
je teste la solution et reviens vers vous.
Unload me permet de décharger la macro active.
Tatiana

 

[Tatiana29]

Re : Question complexe (Combox,TCD), Amateurs s'abstenir!!!

Et voilà la version finalisée et qui marche!
Merci à vous.

 

[MJ13]

Re : Question complexe (Combox,TCD), Amateurs s'abstenir!!!

Bonjour à tous

Unload me permet de décharger la macro active.

C'est plutôt pour décharger l'USF .