XL 2021 Lier deux tableaux sur deux classeurs différents

[brunocean]

Bonjour ,
comment lier les deux tableaux ?
j'ai un tableau dans le classeur TEST et le même dans le classeur résultats2 .
j'aimerais que le tableau dans resultats2 se mette à jour avec les changements sur TEST pour les cellules contenant un nombre (donc pas celles avec les %).
Ou alors si c'est plus facile l'ensemble. Merci
TEST dans le vrai classeur est en xlsm

 

[job75]

Bonjour brunocean, le forum,

Au lieu de faire de simples formules vous devez utilisez du code 😢

Le code n'est pas indispensable, on peut créer manuellement des formules de liaison, les cellules fusionnées ne gênent pas.

Cela dit c'est laborieux et il vaut mieux créer/mettre à jour les formules de liaison par macro :

Sub Mise_a_jour_des_formules_de_liaison()
Dim nomfich$, fichier$, source As Range, form$, dest As Range, col, i&, j%
nomfich = "resultats2.xlsx"
fichier = ThisWorkbook.Path & "\" & nomfich
If Dir(fichier) = "" Then MsgBox "Le fichier '" & nomfich & "' est introuvable !", 48: Exit Sub
Application.ScreenUpdating = False
ThisWorkbook.Activate
Set source = [G4]
form = "='[" & ThisWorkbook.Name & "]" & ActiveSheet.Name & "'!"
With Workbooks.Open(fichier)
    Set dest = .Sheets(1).[B88] 'modifiable
    col = Array(1, 3, 5, 6, 8, 10, 11) 'numéros des colonnes
    For i = 1 To 24
        For j = 1 To 7
            dest(i, col(j - 1)) = form & source(i, j).Address(0, 0) 'formule de liaison
        Next j
        If i Mod 2 Then dest(i, 12) = "=(RC[-9]+RC[-6])/RC[-1]"
    Next i
    .Save 'enregistrement du fichier
End With
End Sub

A+

 

[Nain porte quoi]

Le code n'est pas indispensable, on peut créer manuellement des formules de liaison, les cellules fusionnées ne gênent pas.

@job75 effectivement, il n'est pas indispensable, on aurait pu faire des formules manuellement, mais oui, les cellules fusionnées gênent car on ne peut pas recopier la formule qui serait dans la première cellule ni faire un simple collage avec liaison, il faudrait soit faire un formule complexe qui prendrait en compte les décalages dus aux fusions, soit faire chaque formule individuellement. Donc je persiste et signe : les fusion c'est MAL ! 😡😀

NB : si le code n'était pas indispensable, pourquoi c'était votre premiere intention ? 😇

 

[job75]

NB : si le code n'était pas indispensable, pourquoi c'était votre premiere intention ? 😇

Parce que je ne trouve pas qu'ici les formules de liaison soient la solution la plus simple.

 

[Nain porte quoi]

Parce que je ne trouve pas qu'ici les formules de liaison soient la solution la plus simple.

Soit c'est de la mauvaise foi soit c'est jessépakoi 😎
Votre code ne ferait il pas des formules de liaison ?

dest(i, col(j - 1)) = form & source(i, j).Address(0, 0) 'formule de liaison

Sans les fusions il n'y aurait donc eu aucune raison de faire du code, non ? 😉

 

[job75]

Soit c'est de la mauvaise foi soit c'est jessépakoi 😎

Je vous renvoie le compliment 😎

 

[job75]

Bien sûr si la rapidité avait de l'importance la palme reviendrait de loin aux formules de liaison, chez moi :

- mise à jour par formules de liaison => 0,3 milliseconde

- mise à jour par macro => 18 millisecondes.