Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Philippe.R
Bonsoir, Dans le module de feuille du classeur depuis lequel on lance la copie :
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) 'MPFE le 01/12/2003 par Philippe.R 'recopie une cellule à la même adresse dans un autre classeur zz = ActiveCell.Address ActiveCell.Copy Windows("Classeur1").Activate 'ou tout autre classeur au choix Sheets(1).Range(zz).Select ActiveSheet.Paste Application.CutCopyMode = False End Sub
-- Amicales Salutations
Retirer A_S_ pour répondre. XL97 / XL2002 Pour suivre le forum : news://msnews.microsoft.com/microsoft.public.fr.excel (Voulez-vous vous abonner ? -> Oui)
"" a écrit dans le message de news:019201c3b82f$0a2beb50$
peut on en double cliquant sur une cellule l'envoyee dans un autre dossier deja ouvert merci
Bonsoir,
Dans le module de feuille du classeur depuis lequel on lance la copie :
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
'MPFE le 01/12/2003 par Philippe.R
'recopie une cellule à la même adresse dans un autre classeur
zz = ActiveCell.Address
ActiveCell.Copy
Windows("Classeur1").Activate 'ou tout autre classeur au choix
Sheets(1).Range(zz).Select
ActiveSheet.Paste
Application.CutCopyMode = False
End Sub
--
Amicales Salutations
A_S_rauphil@wanadoo.fr
Retirer A_S_ pour répondre.
XL97 / XL2002
Pour suivre le forum :
news://msnews.microsoft.com/microsoft.public.fr.excel
(Voulez-vous vous abonner ? -> Oui)
"cpl80sc@wanadoo.fr" <anonymous@discussions.microsoft.com> a écrit dans le message de
news:019201c3b82f$0a2beb50$a101280a@phx.gbl...
peut on en double cliquant sur une cellule l'envoyee dans
un autre dossier deja ouvert
merci
Bonsoir, Dans le module de feuille du classeur depuis lequel on lance la copie :
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) 'MPFE le 01/12/2003 par Philippe.R 'recopie une cellule à la même adresse dans un autre classeur zz = ActiveCell.Address ActiveCell.Copy Windows("Classeur1").Activate 'ou tout autre classeur au choix Sheets(1).Range(zz).Select ActiveSheet.Paste Application.CutCopyMode = False End Sub
-- Amicales Salutations
Retirer A_S_ pour répondre. XL97 / XL2002 Pour suivre le forum : news://msnews.microsoft.com/microsoft.public.fr.excel (Voulez-vous vous abonner ? -> Oui)
"" a écrit dans le message de news:019201c3b82f$0a2beb50$
peut on en double cliquant sur une cellule l'envoyee dans un autre dossier deja ouvert merci