Discussion :

[NABIL74]

Salut,

Mon outil de développement est Delphi.

J'ai un fichier Excel qui contient un tableau de plus de trente pages.

j'ai besoin d'avoir la colonne 'A' dans chaque nouvelle feuille.

Comment copier la Colonne 'A' dans chaque nouvelle page(au début de chaque nouvelle page) .

je cherche une Macro qui fait cela pour l'appeler depuis mon application Delphi.

Merci

Nabil

[Marc-L]

Salut.

Peu clair …

[NABIL74]

ok,

Dans une feuille Excel, j'ai un grand tableau qui occupe une trentaines de pages.

La collone 'A' contient des infos que je voudrais copier dans dans chaque page .

exemple:
- page1: contient les infos de la collone 'A'
- page2: contient les infos de la collone 'A'
- page3: contient les infos de la collone 'A'
.
.
.

je cherche une Macro qui fait cela pour l'appeler depuis mon application Delphi.

Comment faire ça svp?

Merci.

[Marc-L]

Toujours aussi peu limpide pour moi !

Pour la source, dès le début c'est clair qu'il s'agit de la première colonne.

Pour pour la destination, là c'est le brouillard …

Cette colonne A est la même sur les 30 feuilles ?

Nouvelle page, c'est quoi, une nouvelle feuille ?

Etc ...

[NABIL74]

Salut,

Oui , Cette colonne A est la même sur les 30 feuilles, j'ai dis que je veux la copier.
Mais pas sur une autre feuille de calcul.Le but est de rester sur la même feuille mais d'aller
vers la droite en utilisant les colonnes.je ne sais pas comment t'expliquer!

Ecoute, disant que mon tableau commence de la colonne 'A' jusqu'à la colonne 'OO'. pour l'impression, c'est impossible d'imprimer ce tableau sur la même page.Alors, je veux copier la
colonne 'A' dans chaque page d'impression.

Exemple:

Sur la même feuille, disons feuille1:

- Page1 => contient les colonnes : A...F
- Page2 => contient les colonnes : A,G..M
- Page3 => contient les colonnes : A,N..M

A+

[keygen08]

Bonjour
Sous excel 2003
Fichier - Mise en page - Onglet Feuille - colonne à repeter à gauche : $A:$A

Sous excel 2010
Onglet mise en page puis pareil.

La colonne A ne sera repeter sur les autres pages que lors de l'impression.Faire un apercu avant impression pour ce rendre compte du resultat. Avec l'editeur de macro cela donne ceci.

Code :

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

1
2
3
4
5
6
7
Sub Macro1()
 
    With ActiveSheet.PageSetup
         .PrintTitleColumns = "$A:$A"
    End With
 
End Sub