Forum |  HardWare.fr | News | Articles | PC | S'identifier | S'inscrire | Shop Recherche
627 connectés 

  FORUM HardWare.fr
  Programmation
  Algo

  Filtrer, copier et coller des données dans un autre classeur

 


 Mot :   Pseudo :  
 
Bas de page
Auteur Sujet :

Filtrer, copier et coller des données dans un autre classeur

n°1624589
Papillon34
Posté le 16-10-2007 à 12:07:33  profilanswer
 

Bonjour tout le monde,
 
je me permets à faire appel à vos connaissances car ça fais deux semaines que je cherche mais je ne trouve pas la solution. :pfff: (Je suis débutane!!!)
 
Je souhaite en faite créer un bouton sur un dossier x qui lorsque j'appuie dessus va
1. ouvrir le dossier Y
2. Filtrer les données par exemple tous les comptes commençant par 706
3. Copier toutes les lignes où il y a des données (qui vont varier d'une année sur l'autre)
4. Revenir sur le dossier x
5. Copier les données sur ma feuille excel sur la colonne A à la ligne 17 par exemple
 
Voici la macro que j'ai réalisé grâce à l'enregistreur mais ça ne fonctionne pas!!!
 

Code :
  1. Sub Macro1()
  2. '
  3. ' Macro1 Macro
  4. ' Macro enregistrée le 09/10/2007
  5.     Windows("Balance holding.xls" ).Activate
  6.     ActiveSheet.Range("A1" ).AutoFilter , Field:=1, Criteria1:="<70601000>", VisibleDropDown:=False
  7.     Dim i As Integer
  8.     i = 1
  9.     While Cells(i, 1) <> "" '1 représente ici la colonne
  10.     Cells(i, 1).Copy
  11.    
  12.     Windows("Ventilation des charges.xls" ).Activate
  13.     Feuil3.Range("A12:c12" ).PasteSpecial
  14.     Operation = xlPasteSpecialOperationAdd
  15.    
  16. Wend
  17. End Sub


 
En vous remerciant par avance!!!

mood
Publicité
Posté le 16-10-2007 à 12:07:33  profilanswer
 

n°1624628
Profil sup​primé
Posté le 16-10-2007 à 12:44:24  answer
 

A tu développé un procédure de suivi d'exécution ?

n°1624637
Profil sup​primé
Posté le 16-10-2007 à 12:51:18  answer
 

A, woai, débutante, j'avais oublié,  
 
Non, la réponse c'est que la bonne section c'est probablement aide au devoir !
 
SI non, c'est quoi qui cloche ?
 
Mais moi perso je répondrais pas plus, je n'ai pas les spécificités requises.

n°1624669
Papillon34
Posté le 16-10-2007 à 13:42:50  profilanswer
 

Salut jovalise,
 
en faite c lors du copier que ça ne fonctionne pas! Ca copie la ligne où il y a mais flèche pour le filtre et non les données!
 
et je ne sais pas qu'est qu'une procédure de suivi d'exécution! Débutante...

n°1624682
Profil sup​primé
Posté le 16-10-2007 à 14:04:56  answer
 

Ben, c'est bien, t'as plus qu'à apprendre l'info

n°1624698
Papillon34
Posté le 16-10-2007 à 14:17:49  profilanswer
 

Je ne dois pas apprendre l'info je me débrouille mais il y a certains terme que je connais pas! C'estpour ca que je m'adresse à vous!

n°1624710
Profil sup​primé
Posté le 16-10-2007 à 14:25:24  answer
 

Et Microsoft ils disent quoi ?

n°1624718
Papillon34
Posté le 16-10-2007 à 14:28:52  profilanswer
 

J'ai regardé l'aide de microsoft si tu ve savoir!

n°1624724
Profil sup​primé
Posté le 16-10-2007 à 14:37:35  answer
 

Appelles les et demandes leur la correction de ton programme.
Tu leur dis que tu as suivi la procédure d'enregistrement et que ça ne fonctionne pas.

n°1624804
Papillon34
Posté le 16-10-2007 à 15:57:58  profilanswer
 

C'est bon j'ai trouvé la solution donc pour les autres voici les algo :
 

Code :
  1. Sub Macro1()
  2.   Windows("Balance holding.xls" ).Activate
  3.     Sheets("Feuil1" ).Select
  4.     Selection.AutoFilter Field:=1, Criteria1:="=70601000", Operator:=xlAnd
  5.     Cells(1, 1).Select
  6.     Range(Selection, Selection.End(xlToRight)).Select
  7.     Range(Selection, Selection.End(xlDown)).Select
  8.     Selection.Copy
  9.     Windows("Ventilation des charges.xls" ).Activate
  10.     Feuil1.Range("A12:A12" ).PasteSpecial
  11.     Operation = xlPasteSpecialOperationNone
  12. End Sub


Aller à :
Ajouter une réponse
  FORUM HardWare.fr
  Programmation
  Algo

  Filtrer, copier et coller des données dans un autre classeur

 

Sujets relatifs
Extraire de données de fichier texte vers excel[RESOLU] Comparer 2 fichiers de données
Lire données EXIF de fichiers dans un répertoireimprimer recto tout un classeur excel
Synchroniser tables de deux bases de données en VB.NETprogrammation pour crypter des données
lancement automatique d'une macro à l'ouverture d'un classeur excelpb formulaire html recuperer données avc perl/cgi ou c++
probléme de base de données une fois pausé sur serveurPb pour trier des données .xls à l'aide d'une macro
Plus de sujets relatifs à : Filtrer, copier et coller des données dans un autre classeur


Copyright © 1997-2022 Hardware.fr SARL (Signaler un contenu illicite / Données personnelles) / Groupe LDLC / Shop HFR