Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Fusion BD VBA

Créer une discussion
  • Initiateur de la discussion Initiateur de la discussion titine06
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

S'inscrire
T

titine06

Guest
Bonjour,

J'ai deux bases de données qui ont la même structure, et que j'aimerai fusionner. Ces deux bases de données sont sur 2 fichiers excel différents: Alpha.xls et Beta.xls

J'aimerai que toute la feuille Beta.xls soit coller en dessous de la derniere ligne utilisée sur Alpha.xls

a savoir que les critères (colonnes de chaque BD) ne sont pas identiques.

J'aimerai que cette macro soit lancée depuis un 3 eme fichier.

Je ne connais pas assez le VBA pour faire ca, pouvez vous m'aider ?

Merci d'avance

titine
 

Pièces jointes

Trier par date Trier par votes
Re : Fusion BD VBA

Bonjour !!

Merci pour les réponses !
Bon là je suis entrain de faire n'importe quoi j'ai l'impression.... ca me copie des données à droite à gauche sans rien respecter... je comprend pas...😕

Mon but:

Il y a deux fichiers différents qui n'ont pas le meme nombre de colonne, pas le meme nombre de ligne, et pas de liens.

Feuille Beta: selectionner la ligne de la première celulle "non-vide" à la ligne de la dernière celulle "non-vide" (ca peut etre des chiffre ou des lettre)

Fichier Alpha; fueille Testalpha: Coller la selection de beta sur la ligne en dessous de la dernière ligne contenant une celulle "non-vide" (colonne A)

Code: 
Sub Macro1()
'
' Macro1 Macro
'
Dim x, y
x = Columns(2).Find("*", , xlValues, , 1, 1, 0).Row 'Première ligne colonne B
y = Columns(2).Find("*", , xlValues, , 1, 2, 0).Row 'Dernière ligne colonne B
'pour selectionner les lignes
Rows(x & ":" & y).Select
Selection.Copy
Windows("Alpha.xls").Activate
Range(x & ":" & y).Copy Sheets("Testalpha").Range("A65536").End(xlUp)(2)
End Sub
Si vous avez des idées?

merci d'avance

Titine
 
Dernière modification par un modérateur:
Vote positif 0 Vote négatif
Re : Fusion BD VBA

Bonjour,

peut être copier la plage plutôt que les lignes.... Après il faut savoir où la coller et quels sont les critères permettant de coller cette plage, déterminer la cellule à partir de laquelle le collage devra être fait....
 
Vote positif 0 Vote négatif
Re : Fusion BD VBA

Re Pierrot !

Après avoir bien méditer sur le problème et surtout grâce à votre aide,
j'ai pu arriver à mes fin comme ca. J'ai contourner le problème au lieu de m'obstiner à faire comme je le pensais, et ca marche super bien !!

Je vous remercie tous !!

Titine
 
Dernière modification par un modérateur:
Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.
Rejoins nos membres "Supporter XLD" et booste ton expérience Excel !
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

L
  • Résolu(e)
Power Query Problème de fusion de données entre deux fichiers Excel sous Power Query
Réponses
8
Affichages
1 K
chris
F
  • Question Question
XL 2016 travail sur tableau
2 3 4
Réponses
55
Affichages
2 K
finarobert
F
M
  • Question Question
Power Query Fusion Power Query
Réponses
1
Affichages
236
Cousinhub
G
  • Résolu(e)
Microsoft 365 Colorer des cellules automatiquement
Réponses
14
Affichages
799
Gaugau
G
S
  • Question Question
XL 2021 Automatisation et synthèse données
Réponses
1
Affichages
324
Dand87
D
N
  • Question Question
Microsoft 365 Calcul de prix moyen pondéré de recettes
2
Réponses
15
Affichages
841
Nino63
N
P
  • Question Question
XL 2016 VBA Appliquer un filtre sur mes données importées
Réponses
4
Affichages
683
sousou
P
  • Question Question
XL 2019 Macro VBA appliquer un filtre lors d'une importation de données
Réponses
1
Affichages
575
fanch55
P
  • Résolu(e)
XL 2021 Requête API - VBA Excel - Parse JSON
Réponses
2
Affichages
902
picc
P
T
  • Question Question
XL 2016 VBA Fusion de cellules
Réponses
6
Affichages
703
tall56
T
POWERQUERY :: Combinaison de tableaux structurés Excel pouvant être issus de répertoires différents avec des noms de tableaux structurés différents
Réponses
0
Affichages
298
oguruma
A
  • Résolu(e)
Microsoft 365 VBA_Copier coller selon des critères dans deux menus déroulants
Réponses
6
Affichages
383
Altfkat
A
POWERQUERY :: Combinaison de dossiers multiples non adjacents (non hiérarchiques) - Tables - Feuilles - Puis filtrage à l'issue de la combinaison
Réponses
1
Affichages
319
oguruma
D
  • Question Question
XL 2021 3 problèmes : Bouton VBA (fusion et suppression) & doublons
Réponses
4
Affichages
788
Dubuyz1
D
M
  • Question Question
XL 2021 Protection des onglets
Réponses
2
Affichages
414
MANU64360
M
T
  • Résolu(e)
Microsoft 365 VBA Exporter une sélection de plages nommées au format PDF
Réponses
12
Affichages
1 K
tnion
T
O
  • Question Question
XL 2019 VBA
Réponses
10
Affichages
1 K
TooFatBoy
P
  • Résolu(e)
XL 2021 Besoin d'aide pour copier/coller données de plusieurs classeurs
2
Réponses
20
Affichages
2 K
Pac41240
P
G
  • Question Question
Microsoft 365 Choix et export de données (Résolu)
Réponses
4
Affichages
964
GClaire
G
  • Question Question
Microsoft 365 VBA : copier / coller d'un onglet à l'autre en fonction d'une valeur
Réponses
8
Affichages
914
Lisette
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…