@Korithov: VBA et après Matlab, je comprends mieux après avoir été voir ton profil! T'es en stage en ce moment? 30 avril 2015 à 11:24:04
Merci, mais quand j'écris la ligne 18 ( set NewBook = QuelFichier)
un message d'erreur apparait "Erreur de compilation: Attendu: fin d'instruction"
- Edité par Pierre Moutard 30 avril 2015 à 11:24:48
30 avril 2015 à 11:27:32
Tente de mettre QuelFichier entre parenthèses peut être! Sur ma version d'Excel ça fonctionne, ça dépend peut être de la version. Sinon utilises l'enregistreur de macro pendant que t'ouvres un fichier et regarde le code qu'il te donne ça peut t'aider à trouver
Edit: Si tu n'as jamais utilisé l'enregistreur voir ici. Récupèrer données d'un autre classeur. C'est un outil TRES utile en VBA qui peut te faire gagner beaucoup de temps. Mais attention il ne faut pas utiliser le code comme il te le donne mais l'adapter à ton projet. - Edité par Yru4ma 30 avril 2015 à 11:31:28
30 avril 2015 à 12:04:59
La commande ( QuelFichier) fonctionne mais pas ( set NewBook = QuelFichier)
Il doit manquer quelque chose?
- Récupérer données d un autre classeur excel vba simple
- Récupérer données d un autre classeur excel vba excel
- Récupérer données d un autre classeur excel vba pour
- Bureau maitre d école l
Récupérer Données D Un Autre Classeur Excel Vba Simple
Une question? Pas de panique, on va vous aider! 29 avril 2015 à 14:24:00
Bonjour tout le monde,
Je voudrais écrire un programme permettant de récupérer dans la feuille "collerici" un certaines cellules ("A3:C4") d'une feuille "recuperer" d'un autre classeur que l'on sélectionne préalablement. Je n'arrive pas à trouver la solution
Merci d'avance
Sub SelectFichier()
Dim QuelFichier
QuelFichier = tOpenFilename("Excel, *")
If QuelFichier <> False Then
Copie(QuelFichier)
End If
Else
MsgBox "Vous n'avez pas sélectionné de fichier"
End Sub
Sub Copie(QuelFichier)
Workbooks(QuelFichier). Récupérer données d un autre classeur excel vba simple. Activate
Sheets("recuperer")("A3:C4")
Workbooks(""). Activate
Worksheets("collerici") Destination:=Range("B5")
tCopyMode = False
- Edité par Pierre Moutard 29 avril 2015 à 16:14:04
29 avril 2015 à 16:23:42
Salut,
Ta macro te retourne une erreur? Si oui sur quelle ligne et qu'est ce qui est écrit? Je pense que le problème vient du fait que tu n'ouvres pas le classeur et donc tu ne peux pas lire les données du classeur fermé.
Récupérer Données D Un Autre Classeur Excel Vba Excel
Qui plus est selon la version d'Excel ou du système d'exploitation, les librairies peuvent changer, nuisant ainsi à la portabilité du projet. Dans ces cas, la liaison tardive ( Late Binding) s'impose de facto …
Mea Culpa F22Raptor car dans mon code du 26/7 j'ai réussi à effectuer un pont entre ces deux méthodes
avec une liaison tardive tout en ayant l'obligation d'activer la référence d'une librairie! Certainement par trop pressé, cela arrive quand on veut boucler la semaine en menant plusieurs fronts à la fois …
Conservant la problématique de ce sujet, les codes à suivre sont en liaison anticipée car la référence à activer
reste la même en version 2003 comme en 2007 d'Excel. [Résolu] Copie de cellules d'un classeur à un autre VBA par Pierre Moutard - OpenClassrooms. La liaison tardive va aussi être abordée …
◙ Premier cas: connexion ADO pour accéder à un fichier fermé (format antérieur à la version 2007)
indifféremment en version 2003 ou 2007 d'Excel (version remaniée du 26/7):
Code: ' Référence à cocher: Microsoft ActiveX Data Objects 6. 1 Library Function Actions(Rg As Range) As Currency Dim Cnx As New nnection, Rst As New cordset Application.
Récupérer Données D Un Autre Classeur Excel Vba Pour
Le classeur source contient les données, le classeur d'arrivée contient les calculs (le simulateur). J'ai créé une macro qui permet à l'utilisateur de sélectionner le cas type sur le simulateur, et je voudrais que en fonction du nom du cas type qui arrive ainsi dans ma cellule A2, les données propres à ce cas type se placent en dessous. En code ce que j'ai fait ça donne:
Avec: 01 Plaine (analyse groupe CER France 01 - Chambre Agriculture 01) => le nom du cas type sélectionné
Bovins lait: la feuille qui contient le cas-type
B3:B75, D3 75: les cellules à copier
TEST V4: le simulateur
'01 Plaine (analyse groupe CER France 01 - Chambre Agriculture 01)
If Range("A2") = "01 Plaine (analyse groupe CER France 01 - Chambre Agriculture 01)" Then
Windows("fichier "). Activate
Sheets("Bovins Lait ")
Range("B3:B75, D3 75")
Range("D3"). Récupérer données d un autre classeur excel vba pour. Activate
Windows("TEST "). Activate
Range("A3")
End If
Donc ça, ça marche très bien si les 2 classeurs sont ouverts, et je voudrais arriver à le faire avec fichier fermé.
J'essaie les parenthèses
- Edité par Pierre Moutard 30 avril 2015 à 12:12:01
30 avril 2015 à 12:40:16
Oui désolé pour le dans mon test j'avais mis wk et pas NewBook et j'ai mélangé en recopiant! Parfait si ça fonctionne, courage pour la suite du projet
10 octobre 2016 à 20:04:57
Bonsoir a vous je rencontre un problème avec mon code svp
mais il se trouve qu'au lieu de copier la valeur se trouvant dans la cellule d'origine et de la coller dans la cellule de destination la valeur qui se trouve dans la cellule de destination est la suivante: #NOM? voici mon code: Sub test() With Workbooks("")("Feuil1")("A1"). FormulaR1C1 = "='C:\Users\t_rokouadio\Documents\[Budget Opex DCIQ]SYNTHESE PAYS'! P344" = End With End Sub
svp j'ai besoin de vous c'est pour on travail
× Après avoir cliqué sur "Répondre" vous serez invité à vous connecter pour que votre message soit publié. × Attention, ce sujet est très ancien. Le déterrer n'est pas forcément approprié. Récupérer données dans un autre classeur fermé | Excel-Downloads. Nous te conseillons de créer un nouveau sujet pour poser ta question.
En effet la méthode getopenfilename permet juste de récupérer le chemin du fichier sélectionné sans l'ouvrir. "J'entends et j'oublie. Récupérer données d un autre classeur excel vba excel. Je vois et je me souviens. Je fais et je comprends. " 29 avril 2015 à 16:35:40
L'erreur retourné est "Erreur d'execution '9' L'indice n'appartient pas à la sélection" (ligne 16)
Oui je pense que c'est surement quelque chose qui manque...
Quel serait le code approprié pour ouvrir l'excel "QuelFichier" selectionné? - Edité par Pierre Moutard 29 avril 2015 à 16:38:39
29 avril 2015 à 17:13:31
Mise à jour
J'ai effectuer quelques modifications mais il y a un problème aux lignes 19 et 29
Dim nomUn As Workbook
Set nomUn = ThisWorkbook
QuelFichier
tivate
Worksheets("collerici")("B5").
Inspirez-vous sur et partagez vos coups de cœur avec @vertbaudetfr
retour 229 € 194 € Soit 35 € d'économie Dont 2, 80 € d'éco-part. mobilier
Guide d'achat Comment bien choisir son bureau et sa chaise? Bureau maitre d école auto. On vous explique tout ici! J'y vais
Ce qu'il faut savoir... Un beau bureau inspiré du mobilier d'antan avec la touche de modernité qui le fera apprécier des petits comme des grands! Pratique: ses 4 tiroirs fermés, pour camoufler les accessoires d'écolier, les classeurs, les cahiers... Poignées en chêne
3 tiroirs colonne + 1 long tiroir sous le plateau
Plateau en contreplaqué chêne
Dimensions Largeur: 1, 03 m, profondeur: 60 cm, hauteur: 75 cm
Hauteur sous plateau: 63 cm
Hauteur des pieds: 23 cm
3 tiroirs colonne: profondeur: 39 cm, Largeur: 24, 6 cm, Hauteur: 15, 4 cm / 11, 4 cm / 6, 9 cm
Dimensions tiroir sous plateau: largeur 52, 9 cm, hauteur 6, 9 cm, profondeur: 39 cm
L'info en +
A monter soi-même
Idéal pour les enfant dès l'entrée en CP
Bureau enfant MAÎTRE D'ÉCOLE en panneaux de fibres de bois, chêne et contreplaqué chêne.
Bureau Maitre D École L
Alliance de teintes élégantes et naturelles. Caisson et tiroir peint couleur caramel au lait à l'extérieur. Intérieur en bois naturel. Les pieds en hêtre du bureau et de la chaise (ainsi que le dossier) ont été poncé pour retirer l'ancien verni. Un verni mat incolore a été appliqué. Plateau... [Lire la suite] Bureau pieds compas (Vendu) 290 euros
Travailleuse abritant anciennement une machine Singer revisité en bureau. Bureau maitre d école l. Peint couleur champagne, intérieur des tiroirs gris. Bureau Baumann et chaise (Vendu) 155 euros
_____
Petit bureau et sa chaise en bois courbé Baumann. Pupitre peint en gris charbon / intérieur du pupitre en bois naturel. Bois verni teinte miel. Le plateau se surélève par un système de cales, ce qui permet d'écrire à plat. Encrier d'origine en porcelaine blanc. Estampillé Baumann sous la chaise. Convient à un enfant à partir de 4 ans. - Longueur: 60 cm
- Largeur: 44 cm
- Hauteur d'assise de la chaise:... [Lire la suite] Bureau maître d'école et sa chaise (Vendus) Bureau maître d'école restauré sur commande dans un élégant crème.
L'absence d'indication d'usures, d'accidents, de réparations ou de tout autre incident dans la fiche de description du produit n'implique nullement qu'un bien soit exempt de défaut. Bureau maître d'école vintage 1950-1960 - Design Market. AGORASTORE invite les éventuels enchérisseurs à juger par eux-mêmes, lors des expositions publiques proposées, de l'état des objets présentés à la vente aux enchères. Une question sur ce bien? Retrouvez tous les produits de la région Midi-Pyrénées, et des départements