[Excel] Copie feuille dans classeur

babouone Messages postés 19 Statut Membre -  
babouone Messages postés 19 Statut Membre -
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.
A voir également:

5 réponses

artisous43 Messages postés 5 Statut Membre
 
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
0
néné
 
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
0
babouone Messages postés 19 Statut Membre 1
 
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.
0
néné
 
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
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
babouone Messages postés 19 Statut Membre 1
 
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.
0