High-Tech Santé Médecine Droit-Finances

Réalisation

vidéo numérique

Rechercher : dans
Par :

[Excel] Copie feuille dans classeur

Dernière réponse le 15 nov 2007 à 16:34:57 babouone, le 12 nov 2007 à 16:22:53 
 Signaler ce message aux modérateurs

Bonjour a tous.

Je viens demander un peu d'aide et vous remercié d'avance. Voila je suis tout jeune stagiaire et on m'a donné un truc a faire sous Excel. Le probleme vient que je ne touche pas au VB (oui je sais...).

Je me permet de poster car je pense qu'il suffit de quelques lignes de codes pour résoudre ce probleme:

Je dois copier une feuille (celle ci résulte d'un filtre) et la mettre dans un nouveau classeur. Apres le filtre je dois arriver a copier tout la(les) ligne(s) restante(s).


Voila je vous remercie d'avance pour votre aide et me tiens à votre disposition.

Configuration: Windows XP
Internet Explorer 6.0

Meilleures réponses pour « [Excel] Copie feuille dans classeur » dans :
Insérer une image de fond sous la grille Excel VoirVous souhaitez insérer un logo sous JPEG ou autre, sous votre grille Excel : FORMAT / FEUILLE / ARRIERE PLAN s'ouvre un panneau vous présentant vos images pour sélection.... choisissez, validez. Pour le supprimer : même procédure FORMAT /...
Posez votre question Répondre

1

artisous43, le 12 nov 2007 à 17:54:28

Bonjour,
Ouvre ton nouveau classeur sur une feuille vierge.
Ouvre le classeur que tu dois copier et copie juste les cellulles qui restent aprés avoir fait ton filtre.
Ensuite tu n'as plus qu'a coller sur la feuille de ton nouveau classeur.
Tiens moi au courant

   
Répondre à artisous43

2

néné, le 12 nov 2007 à 18:19:08

Bonjour

Voici une macro a adapter

creer avant une feuille qui se nomme "temp"


Sub filtre4()
Sheets("Temp").Columns("B:B").ClearContents 'Efface les précédente valeurs

For Each cell In ActiveSheet.AutoFilter.Range.SpecialCells(xlCellTypeVisible)
Sheets("Temp").Range("B65534").End(xlUp).Offset(1, 0) = cell
Next
Sheets("temp").Select
End Sub

   
Répondre à néné

3

babouone, le 13 nov 2007 à 09:12:56

J'ai adopté ta maccro Néné. Le copier coller marche en effet, mais je me suis rendu compte que je ne devais que copier/coller que certaine cellule de la ligne (par exemple j'ai besoin d'effectuer cette maccroi de la colonne 1 a 8). Je pense qu'il faut spécifier une limite mais je ne sais pas comment faire. Merci pour ton aide Néné.

@ Artisous43: un simple copier/coller classique ne correspond pas a ce je demande.

   
Répondre à babouone

4

néné, le 13 nov 2007 à 17:56:55

Bonjour,
Voici une autre macro

Sub copiefiltre()
Range("A1").CurrentRegion.SpecialCells(xlCellTypeVisible).Rows.Copy 'A1 a adapter
ActiveWorkbook.Sheets.Add
ActiveSheet.Name = "ftemp"
ActiveSheet.Paste
Application.CutCopyMode = False
End Sub



Utilsfr
http://utilsfr.new.fr
Applications, Utilitaires, Macros, Fonctions, Formulaires, Graphiques Excel

   
Répondre à néné

5

 babouone, le 15 nov 2007 à 16:34:57

Alors j'ai quelques nouveautés dans le sujet. Je dois copier ma feuille d'origine dans une feuille nommé "feuil1". Cette feuil1 contient deja dans la ligne "1" du contenu qu'il ne faut pas effacer. Il faudra donc copier dans la feuille d'origine la colonne B a L et à partir de la ligne "10" (inclus)dans la feuil1.

Autre petit problème, la feuille d'origine s'obtient grace a un tri. J'ai donc des données qui sont très éloigner entre eux par ligne. Il faudrait que lors de la copie ces données soit mis ligne par ligne (regroupées)

Je vous remercie encore d'avance pour votre aide apporté et me tiens a votre disposition. Des commentaires sur le code sont plusque les bienvenu pour m'aider à comprendre au mieu ce language encore obscure pour moi.

   
Répondre à babouone
Posez votre question Répondre
Ils ont besoin de votre aide