XL 2016 MISE A JOUR

[marc94600]

Bonjour
Comment puis je mettre à jour 1 tableau excel par rapport à un autre tableau (tableau 2) sans que cette mise à jour s'efface à la fermeture du dit tableau :

Tableau 1 alimenté en données
Tableau 2 tableau de référence permettant d'alimenter un autre tableau

Merci à vous

 

[sylvanu]

Bonjour Marc,
Difficile sans VBA car les formules recopieront toujours les valeurs.
Si tableau Source effacé, alors données destination = 0.
Si vous acceptez du VBA, il nous faut un petit fichier test pour savoir quoi copier où. 🙂

 

[job75]

Bonjour marc94600, sylvanu,

Fermeture du tableau ? Il s'agit d'un autre fichier ?

De toute façon avec des formules de liaison il n'y a pas de problème.

A+

 

[sylvanu]

Oups, j'ai lu si tableau 2 effacé, et non fermé.

 

[marc94600]

Bonjour Marc,
Difficile sans VBA car les formules recopieront toujours les valeurs.
Si tableau Source effacé, alors données destination = 0.
Si vous acceptez du VBA, il nous faut un petit fichier test pour savoir quoi copier où. 🙂

VOICI 2 TABLEAUX IDENTIQUES
le tableau 1 sera alimenté et pratiquement toutes les données seront à remplir de suite ou en plusieurs fois
le tableau 2 doit pouvoir se mettre à jour par rapport au tableau 1 et ce sans perdre les données dés que l'on ferme.
Merci à vous
marc

 

[job75]

Au post #1 vous dites que le tableau 1 se met à jour par rapport au tableau2.

Au post #5 vous dites le contraire !

Par ailleurs pas besoin de VBA : j'ai parlé de formules de liaison.

Cherchez un peu avec la fonction RECHERCHEV, la recherche s'effectuant à partir des Identifiants.

 

[marc94600]

Merci pour votre attention mais comme je l’ai dit.
les 2 tableau doivent être identique. Un seul tableau recevant les données. Enrevanche dès que l’on ferme le tableau les données s’efface.RECHERCHEVnest pas suffisant
Ma question avec les 2 tableaux est la bonne.

 

[job75]

les 2 tableau doivent être identique.

Toujours entièrement identiques ? Alors quel est l'intérêt d'en avoir 2 ?

 

[marc94600]

on est 2 personnes à travailler sur les tableaux et la mise à jour des données c'est pour cette raison qu'on a besoin d'un tableau qu'on alimente en permanence et un autre tableau qui sera ouvert en fonction des autres activités.

 

[job75]

A mon avis un seul fichier et tableau suffit.

 

[marc94600]

malheureusement non on a essayer mais on perd trop de temps

 

[job75]

Bon c'est stupide mais voyez les 2 fichiers .xlsm joints et cette macro dans ThisWorkbook :

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
Dim a, b, chemin$, fichier$, wb As Workbook
a = Array(Me.Path, Me.Path) '2 chemins à adapter
b = Array("TABLEAU 1 POUR VBA.xlsm", "TABLEAU 2 POUR VBA.xlsm") '2 noms à adapter
chemin = IIf(Me.Path = a(0), a(1), a(0)) & "\"
fichier = IIf(Me.Name = b(0), b(1), b(0))
If Dir(chemin & fichier) = "" Then MsgBox "'" & chemin & fichier & "' introuvable !", 48: Exit Sub
On Error Resume Next: Set wb = Workbooks(fichier): On Error GoTo 0
If Not wb Is Nothing Then wb.Close False 'fermeture si ouvert
Me.SaveCopyAs chemin & fichier
If wb Is Nothing Then Exit Sub
Application.ScreenUpdating = False
Workbooks.Open (chemin & fichier) 'réouverture
Me.Activate
End Sub

Pour tester les 2 fichiers sont à placer dans le même dossier (le bureau).

Si les dossiers sont différents adaptez l'Array a.

 

[job75]

J'ai oublié de préciser que la macro se déclenche automatiquement quand on enregistre le fichier.