Discussion :

[n-a-d-ia]

Bonjour à tous,

J'ai lu cette contribution.

j'ai suivi avec attention les différents postes sur le sujet mais je n'arrive pas à l'appliquer à mon cas (techniquement pas experte!)

Voici mes deux fichiers excel que je souhaiterai regrouper en un seul: http://www.cjoint.com/c/EJAichKJTlf

Les entêtes de colonnes sont les mêmes; en revanche le nombre de ligne est différent...
D'avance merci pour vos réponses

Nadia

[Philippe Tulliez]

Bonjour Nadia,
As-tu télécharger les classeurs qui illustrent chaque #post ?
Si le nombre de colonnes l'orthographe des étiquettes de colonnes sont identiques l'appel à la procédure est très simple, il suffit de remplir les arguments obligatoires et éventuellement les optionnels tel que décrit dans le premier #post

Les arguments (ceux qui sont entre crochets sont optionnels) la valeur qui suit le d: est la valeur par défaut.
' FromSheet - obj WorkSheet (Feuille d'où viennent les données)
' TargetSheet - obj WorkSheet (Feuille cible)
' [ValueOnly] - Boolean [d:FALSE] Si TRUE copie les valeurs
' [ClearSheet]- Boolean [d:=False] si TRUE, Fait un Clear de TargetSheet (Feuille Export)
' [ShowMsg] - Boolean [d:=True] si False n'affiche pas les messages d'incohérence pour les Labels

[n-a-d-ia]

Bonjour Nadia,
As-tu télécharger les classeurs qui illustrent chaque #post ?
Si le nombre de colonnes l'orthographe des étiquettes de colonnes sont identiques l'appel à la procédure est très simple, il suffit de remplir les arguments obligatoires et éventuellement les optionnels tel que décrit dans le premier #post

Merci la réponse, mais pour moi ça parait être du charabia....je ne ne sais même plus par où commencer

[Philippe Tulliez]

Bonjour,
Bien que cela soit bien expliqué dans le classeur exemple
Exemple 1 - Exportation des feuilles nommées [Fiche-A] et [Fiche-B] vers la feuille nommée [Export] avec effacement des données au moment où l'on exporte les premières données

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
Sub ExportTableTest()
 With ThisWorkbook
  ExportTable .Worksheets("Fiche-A"), .Worksheets("Export"), ClearSheet:=True
  ExportTable .Worksheets("Fiche-B"), .Worksheets("Export")
 End With
End Sub

Exemple 2 - Exportation des mêmes données sauf que cette fois ci, on n'efface pas les données déjà présentes dans la feuille [Export]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
Sub ExportTableTest()
 With ThisWorkbook
  ExportTable .Worksheets("Fiche-A"), .Worksheets("Export")
  ExportTable .Worksheets("Fiche-B"), .Worksheets("Export")
 End With
End Sub

L'utilisation de la fonction Array dans ce dernier cas serait plus élégante.

[n-a-d-ia]

Bonjour,
Bien que cela soit bien expliqué dans le classeur exemple
Exemple 1 - Exportation des feuilles nommées [Fiche-A] et [Fiche-B] vers la feuille nommée [Export] avec effacement des données au moment où l'on exporte les premières données

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
Sub ExportTableTest()
 With ThisWorkbook
  ExportTable .Worksheets("Fiche-A"), .Worksheets("Export"), ClearSheet:=True
  ExportTable .Worksheets("Fiche-B"), .Worksheets("Export")
 End With
End Sub

Exemple 2 - Exportation des mêmes données sauf que cette fois ci, on n'efface pas les données déjà présentes dans la feuille [Export]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
Sub ExportTableTest()
 With ThisWorkbook
  ExportTable .Worksheets("Fiche-A"), .Worksheets("Export")
  ExportTable .Worksheets("Fiche-B"), .Worksheets("Export")
 End With
End Sub

L'utilisation de la fonction Array dans ce dernier cas serait plus élégante.

Merci Philippe pour vos explications; j'ai finalement laissé tomber car trop compliqué à comprendre pour moi...

Bonne journée

Nadia