Discussion :

[Spydermonkey]

Bonsoir,

Pour mon travail, je dois concevoir un classeur Excel. Jusqu'ici, j'ai pu me débrouiller dans les codes mais là, je me trouve face à un problème sans solutions pour mes faibles connaissances en VBA.

Pour aller à l'essentiel, j'ai un premier onglet (Nouveau Régime) contenant plusieurs tableaux, qui sont entrecoupés par d'autres informations. Ces tableaux seront complétés par les utilisateurs qui pourront y insérer des lignes.

Ma question est de savoir comment copier ces différents tableaux, sachant que je ne connaitrai pas la place exacte des tableaux (à l'exception du premier) puisque des lignes auront pu être ajoutées...

Merci par avance pour votre aide.

[Didier Gonard]

Bonjour et bienvenue sur DVP

Attention le VBA est un langage et il ne pardonne pas les approximations, donc en prendre l'habitude dès le départ.

Un onglet ne contient rien il faut donc ici parler de feuille (conséquence immédiate si tu fais une recherche sur le forum avec onglet en mot clef, tu as peu de chances de trouver un sujet en rapport avec ta question, avec le mot feuille, il devrait y en avoir pas mal...).

Sinon, tu ne donnes pas assez de précisons pour avoir une réponse rapide correcte.

Tes différents tableaux sur la même feuilles sont-ils séparés par au moins des lignes et des colonnes vides ? c'est essentiel pour la suite de la savoir.
PS : cette notion fait appel à la notion de plage, il ne s'agit pas de ligne ou colonne vides sur le feuille entière, mais en bordure de la plage (tableau) concernée.

Sais-tu au moins l'adresse (ou le nom) d'une des cellules de chaque tableau, leurs noms etc...

PS2 : avec un peu de pratique, les termes te deviendront familiers

cordialement,

Didier

[Spydermonkey]

Bonjour Didier, et merci pour ta réponse

Je vais essayer d'être plus précise pour expliquer mon problème mais il est vrai que je ne connais presque rien en programmation...

Tout d'abord, pour répondre à tes questions, je connais le noms d'au moins une cellule de chaque tableau et les lignes les séparant sont vides.

J'avais, dans un premier temps, pensé à nommer chacun de mes tableaux et copier la plage ainsi nommée sur une cellule définie de ma deuxième feuille.
Dans mes tests, cela fonctionne avec le premier tableau seulement, puisque les cellules nommées de ma deuxième feuille sont écrasées par le tableau collé (je ne suis pas certaine d'être très claire).

Cordialement

[Didier Gonard]

Bonjour,
A partir du moment où tu as au moins une cellule nommée dans ton tableau testes la commande suivante et voies l'aide pour son utilisation.

Code :

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

Worksheets(1).range("Toto").CurrentRegion.Select

ce qui peut donner ensuite du genre (sans select ) :

Code :

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

1
2
3
4
Sub Plop()
 
Worksheets(1).Range("Toto").CurrentRegion.Copy Destination:=Worksheets(2).Range("D4")
End Sub

cordialement,

Didier

[Spydermonkey]

Encore merci pour cette réponse,

Le code fonctionne très bien.
En revanche, j'ai encore un problème concernant la destination. Elle est déterminée pour le premier tableau, par contre, le nombre de lignes de ce tableau n'étant pas déterminé, je ne sais pas quelle sera la cellule de destination de mon deuxième tableau.

Cordialement

[Didier Gonard]

là encore, on manqué de données,

tu veux copier ces tableaux venant d'une feuille sur une autre feuille ou sur différentes feuilles.

Si la copie est une solution à un manqué de place sur la feuille d'origine, une meilleure conception et des décalages peuvent âtre la solution.

Pour finir, sur le schéma sur lequel on a débuté, pour déterminer la cellule de destination de ton prochain tableau, ce n'est pas compliqué à te répondre, mais il faut savoir où le mettre par rapport au premier :

• au-dessus
• au-dessous
• à droite
• à gauche

cordialement,

Didier