macro copiercoller d'un classeur à l'autre, emplacement à définir par...

[hellle]

Bonjour à tous,

Encore merci à ce super forum d'exister, il m'a permis d'avancer beaucoup, que ce soit par consultation -très souvent- ou parfois, comme aujourd'hui, sur appel à l'aide

Voici un descriptif de ce que je voudrais faire : il s'agit d'automatiser le renvoi du nom d'une personne, d'un classeur administratif A à un classeur planning X (B, C, ou D, etc...).
En A, les deux cellules AU2 et AU3 (noms issus d'une formule) sont copiées, par un clic sur un bouton en H7 (ça c'est fait)
Ensuite, l'utilisateur après selection dans la liste de validation col K, clique sur le lien correspondant qui apparait en col L pour ouvrir le classeur B, (ça aussi c'est fait)
dans le but d'y coller les noms, possiblement sur n'importe laquelle des 13 feuilles de planning du classeur B, dont la colonne devra être determinée à chaque collage ( par message box ?) par l'utilisateur, mais toujours sur les lignes 36-37.

J'ai 3 problèmes :
1- toujours nulle en macro
2- le "coller" sur 2éme classeur ne fonctionne qu'en "coller" excel, pas avec l'enregistreur de macro, donc déja, ça commence mal
3- écrire en vba que le coller doit toujours s'effectuer en lignes 36-37
mais qu'un message box doit demander sur quelle feuille, et quelle colonne, voilà qui est bien au delà de mes capacités... si c'est possible ?

Enfin, dernière question, la sélection de la liste de validation peut-elle être prise en compte par la macro, le clic sur le bouton H7 déclenchant alors d'abord le copier, puis l'ouverture du fichier choisi ?

 

[jpb388]

Re : macro copiercoller d'un classeur à l'autre, emplacement à définir par...

Bonjour
a tester sur le vrai
a+

 

[hellle]

Re : macro copiercoller d'un classeur à l'autre, emplacement à définir par...

Bonjour, et désolée pour le délai

Merci à toi de m'aider !

Pour l'instant, la macro se lance dés que je clique sur le bouton "enregistrer", la fenetre de choix du collage s'ouvre directement, mais ensuite, elle ne colle pas la copie (si je clique sur "annuler", j'ai un débogage). Je continue les essais...

 

[jpb388]

Re : macro copiercoller d'un classeur à l'autre, emplacement à définir par...

Bonjour a tous
Pour le collage je suis étonné car il fonctionne sur l'exemple que je t'ai envoyé
par contre pour le débogage c'est normal j' ai oublié excuse me
jp

 

[hellle]

Re : macro copiercoller d'un classeur à l'autre, emplacement à définir par...

rien à faire !! je tente sur les fichiers que j'ai joint ou sur les originaux, aucun collage...
Je clique d'abord sur le lien pour ouvrir le classeur voulu, puis sur le bouton déclenchant ta macro, la fenetre de dialogue s'ouvre bien, je selectionne en B l'emplacement voulu, et hop ! je me retrouve sur le classeur A... Quand je retourne sur le planning, pas de collage effectué.

Moi pas comprendre (surtout si ça fonctionne chez toi). Y a t-il quelquechose que je n'exécute pas correctement ?

PS : tu es tout excusé ! que puis-je faire pour que l'annulation se passe bien (bouton très précieux dans mon cas, tu as super bien compris ce que je voulais)

 

[jpb388]

Re : macro copiercoller d'un classeur à l'autre, emplacement à définir par...

re
dans la fenêtre de dialogue l'adresse de la cellule apparait bien? le collage devrait se faire en ligne 36 et 37 de la colonne sélectionnée
si tu veux tu peux m'envoyer tes fichiers orignaux en enlevant toutes les données confidentiels(ceux ou tu as fait l'essai)
a+

 

[hellle]

Re : macro copiercoller d'un classeur à l'autre, emplacement à définir par...

