Bonjour à tous,
cela fait des jours que je cherche et que je ne trouve rien pour résoudre mon problème. Je ne peux joindre mon fichier car même épuré au maximum, il reste trop volumineux (1,3 Mo) et on ne peut pas joindre de zip (ce qui est bien dommage). Je vais donc tenter de décrire au mieux.
Soit mon fichier comportant :
onglet Calculs = récupération de datas sur un serveur d'entreprise et plusieurs calculs à partir de ces données
onglet BDD = liste des valeurs que l'on retrouve dans le menu déroulant présent dans l'onglet Graphs
onglet Graphs =
_ un menu déroulant en E3:ER3 (cellules fusionnées) ayant pour nom de liste =ListeSites2 provenant de l'ongolet BDD
_ plusieurs graphiques construits sur les calculs de l'onglet Calculs
_ un TCD reprenant les valeurs présentes dans l'onglet Calculs (pouvant aller jusqu'à 52 000 lignes)
Lorsque je change de nom via ce menu, le fichier récupère les nouvelles datas liées au nouveau nom, tous les calculs se font, les graphiques se mettent à jour et mon TCD également via le code ci-dessous présent dans la feuille Graphs
La taille de la police dans le menu déroulant est petite (la feuille est en Zoom 80%) et j'ai voulu mettre une ComboBox avec cellule liée = $E$3 et liste de données = ListeSites2. Et je constate deux problèmes :
_ le 1er est que depuis l'ajout de cette Combobox, je vois que les calculs se lancent 4 fois à la place d'une seule fois sans la Combobox
_ le TCD ne se met pas à jour. Je suis obligé de le faire manuellement, ce qui relance encore 3 ou 4 fois les calculs.
Pouvez vous me guider sur la manière de faire pour obtenir le résultat voulu à savoir :
_ choix du site via la Combobox
_ calculs se réalisent (le fichier est en Option de Calcul Automatique) en 1 seul fois
_ le TCD se met à jour
En espérant que vous pourrez m'aider.
Merci
cela fait des jours que je cherche et que je ne trouve rien pour résoudre mon problème. Je ne peux joindre mon fichier car même épuré au maximum, il reste trop volumineux (1,3 Mo) et on ne peut pas joindre de zip (ce qui est bien dommage). Je vais donc tenter de décrire au mieux.
Soit mon fichier comportant :
onglet Calculs = récupération de datas sur un serveur d'entreprise et plusieurs calculs à partir de ces données
onglet BDD = liste des valeurs que l'on retrouve dans le menu déroulant présent dans l'onglet Graphs
onglet Graphs =
_ un menu déroulant en E3:ER3 (cellules fusionnées) ayant pour nom de liste =ListeSites2 provenant de l'ongolet BDD
_ plusieurs graphiques construits sur les calculs de l'onglet Calculs
_ un TCD reprenant les valeurs présentes dans l'onglet Calculs (pouvant aller jusqu'à 52 000 lignes)
Lorsque je change de nom via ce menu, le fichier récupère les nouvelles datas liées au nouveau nom, tous les calculs se font, les graphiques se mettent à jour et mon TCD également via le code ci-dessous présent dans la feuille Graphs
VB:
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Not Intersect(Target, Range("E3")) Is Nothing Then
Application.EnableEvents = False
ActiveSheet.PivotTables("Tableau croisé dynamique1").RefreshTable
Application.EnableEvents = True
End If
End SubLa taille de la police dans le menu déroulant est petite (la feuille est en Zoom 80%) et j'ai voulu mettre une ComboBox avec cellule liée = $E$3 et liste de données = ListeSites2. Et je constate deux problèmes :
_ le 1er est que depuis l'ajout de cette Combobox, je vois que les calculs se lancent 4 fois à la place d'une seule fois sans la Combobox
_ le TCD ne se met pas à jour. Je suis obligé de le faire manuellement, ce qui relance encore 3 ou 4 fois les calculs.
Pouvez vous me guider sur la manière de faire pour obtenir le résultat voulu à savoir :
_ choix du site via la Combobox
_ calculs se réalisent (le fichier est en Option de Calcul Automatique) en 1 seul fois
_ le TCD se met à jour
En espérant que vous pourrez m'aider.
Merci
Dernière édition: