Importation

azerty29

XLDnaute Junior
Bonjour,

J'ai un fichier qui contient une colonne avec des 1,2 ou 3 et qui fait 50 lignes environ, je voudrais ouvrir un autre fichier excel qui dès l'ouverture me donne toute les information de la ligne qui a un 1 a la colonne en question ( le 1 est obtenue par une formule)
 

Pièces jointes

  • Classeur1.xls
    23.5 KB · Affichages: 47
  • Classeur1.xls
    23.5 KB · Affichages: 53
  • Classeur1.xls
    23.5 KB · Affichages: 54

azerty29

XLDnaute Junior
Re : Importation

Je precise un peu mon probleme qui été pas bien formuler


J'ai ici deux fichier joints
Un fichier source et le fichier final, lorsque que je lance le classeurFinal , j'active les macro et il m'importe directement les donnée du ClasseurSource, si je modifie des valeurs dans le classeurSource alors quand je relancerai le ClasseurFinal, les données sont bien mise a jour
Maintenant moi je veux exactement la meme chose sauf que l'importation vers le ClasseurFinal se fasse avec les données du ClasseurSource mais seulement pour les ligne donc la colonne C est egal a 1,
Donc exactement la meme chose avec juste une condition en plus que C=1
 

Pièces jointes

  • ClasseurSource.xls
    13.5 KB · Affichages: 31
  • ClasseurFinal.xls
    23.5 KB · Affichages: 28
  • ClasseurSource.xls
    13.5 KB · Affichages: 30
  • ClasseurFinal.xls
    23.5 KB · Affichages: 26
  • ClasseurSource.xls
    13.5 KB · Affichages: 26
  • ClasseurFinal.xls
    23.5 KB · Affichages: 26

mikeo

XLDnaute Occasionnel
Re : Importation

Bonjour le Forum,

Bonjour les stagiaires. Je ne suis pas spécialiste en VBA mais je ne peux pas vous laisser sur le côté. Je vous fais quelque chose au plus simple avec un auto_open :

Private Sub auto_Open()

j = 1
With Workbooks("classeursource.xls").Sheets("Feuil1")
ligne = .Range("A65000").End(xlUp).Row
For i = 1 To ligne
If .Cells(i, 3) = 1 Then
Cells(j, 1) = .Cells(i, 1)
Cells(j, 2) = .Cells(i, 2)
Cells(j, 3) = .Cells(i, 3)

j = j + 1
End If
Next i
End With
End Sub

Bonne continuation.
 

Pièces jointes

  • ClasseurSource.xls
    30.5 KB · Affichages: 24
  • classeurfinal.xls
    32.5 KB · Affichages: 24
  • ClasseurSource.xls
    30.5 KB · Affichages: 30
  • classeurfinal.xls
    32.5 KB · Affichages: 25
  • ClasseurSource.xls
    30.5 KB · Affichages: 24
  • classeurfinal.xls
    32.5 KB · Affichages: 33

azerty29

XLDnaute Junior
Re : Importation

Bonjour,
Je te remerci mikeo, j'avais trouver une solution mais je vais peut etre utiliser egalement ton code, j'ai de nouveau un autre souci, C'est KM29 qui l'a poster ( on bosse ensemble) appeler "classer variable par onglet" poster dans la matinné, si tu as un peu de temps n'hesite pas à regarder

Merci beaucoup en tout cas !
Cordialement !!
 

Discussions similaires

Réponses
4
Affichages
210
Réponses
22
Affichages
912
Réponses
9
Affichages
252

Statistiques des forums

Discussions
312 595
Messages
2 090 103
Membres
104 378
dernier inscrit
neovo