Oui, l'adresse de la cellule apparait bien dans la fenetre, c'est juste après avoir cliqué OK que plus rien ne se passe.
Je peux te passer le classeur B au complet (le classeur A est une copie d' original), bien qu'il pése le poids d'un ane mort, mais le déroulement des opérations est exactement le même sur le classeur B amputé que j'ai joint. Si ça fonctionne chez toi, c'est que le probléme vient d'ici...
Je cherche toujours...

 

[jpb388]

Re : macro copiercoller d'un classeur à l'autre, emplacement à définir par...

Bonjour
je vous joint les deux fichiers, pour que vous puissiez comparer les deux.
j'ai profité de l'occasion pour réparer mon oubli (débogage)
envoyer quand même votre b que je regarde
a+

ps envoyer le demain vendredi car le soir ou samedi matin je m'en vais en vacances pour 10 jours

 

[hellle]

Re : macro copiercoller d'un classeur à l'autre, emplacement à définir par...

Merci beaucoup à toi-vous ,

je regarde ça tout de suite et je te-vous tiens au courant

Hélas, c'est bonnet blanc et blanc bonnet, point de collage;
je joins donc l'ane mort ! (delesté de quelques bourrelets pour le passage)

 

[jpb388]

Re : macro copiercoller d'un classeur à l'autre, emplacement à définir par...

Bonjour
on se tutoie pas de vous
verdict chez moi pas de problème donc cela vient de la manip
j'ai légèrement modifié pour éviter les confusions classeurs ( si dès fois)
remplace l'ancienne par celle ci

Sub INSCRIREPLANNING()
'
' INSCRIREPLANNING Macro
' copie du nom de l'agent sous ses deux formes
' par bouton de commande "enregistrer"
' avant clic sur lien nouveau service
Dim Fichiers, Filtre$, Planning$, Classeur$, Col%
Dim Reponse As Range
Classeur = ActiveWorkbook.Name
Filtre = "Fchiers Excel (*.xlsx;*.xlsm;*.xls),*.xlsx;*.xlsm;*.xls"
If Workbooks.Count = 1 Then
    Fichiers = Application.GetOpenFilename(Filtre, 1, "Sélection du classeur Planning")
    If Fichiers = False Then
        Exit Sub
    Else
        Workbooks.Open (Fichiers)
        Planning = ActiveWorkbook.Name
    End If
Else
    Planning = Workbooks(2).Name
End If
    Workbooks(Planning).Activate
 Set Reponse = Application.InputBox("cliquez sur une cellule de la colonne de votre choix", "Colonne", , , , , , 8)
    Col = Reponse.Column
    Workbooks(Classeur).Sheets("Feuil2").Range("AU2:AU3").Copy
    Workbooks(Planning).ActiveSheet.Cells(36, Col).PasteSpecial Paste:=xlPasteValues
    Workbooks(Classeur).Activate
End Sub

après

(ne passe pas par tes liens)
tu cliques sur le bouton recherche
la boite de dialog ouvrir s'affiche sélectionne le B
et suit la proc jusqu'au bout

et dis moi
a+

 

[hellle]

Re : macro copiercoller d'un classeur à l'autre, emplacement à définir par...

Je deviens folle, après remplacement de la macro, toujours pareil (même le débogage sur "annuler").
J'ai suivi la procédure, à part le bouton recherche (?), je suis passée par "ouvrir".

La macro est uniquement enregistrée dans un module du classeur A, nulle part ailleurs, j'ai rien oublié de ce coté ?

 

[hellle]

Re : macro copiercoller d'un classeur à l'autre, emplacement à définir par...

Alors, ça....
J'ai essayé la macro, sur les deux mêmes fichiers, sur un autre ordinateur, et là, nickel, elle fonctionne à la perfection !

Ouf, je me demandais bien ce que pouvait être cette fenetre "rechercher" dont tu me parlais (sur mon ordi, elle n'apparait jamais)

Quelqu'un a une idée ? Un de mes paramétres excel peut empecher le bon fonctionnement de la macro ?

En tous cas, merci à toi JPB, d'avoir pris sur ton temps de préparatif de vacances, qu'elles te soient ensoleillées !

PS : par contre, j'ai toujours le débogage en cliquant sur "annuler", même sur le 2éme ordi

 

[jpb388]

Re : macro copiercoller d'un classeur à l'autre, emplacement à définir par...

re
réinstalle excel
merci pour tes souhaits d'ensoleillements
a+

 

[hellle]

Re : macro copiercoller d'un classeur à l'autre, emplacement à définir par...

Bonjour,

Après avoir tout tenté (réinstallation d'excel x2, la deuxiéme fois avec suppression manuelle des restes d'excel selon la méthode microsoft),
vérifié que l'option excel "ignorer les autres applications..." était bien décochée,
essayé un grand nombre d'astuces trouvées sur le net pour les difficultés d'ouverture de fichier excel, etc....,
je reviens avec l'espoir que quelqu'un aura déjà trouvé dans le passé une solution a ce problème.

La problématique n'est pas l'ouverture de ce fichier, mais l'ouverture de la fenetre de selection de fichier windows, par cette macro ET sur ce poste de travail.
A savoir que la fenetre de selection s'ouvre parfaitement sur les deux autres postes de travail où je l'ai essayé. Je suis sous vista, comme un des deux autres postes où cela fonctionne.

En furetant sur le net, j'ai vu ce même probléme décrit deux ou trois fois, mais les posts ont été abandonnés sans réponse finale.
Je vais ouvrir un nouveau fil pour ce probléme rageant

 

[hellle]

Re : macro copiercoller d'un classeur à l'autre, emplacement à définir par...

Bonsoir,

Me voilà de retour, je voulais offrir de grandes vacances à JPB
Après avoir supprimé les filtres dans la macro, plus de souci à l'ouverture de la fenetre de selection windows (il semble que le probléme soit lié au "Workbooks.count=1" : je dois avoir les restes d'un xla mal supprimé qui traine quelquepart, pour excel, le count serait donc 2).

Hélas, dans ma joie de voir le collage se faire si bien d'un fichier à l'autre, je ne me suis pas aperçue qu'en réalité, il s'effectue toujours sur la feuille que l'on a quitté à la dernière sauvegarde du fichier B, et qui est celle considérée comme active.
Impossible donc de selectionner la feuille désirée (et ce, que ce soit avec la macro d'origine sur un autre ordi, ou avec celle sur laquelle j'ai pratiqué quelques incisions). J'ai tenté des "select", des "activate", j'ai tenté d'implanter une autre "inputbox.application" pour d'abord choisir la feuille, mais mes tentatives restent infructueuses...