Changer de source de donner sans créer une feuille
clarinette13006
-
michel_m Messages postés 16602 Date d'inscription Statut Contributeur Dernière intervention -
michel_m Messages postés 16602 Date d'inscription Statut Contributeur Dernière intervention -
Bonjour à tous,
Avant de vous solliciter j'ai passer la journée a essayé de mettre en place une macro, et avant de craquer je lance un SOS ^^
J'ai un doc Excel qui sert de matrice au traitement de base de données.
J'ai une feuille (DATABASE) avec ma base de données nombre de colonnes FIXE mais par contre selon les bases a traiter j'ai un nombre de ligne qui varie...
J'ai trois autres feuilles avec des TCD,
Pour éviter la manip de changer la source de données manuellement je voudrais faire une macro de changement de source mais je n'y arrive pas par moi même...
Si quelqu'un a une idée pour ecrire à la matrice de changer la source d'un tableau SANS CRÉER de nouvelle feuille et sachant que dans le debut de code jessaie de définir la dernière ligne pour que la macro prenne des lignes differentes ....
Mon début de code :
J'en demande bcp et je remercie vraiment pas avance les personnes motivés et plus expérimentées qui m'aideront :)
Avant de vous solliciter j'ai passer la journée a essayé de mettre en place une macro, et avant de craquer je lance un SOS ^^
J'ai un doc Excel qui sert de matrice au traitement de base de données.
J'ai une feuille (DATABASE) avec ma base de données nombre de colonnes FIXE mais par contre selon les bases a traiter j'ai un nombre de ligne qui varie...
J'ai trois autres feuilles avec des TCD,
Pour éviter la manip de changer la source de données manuellement je voudrais faire une macro de changement de source mais je n'y arrive pas par moi même...
Si quelqu'un a une idée pour ecrire à la matrice de changer la source d'un tableau SANS CRÉER de nouvelle feuille et sachant que dans le debut de code jessaie de définir la dernière ligne pour que la macro prenne des lignes differentes ....
Mon début de code :
Sub MAJ () 'mes déclarations Dim plage As Range Dim derlig As Long Dim Nomfeuille As String NomFeuille = "DATABASE" Derlig = Worksheets (DATABASE).Range("A" & Rows.Count) .End(Xlup) .Row Set plage = Worksheets(DATABASE) .Range(Cells(1, 1), Cells(Derlig, 17)) End Sub
J'en demande bcp et je remercie vraiment pas avance les personnes motivés et plus expérimentées qui m'aideront :)
A voir également:
- Changer de source de donner sans créer une feuille
- Changer dns - Guide
- Comment créer un groupe whatsapp - Guide
- Créer un compte google - Guide
- Créer une adresse hotmail - Guide
- Créer un lien pour partager des photos - Guide
1 réponse
Bonjour
déjà
mais je ne comprend pas ce que tu veux faire: tes sources sont chacune dans une feuille (n sources --> n feuilles) ?
Au besoin:
mettre le classeur sans données confidentielles en pièce jointe sur
https://www.cjoint.com/
puis copier l'adresse du lien et la coller dans le message de réponse
Michel
déjà
NomFeuille = "DATABASE"
Derlig = Worksheets (NomFeuille).Range("A" & Rows.Count) .End(Xlup) .Row
Set plage = Worksheets(NomFeuille .Range(Cells(1, 1), Cells(Derlig, 17))
mais je ne comprend pas ce que tu veux faire: tes sources sont chacune dans une feuille (n sources --> n feuilles) ?
Au besoin:
mettre le classeur sans données confidentielles en pièce jointe sur
https://www.cjoint.com/
puis copier l'adresse du lien et la coller dans le message de réponse
Michel