XL 2013 Aide mise à jour fichier

paita · 10 Mars 2021

Bonjour

Vous allez me résoudre mon problème en 1 seconde
Mon souci :
Une base de données qui évolue chaque jour et je dois rapatrier ces données dans mon fichier "suivi" et dans les colonnes adéquates (cela va de soi) mais sans écraser les informations antérieures dans celui-ci (je renseignes des colonnes qui ne se trouve pas dans la base de données)
Je vous joins mes fichiers

Un grand et immense merci pour votre aide

danielco · 10 Mars 2021

Bonjour,

Comment déterminer qu'une ligne de la base de données ne se trouve pas dans "suivi" ?

Daniel

eastwick · 10 Mars 2021

Bonjour,

Si votre base de données écrase, elle, des données précédentes, il sera compliqué de conserver ces données dans votre suivi. L'idéal serait de cumuler les infos dans la BDD pour les retrouver dans le suivi. Néanmoins, avec la VBA, tout est possible... Hélas je ne suis pas J. Boisgontier.

paita · 10 Mars 2021

danielco à dit:
Bonjour,

Comment déterminer qu'une ligne de la base de données ne se trouve pas dans "suivi" ?

Daniel

Bonjour Daniel,
J'insère les dernières infos dans mon tableau de suivi - A l'heure actuelle je copie colle dans chaque colonne adéquate

paita · 10 Mars 2021

eastwick à dit:
Bonjour,

Si votre base de données écrase, elle, des données précédentes, il sera compliqué de conserver ces données dans votre suivi. L'idéal serait de cumuler les infos dans la BDD pour les retrouver dans le suivi. Néanmoins, avec la VBA, tout est possible... Hélas je ne suis pas J. Boisgontier.

Merci à vous d'avoir pris la peine de regarder

danielco · 10 Mars 2021

En d'autres termes, comment déterminer quelles infos sont nouvelles ?

Daniel

paita · 10 Mars 2021

danielco à dit:
En d'autres termes, comment déterminer quelles infos sont nouvelles ?

Daniel

Daniel,
Par la date

eastwick · 10 Mars 2021

Oui, il faut faire intervenir le VBA, je laisse cet exercice aux pros ! Pourtant une base de données avec la fonction DECALER est inépuisable. Il suffisait ensuite de rapatrier ces données avec une opération matricielle.

danielco · 10 Mars 2021

paita à dit:
Daniel,
Par la date

Est-ce que tu peux donner les équivalences entre les entêtes de colonne des deux fichiers ?

merci.

paita · 10 Mars 2021

eastwick à dit:
Oui, il faut faire intervenir le VBA, je laisse cet exercice aux pros ! Pourtant une base de données avec la fonction DECALER est inépuisable. Il suffisait ensuite de rapatrier ces données avec une opération matricielle.

Merci à vous mais par les fonctions matricielles c'est pas assez figées dans mon fichier

danielco à dit:
Est-ce que tu peux donner les équivalences entre les entêtes de colonne des deux fichiers ?

merci.

On peut rebaptiser les colonnes du fichier "Base" pour être en accord avec le fichier "Suivi" pas de soucis ; en fait je me repère dans le fichier Base par la 2ème colonne

danielco · 10 Mars 2021

Oui, mais pour les rebaptiser, il faut les situer, sinon, je n'aurais pas de problème !

paita · 10 Mars 2021

Daniel
Merci à toi, voilà je viens de mettre dans l'onglet Base les attributs que je copie dans l'onglet Suivi

danielco · 10 Mars 2021

Essaie :

VB:

Sub MAJ()
  Dim Ligne As Long, C As Range, Plage As Range, L As Variant
  With Workbooks("Base de données.xlsx").Sheets(1)
    Set Plage = .Range("C2", .Cells(.Rows.Count, 3).End(xlUp))
  End With
  With ThisWorkbook.Sheets(1)
    Ligne = .[A:A].Find("*", , , , xlByRows, xlPrevious).Row
    For Each C In Plage
      Debug.Print C.Value
      L = Application.Match(C, .[B:B], 0)
      If Not IsNumeric(L) Then
        Ligne = Ligne + 1
        .Cells(Ligne, 1) = C.Offset(, -1).Value
        .Cells(Ligne, 2) = C.Value
        .Cells(Ligne, 3) = C.Offset(, 1)
        .Cells(Ligne, 4) = C.Offset(, 4)
        .Cells(Ligne, 5) = C.Offset(, 5)
        .Cells(Ligne, 6) = C.Offset(, 8)
        .Cells(Ligne, 7) = C.Offset(, 11)
        .Cells(Ligne, 8) = C.Offset(, 13)
      End If
    Next C
  End With
End Sub

Daniel

danielco · 10 Mars 2021

PS. Le fichier que tu as envoyé comme "suivi" ressemble à la base de données ?

Daniel

paita · 10 Mars 2021

danielco à dit:
PS. Le fichier que tu as envoyé comme "suivi" ressemble à la base de données ?

Daniel

Re,
Oui mais avec plus de colonnes que j'actualises après une fois les paiements effectués, demain je regarde et mercis beaucoup
Coucou du matin, j'ai essayé mais rien ne se passe !

XL 2013 Aide mise à jour fichier

paita

XLDnaute Nouveau

Pièces jointes

danielco

XLDnaute Accro

eastwick

XLDnaute Accro

paita

XLDnaute Nouveau

paita

XLDnaute Nouveau

danielco

XLDnaute Accro

paita

XLDnaute Nouveau

eastwick

XLDnaute Accro

danielco

XLDnaute Accro

paita

XLDnaute Nouveau

danielco

XLDnaute Accro

paita

XLDnaute Nouveau

Pièces jointes

danielco

XLDnaute Accro

danielco

XLDnaute Accro

paita

XLDnaute Nouveau

Discussions similaires