CopyFromRecordset Rst
'
'... la requête...
'--- Fermeture connexion ---
Set Cn = Nothing
End Sub
06/05/2016, 09h43
#5
Passer par du OLEDB pour récupérer les données d'un autre classeur Excel, c'est un peu comme passer la le trou du cul pour opérer des amygdales. Avec des information aussi floues et peu précises, pas facile d'apporter une solution utilisable... Essaye d'adapter ça:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 Dim WSSource As Worksheet, WSDest As Worksheet
Dim LigS As Long, LigD As Long
Set WSDest = ActiveSheet
LigD = 1 + (, 1) ( xlUp)
"C:\MonRépertoire\"
Set WSSource = ActiveSheet
For LigS = 1 To (, 1) ( xlUp)
If ( LigS, 1) = "MaCondition" Then
( LigS) ( LigD)
LigD = LigD + 1
End If
Next LigS
Merci de cliquer sur pour chaque message ayant aidé puis sur pour clore cette discussion. 06/05/2016, 10h40
#6
Merci pour vos réponses. C'est vrai que c'est assez flou ce que je veux. En gros j'aimerais récupérer des informations d'un autre classeur et que sur la même ligne il y a la condition que je cherche.
- Récupérer données d un autre classeur excel vba 4
- Récupérer données d un autre classeur excel vba 1
- Récupérer données d un autre classeur excel vba part
- Porte plaques balistiques au
- Porte plaques balistiques photo
- Porte plaques balistiques du
Récupérer Données D Un Autre Classeur Excel Vba 4
Enfin de retranscrire ces informations sur mon classeur actif. EX: condition: DAF
Information à récupérer: le montant
Sur le classeur: service montant
DAF 56
DMC 345
DAF 651
ETC …
J'ai essayé de m'adapter à vos réponses, mais sans succès. Cordialement
06/05/2016, 10h50
#7
Envoyé par fab-56
En gros j'aimerais récupérer des informations d'un autre classeur et que sur la même ligne il y a la condition que je cherche. Enfin de retranscrire ces informations sur mon classeur actif. Désolé mais c'est toujours aussi flou. Si tu faisais des copies d'écran de tes données sources et du résultat que tu veux obtenir, ce serait peut-être plus clair. 06/05/2016, 11h16
#8
06/05/2016, 11h25
#9
06/05/2016, 11h56
#10
For LigS = 3 To (, 1) ( xlUp)
If ( LigS, 2) = "DAF0101" Then
( LigD, 1) = ( LigS, 4)
06/05/2016, 12h23
#11
Merci!! La fonction apparemment tourne bien mais impossible de voir les montants sur le classeur! 06/05/2016, 12h32
#12
C'est bon!! Merci beaucoup!!!! 06/05/2016, 14h19
#13
Je reviens vers vous, car j'ai constaté un problème, si je devais relancer la macro les montants déjà constatés reviennent sur les lignes plus bas.
Récupérer Données D Un Autre Classeur Excel Vba 1
#1
Bonjour,
Je n'y connais pas grand chose en VBA, je vais donc essayer d'exposer clairement mon problème:
J'ai deux fichiers excel, le premier est un fichier dont je veux extraire certaines colonnes pour les insérer dans mon second fichier. Ce premier fichier est composé de plusieurs onglets, dans chacun de ces onglets je souhaite récupérer deux colonnes. Je souhaite donc pouvoir récupérer ces valeurs automatiquement de façon à avoir uniquement 2 colonnes (les deux colonnes d'un onglet sont à la suite des deux colonnes d'un autre onglet)
J'ai déjà essayé quelques trucs mais rien de concluant. Je ne sais pas vraiment comment m'y prendre:/
Si quelqu'un à le courage de m'aider, je le remercie d'avance
#2
Re: VBA - Importation de données d'un autre classeur
Bonsoir 35niavlys,
Le mieux serait de mettre deux fichiers avec des données non confidentielles, mais représentatif de tes fichiers réels. A+
Martial
#3
Merci pour cette réponse aussi rapide. Voici le fichier à importer ci-joint avec deux feuilles mais j'en ai normalement 4.
Récupérer Données D Un Autre Classeur Excel Vba Part
Résolu /Fermé
Bonjour,
Je souhaite récupérer dans un fichier Excel des valeurs de cellules situées dans d'autres fichiers Excel. Ces fichiers sont dans des dossier différents. La cellule par contre est toujours située au même endroit (même nom d'onglet et même case). J'ai mis en case A1 le début du chemin d'accès et dans d'autres cases la partie changeante du chemin (cf. photo de l'extract:). Ayant pas mal de valeurs à récupérer ainsi (plusieurs valeurs dans plusieurs fichiers), j'aimerais avoir une formule du style: $A$1&Ai&\[nom du]10. Onglet'! $G$2. Je n'arrive pas à trouver la bonne combinaison avec les bons symboles au bon endroit. Je pense qu'il doit y avoir une solution avec des formules. J'aimerais me passer de macro pour cela. Merci d'avance pour votre aide. DjiDji59430
Messages postés
3543
Date d'inscription
samedi 19 avril 2008
Statut
Membre
Dernière intervention
24 mai 2022
532
Modifié le 8 juil. 2019 à 11:58
Bonjour à tous,
essaye:
=indirect($A$1&Ai&"\'[nom du fichier]onglet'!
#9
re kikorun
voila
("A1") = Workbooks("Fichier ")("Feuil1")("B3")
("A2") = Workbooks("Fichier ")("Feuil1")("C5")
("A3") = Workbooks("Fichier ")("Feuil1")("B10")
("A4") = Workbooks("Fichier ")("Feuil1")("D8")
End Sub
avec
Fichier = le nom du fichier (qui doit etre ouvert)
pour connaitre les noms des fichiers ouverts tels que EXCEL les connait:
sub test()
for n= 1 to Workbooks(n)
msgbox(Workbooks(n))
next n
end sub
#10
Tout simplement génial! Merci bcp. #11
Bonjour le Fil, Bonjour Jean Marie
Le sujet m'intéresse
Ta proposition m'intéresse aussi, mais quand je click sur récuperer rien qui ce passe
Quelques explications??? Merci d'avance
Cordialement
Foufoudora
#12
Oupsss! Je m'aperçois qu'il faut absolument que le fichier soit ouvert afin que les valeurs puissent être récupérées. Existerait-il un moyen de récupérer ces valeurs sans avoir besoin d'ouvrir le fichier? (je sens que ça se complique bigrement))
Merci pour votre réponse
#13
Bonjour,
Il est tout à fait possible de lire les infos classeur fermé, essaie ceci, fichier joint...
Voir la capture d'écran:
Les meilleurs outils de productivité de bureau
Kutools for Excel résout la plupart de vos problèmes et augmente votre productivité de 80%
Réutilisation: Insérer rapidement formules complexes, graphiques et tout ce que vous avez utilisé auparavant; Crypter les cellules avec mot de passe; Créer une liste de diffusion et envoyer des e-mails...
Barre Super Formula (modifiez facilement plusieurs lignes de texte et de formule); Disposition de lecture (lire et modifier facilement un grand nombre de cellules); Coller dans la plage filtrée... Fusionner les cellules / lignes / colonnes sans perdre de données; Contenu des cellules divisées; Combiner des lignes / colonnes en double... Empêcher les cellules en double; Comparer les gammes...
Sélectionnez Dupliquer ou Unique Lignes; Sélectionnez les lignes vides (toutes les cellules sont vides); Super Find et Fuzzy Find dans de nombreux classeurs; Sélection aléatoire... Copie exacte Plusieurs cellules sans changer la référence de formule; Créer automatiquement des références à plusieurs feuilles; Insérer des puces, Cases à cocher et plus encore...
Qui sommes nous? Bünkl Shop est une marque de Bünkl, constructeur d'abris de sécurité: bunker NRBC, pièce de panique, sécurisation de résidence… Au travers de notre boutique en ligne, nous mettons proposons du matériel de survie, d'autonomie et des équipements tactiques premium pour les citoyens prévoyants, les professionnels de la sécurité civile, les policiers, gendarmes, et militaires. Nous sommes fiers de vous proposer des produits de grade militaire, industriel ou professionnel.
Porte Plaques Balistiques Au
Il est aussi potentiellement possible que la plaque n'offre plus de protection si elle est grandement endommagée par les balles. Gardez à l'esprit qu'aucun gilet pare-balles ne permet autant de rester en sécurité que d'éviter les situations dangereuses et conflictuelles, ou dans le cas échéant d'au moins se réfugier derrière des structures solides.
Porte Plaques Balistiques Photo
*** La protection de niveau IIIA ***
Le niveau de protection de type IIIA est utilisé contre les calibres standard de type: 22LR, 6. 35mm, 7mm, 9mm, 38, 357Mg et 44Mg. La protection balistique de ce gilet est spécialement conçue pour une protection balistique de la cage thoracique, du cœur, des poumons, du foie, des reins et de la colonne vertébrale. Système de réglage de taille par serrage rapide par système velcro très robuste. Balistique pour les porte-plaques et les gilets de protection - Zentauron. Les avantages des Protections Balistiques
Le mot « aramide » vient de la contraction de l'anglais Aromatic polyamide. Les fibres sont obtenues par filage (étirage au travers d'une filière) à partir d'une dissolution. Les chaînes moléculaires sont fortement orientées dans le sens de l'axe de la fibre, de sorte que les forces des interactions moléculaires peuvent être exploitées pour la résistance thermique et/ou mécanique. Ce que l'on peut dire déjà, c'est que si un gilet pare-balles peut être en mesure d'arrêter un projectile, il ne pourra rien faire contre l'énergie du projectile qui sera absorbée par le corps, et qui peut être considérable suivant le calibre.
Porte Plaques Balistiques Du
Filtrer les produits
Derniers articles en stock
Article en stock, habituellement expédié sous 24h ouvrées
Réservé exclusivement aux administrations
Découvrez notre gamme de protection balistique pour force de l'ordre: gendarme, agent de police municipale et nationale. Retrouvez ici des boucliers balistique, des plaques balistique et gilet pare pour réaliser vos missions en toute sécurité. La plupart de ces produits ne sont pas disponibles à la vente directe, rapprochez vous de votre administration afin de demander un devis.
Vous trouverez ici notre gamme d'équipements de protection balistique avec lesquels vous pouvez vous protéger dans diverses situations dangereuses.