Fonction recherche ou autre

Bonjour

Cela semble coincer pour la grille de polyvalence qui peut nettement s'allonger... Mais c'est sans doute le cas d'autres tableaux selon la personne

C'est bien la superposition de tableaux qui coince.

comme écrit dans mon message précédent ca c'est réglé j'ai trouvé la solution (de plus elle est en dernier sur le formulaire, alors elle peux s'allonger, mais ce ne sera pas le cas, car ça ne dépassera jamais de plus de 10 lignes)

c'est juste la macro qui bloque

RE

Arf j'ai loupé ce message

Il faudrait

If Not Intersect([Choix], Target) Is Nothing Then 
    [Tout].ListObject.QueryTable.Refresh
    [Compétences_spécialisations].ListObject.QueryTable.Refresh
    [Évènement_de_carrière].ListObject.QueryTable.Refresh
    [Suivi_formation_2].ListObject.QueryTable.Refresh
    [Grille_polyvalence_2].ListObject.QueryTable.Refresh
En if

Mais si tu as gardé les diverses requêtes dans Tout, met Tout en dernier

Et vérifie bien les noms des divers tableaux

Ca ne fonctionne pas, j'ai une erreur d'exécution.

J'ai essayé de comprendre l'erreur mais je n'ai rien compris.

image

Les noms des tableaux sont ok

image

J'ai bien gardé le tableau "tout"

RE

Cela ne vient pas de ce code à mon avis (j'ai le même qui fonctionne)

Il doit y avoir une interférence avec un autre code : essaie Débogage, compiler VBA project

Met un point d'arrêt sur la ligne if... puis change de nom : tu verra où ça coince

Ca ne fonctionne toujours pas, il n'y a plus d'interférences avec d'autres codes. Pourtant le "TOUT" fonctionne très bien si je le mets en haut et s'il est seul, par contre toutes les autres bloques.

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect([Choix], Target) Is Nothing Then
    [PC_competences].ListObject.QueryTable.Refresh
    [PC_evenements].ListObject.QueryTable.Refresh
    [PC_formations].ListObject.QueryTable.Refresh
    [PC_polyvalence].ListObject.QueryTable.Refresh
    [Tout].ListObject.QueryTable.Refresh

End If

End Sub

Bonjour

Tu as bien invalidé l'actualisation en arrière plan ?

Je peux te passer le classeur où j'ai mis tous les tableaux dans autre onglet, les uns à côté des autres pour éviter le chevauchement, et le code fonctionne...

Il me semble que oui, je vérifierai lundi, mais sinon oui je veux bien le tableau pour voir. Et si jamais je te transmettrai mon tableau pour voir.

RE

Ci-joint

4synthese3-pq.zip (490.69 Ko)

Bonjour,

C'est bon, ça fonctionne ! Quand j'ai créé les requêtes, j'avais certainement coché :

"ajouter ces données aux modèles de données"

J'ai refait les requêtes sans cocher et ça fonctionne enfin (j'ai remarqué que j'avais des données "modèles de données" quand j'ai vérifié les connexions).

Merci

Bonne journée

Merci du retour

Rechercher des sujets similaires à "fonction recherche"