> Tous les forums > Forum Bureautique
 Macro Excel Afficher message d'intervention
Ajouter un message à la discussion
Page : [1] 
Page 1 sur 1
XairteX
  Posté le 11/02/2019 @ 11:29 
Aller en bas de la page 
Nouvel astucien

Bonjour,


Je suis peu expérimenté dans la création de macro Excel et je rencontre un problème lié au collage spécial (données et format) dans une macro, pour éviter ce problème, j'ai trouvé une solution qui consiste à interrompre l'exécution d'une macro par un message demandant l'intervention de l'utilisateur pour le collage manuel du tableau.

Pourriez-vous, svp, comment programmer cet affichage afin qu'une fois que l'utilisateur à réalisé l'action, il puisse valider par un clique pour relancer la suite de la macro.

EXCEL 365 Pro
Windows 7
Chrome 71.0.3578.98

Publicité
poussebois
 Posté le 11/02/2019 à 11:46 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
  Maître astucien

Bonjour et bienvenue sur PC Astuces ,

Si ce n'est pas indiscret, peux-tu joindre ton fichier (avec la macro) via www.cjoint.com.

Indique aussi ce que tu veux coller exactement quelles cellules, où et comment :

@ +

XairteX
 Posté le 11/02/2019 à 12:38 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Nouvel astucien

Bonjour Poussebois,

Tout d'abord merci de t'intéresser à mon problème. Pour répondre à ta demande tu trouveras ci-joint une partie de mon fichier à titre d'exemple.

Pour résumer la problématique originale, j'ai créé plusieurs macros via le menu "enregistrer une macro" puis ensuite, j'ai généré une macro principale qui enchaîne ces différentes macros préalablement créées.

Là où j'ai un souci, c'est que pour créer la macro de collage spécial (Valeurs et Format uniquement) tout s'enregistre et se réalise très bien, mais lorsque j'exécute cette même macro (Macro2) elle bug au niveau du collage. Malgré de multitudes recherches sur le web et différents essais, je ne suis pas arrivé à trouver la solution.

J'ai donc décidé de passer par une solution intermédiaire, qui serait de réaliser la macro principale jusqu'à la copie du tableau source, puis de faire apparaître un message demandant à l'utilisateur de faire le collage spécial manuellement, à savoir uniquement les valeurs et le format. Une fois l'opération réalisée, je souhaiterais faire apparaître un autre message pour qu'une fois le collage réalisé, l'utilisateur cliquerait afin de continuer l'exécution de la macro principale.

Détail des 3 macros jointes:

Macro1= Copie du tableau source.

Macro2= Collage automatique des valeurs et du format (c'est la macro qui bug ! ).

Macro3= Alternative, Apparition d'un message demandant de faire le collage manuellement.

En espérant avoir été clair, merci d'avance pour le temps que tu m'accordes.

XairteX

poussebois
 Posté le 11/02/2019 à 12:55 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
  Maître astucien

,

C'est clair dans tes explications ... mais ça le sera encore plus avec le fichier que tu as oublié de joindre.

En attendant, je viens de vérifier avec une petite macro toute simple, le collage spécial se fait sans problème !

XairteX
 Posté le 11/02/2019 à 13:32 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Nouvel astucien

Désolé, Voici le fameux fichier ... Ci-joint le fichier

J'ai eu quelques difficultés à trouver la procédure pour joindre le fichier

J'espère avoir enfin réussi, dis-moi si ça à fonctionné ou pas, merci.

XairteX

poussebois
 Posté le 11/02/2019 à 13:43 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
  Maître astucien

,

Non, y'a rien .

Voici la procédure :

  • Tu cherches ton fichier par Parcourir,
  • tu coches 21 jours,
  • tu renseignes ton email,
  • tu cliques sur Créer le lien Cjoint.

Aussitôt après, l'URL du lien s'affiche. Tu cliques droit dessus, puis Copier le lien et c'est ça que tu colles dans ton post.

XairteX
 Posté le 11/02/2019 à 14:10 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Nouvel astucien

Ok merci pour ton précieux conseil,ci-joint le lien: https://www.cjoint.com/c/IBlniBOCGNL

poussebois
 Posté le 11/02/2019 à 14:22 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
  Maître astucien

,

Cette fois, c'est bon .

Je dois m'absenter quelques heures, je regarde ça après.

poussebois
 Posté le 11/02/2019 à 16:43 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
  Maître astucien

,

Il y a des erreurs dans ton tableau et tes macros :

Tableau : Les lignes 40 et 41 sont en double, j'en ai supprimé une.

Macros ;: Tu sélectionnes A37 à B66 pour copier (30 lignes), puis A3 à B31 (29 lignes) pour coller. Y'a un blème ! Pour coller, sélectionner la 1ère cellule suffit !

Le plus simple est ici, et ça marche, j'ai testé !

Sub Macro4()

Sheets("4-Commits History").Select 'Optionnel
Range("A37:BX65").Select 'ligne 41 supprimée.
Selection.Copy
Range("A3").Select
Selection.PasteSpecial Paste:=xlPasteValuesAndNumberFormats, Operation:= _
xlNone, SkipBlanks:=False, Transpose:=False

End Sub

Publicité
XairteX
 Posté le 13/02/2019 à 17:44 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Nouvel astucien

Bonjour Poussebois,

Merci pour ta correction et pour le temps que tu m'as accordé. Je vais la tester de ce pas.

XairteX

Page : [1] 
Page 1 sur 1

Vous devez être connecté pour poster des messages. Cliquez ici pour vous identifier.

Vous n'avez pas de compte ? Créez-en un gratuitement !


Sujets relatifs
Aucun sujet pertinent lié trouvé
 > Tous les forums > Forum Bureautique