Bonjour,
La question n'est pas claire.
Tu veux copier quoi? La cellule dans laquelle tu viens de double-cliquer?
Et tu veux coller cette information O ? Nom de la feuille et adresse de l a cellule. Est-ce toujours dans la m me cellule que
la copie doit se faire?
MichD
------------------------------------------
"pellet15" a crit dans le message de groupe de discussion :
bonjour tous
Comment faire pour copier une date de la colonne "D" la ou on double
clic
et la coller dans un autre onglet (Feuille_insp).
cela a partir de l'onglet (Base_Insp).
mais enlever la protection avant et la remettre apr s l'ex cution..
et poursuivre avec la proc dure Sub historique
Merci
Bonjour,
La question n'est pas claire.
Tu veux copier quoi? La cellule dans laquelle tu viens de double-cliquer?
Et tu veux coller cette information O ? Nom de la feuille et adresse de l a cellule. Est-ce toujours dans la m me cellule que
la copie doit se faire?
MichD
------------------------------------------
"pellet15" a crit dans le message de groupe de discussion :
ebefa66f-f853-4230-99c2-7aae69767...@u6g2000vbo.googlegroups.com...
bonjour tous
Comment faire pour copier une date de la colonne "D" la ou on double
clic
et la coller dans un autre onglet (Feuille_insp).
cela a partir de l'onglet (Base_Insp).
mais enlever la protection avant et la remettre apr s l'ex cution..
et poursuivre avec la proc dure Sub historique
Merci
Bonjour,
La question n'est pas claire.
Tu veux copier quoi? La cellule dans laquelle tu viens de double-cliquer?
Et tu veux coller cette information O ? Nom de la feuille et adresse de l a cellule. Est-ce toujours dans la m me cellule que
la copie doit se faire?
MichD
------------------------------------------
"pellet15" a crit dans le message de groupe de discussion :
bonjour tous
Comment faire pour copier une date de la colonne "D" la ou on double
clic
et la coller dans un autre onglet (Feuille_insp).
cela a partir de l'onglet (Base_Insp).
mais enlever la protection avant et la remettre apr s l'ex cution..
et poursuivre avec la proc dure Sub historique
Merci
Bonjour,
La question n'est pas claire.
Tu veux copier quoi? La cellule dans laquelle tu viens de double-cliquer?
Et tu veux coller cette information O ? Nom de la feuille et adresse de l a cellule. Est-ce toujours dans la m me cellule que
la copie doit se faire?
MichD
------------------------------------------
"pellet15" a crit dans le message de groupe de discussion :
bonjour tous
Comment faire pour copier une date de la colonne "D" la ou on double
clic
et la coller dans un autre onglet (Feuille_insp).
cela a partir de l'onglet (Base_Insp).
mais enlever la protection avant et la remettre apr s l'ex cution..
et poursuivre avec la proc dure Sub historique
Merci
Bonjour,
La question n'est pas claire.
Tu veux copier quoi? La cellule dans laquelle tu viens de double-cliquer?
Et tu veux coller cette information O ? Nom de la feuille et adresse de l a cellule. Est-ce toujours dans la m me cellule que
la copie doit se faire?
MichD
------------------------------------------
"pellet15" a crit dans le message de groupe de discussion :
ebefa66f-f853-4230-99c2-7aae69767...@u6g2000vbo.googlegroups.com...
bonjour tous
Comment faire pour copier une date de la colonne "D" la ou on double
clic
et la coller dans un autre onglet (Feuille_insp).
cela a partir de l'onglet (Base_Insp).
mais enlever la protection avant et la remettre apr s l'ex cution..
et poursuivre avec la proc dure Sub historique
Merci
Bonjour,
La question n'est pas claire.
Tu veux copier quoi? La cellule dans laquelle tu viens de double-cliquer?
Et tu veux coller cette information O ? Nom de la feuille et adresse de l a cellule. Est-ce toujours dans la m me cellule que
la copie doit se faire?
MichD
------------------------------------------
"pellet15" a crit dans le message de groupe de discussion :
bonjour tous
Comment faire pour copier une date de la colonne "D" la ou on double
clic
et la coller dans un autre onglet (Feuille_insp).
cela a partir de l'onglet (Base_Insp).
mais enlever la protection avant et la remettre apr s l'ex cution..
et poursuivre avec la proc dure Sub historique
Merci
On 12 oct, 17:38, "MichD" wrote:
> Bonjour,
> La question n'est pas claire.
> Tu veux copier quoi? La cellule dans laquelle tu viens de double-clique r?
> Et tu veux coller cette information O ? Nom de la feuille et adresse de la cellule. Est-ce toujours dans la m me cellule que
> la copie doit se faire?
> MichD
> ------------------------------------------
> "pellet15" a crit dans le message de groupe de discussion :
>
> bonjour tous
> Comment faire pour copier une date de la colonne "D" la ou on double
> clic
> et la coller dans un autre onglet (Feuille_insp).
> cela a partir de l'onglet (Base_Insp).
> mais enlever la protection avant et la remettre apr s l'ex cution..
> et poursuivre avec la proc dure Sub historique
> Merci
bonjour MichD
Oui vraiment cela es pas très claire (dans ma tête oui, mais elle
n'est pas sur le email)
Dans la feuille '' Base_Insp '' la colonne ''D'' contient des Date
que je veut coller dans la cellule '' h2 '' de la feuille ''
Feuille_insp ''
avec un double clic sur la date que je veut et après exécuter la
procédure que j'ai déjà écrite et qui porte le nom ''historique''
mais les deux feuilles sont protéger il faut enlever cette protection
et la remettre après l'exécution. (mot passe est ''12345')'
Merci (et excuser moi pour le manque de clarté)
On 12 oct, 17:38, "MichD" <michde...@hotmail.com> wrote:
> Bonjour,
> La question n'est pas claire.
> Tu veux copier quoi? La cellule dans laquelle tu viens de double-clique r?
> Et tu veux coller cette information O ? Nom de la feuille et adresse de la cellule. Est-ce toujours dans la m me cellule que
> la copie doit se faire?
> MichD
> ------------------------------------------
> "pellet15" a crit dans le message de groupe de discussion :
> ebefa66f-f853-4230-99c2-7aae69767...@u6g2000vbo.googlegroups.com...
> bonjour tous
> Comment faire pour copier une date de la colonne "D" la ou on double
> clic
> et la coller dans un autre onglet (Feuille_insp).
> cela a partir de l'onglet (Base_Insp).
> mais enlever la protection avant et la remettre apr s l'ex cution..
> et poursuivre avec la proc dure Sub historique
> Merci
bonjour MichD
Oui vraiment cela es pas très claire (dans ma tête oui, mais elle
n'est pas sur le email)
Dans la feuille '' Base_Insp '' la colonne ''D'' contient des Date
que je veut coller dans la cellule '' h2 '' de la feuille ''
Feuille_insp ''
avec un double clic sur la date que je veut et après exécuter la
procédure que j'ai déjà écrite et qui porte le nom ''historique''
mais les deux feuilles sont protéger il faut enlever cette protection
et la remettre après l'exécution. (mot passe est ''12345')'
Merci (et excuser moi pour le manque de clarté)
On 12 oct, 17:38, "MichD" wrote:
> Bonjour,
> La question n'est pas claire.
> Tu veux copier quoi? La cellule dans laquelle tu viens de double-clique r?
> Et tu veux coller cette information O ? Nom de la feuille et adresse de la cellule. Est-ce toujours dans la m me cellule que
> la copie doit se faire?
> MichD
> ------------------------------------------
> "pellet15" a crit dans le message de groupe de discussion :
>
> bonjour tous
> Comment faire pour copier une date de la colonne "D" la ou on double
> clic
> et la coller dans un autre onglet (Feuille_insp).
> cela a partir de l'onglet (Base_Insp).
> mais enlever la protection avant et la remettre apr s l'ex cution..
> et poursuivre avec la proc dure Sub historique
> Merci
bonjour MichD
Oui vraiment cela es pas très claire (dans ma tête oui, mais elle
n'est pas sur le email)
Dans la feuille '' Base_Insp '' la colonne ''D'' contient des Date
que je veut coller dans la cellule '' h2 '' de la feuille ''
Feuille_insp ''
avec un double clic sur la date que je veut et après exécuter la
procédure que j'ai déjà écrite et qui porte le nom ''historique''
mais les deux feuilles sont protéger il faut enlever cette protection
et la remettre après l'exécution. (mot passe est ''12345')'
Merci (et excuser moi pour le manque de clarté)
le message est : '' la methode select de la classe range a echoué ''
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel
As Boolean)
If Intersect(Target, Range("D:D")) Is Nothing Then GoTo fin
Application.CutCopyMode = False
ActiveSheet.Unprotect "7433304DanielPelletier15061954"
Selection.Copy
ActiveSheet.Protect "7433304DanielPelletier15061954",
DrawingObjects:úlse, Contents:=True, Scenarios:=True
Sheets("Feuille_insp").Select
ActiveSheet.Unprotect "7433304DanielPelletier15061954"
Range("H2:L2").Select '------ block ici ??? ------
ActiveSheet.Paste
historique
fin:
End Sub
Merci
le message est : '' la methode select de la classe range a echoué ''
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel
As Boolean)
If Intersect(Target, Range("D:D")) Is Nothing Then GoTo fin
Application.CutCopyMode = False
ActiveSheet.Unprotect "7433304DanielPelletier15061954"
Selection.Copy
ActiveSheet.Protect "7433304DanielPelletier15061954",
DrawingObjects:úlse, Contents:=True, Scenarios:=True
Sheets("Feuille_insp").Select
ActiveSheet.Unprotect "7433304DanielPelletier15061954"
Range("H2:L2").Select '------ block ici ??? ------
ActiveSheet.Paste
historique
fin:
End Sub
Merci
le message est : '' la methode select de la classe range a echoué ''
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel
As Boolean)
If Intersect(Target, Range("D:D")) Is Nothing Then GoTo fin
Application.CutCopyMode = False
ActiveSheet.Unprotect "7433304DanielPelletier15061954"
Selection.Copy
ActiveSheet.Protect "7433304DanielPelletier15061954",
DrawingObjects:úlse, Contents:=True, Scenarios:=True
Sheets("Feuille_insp").Select
ActiveSheet.Unprotect "7433304DanielPelletier15061954"
Range("H2:L2").Select '------ block ici ??? ------
ActiveSheet.Paste
historique
fin:
End Sub
Merci
petite remarque,
j'ai fait le test avec Worksheet_SelectionChange
car avec Worksheet_BeforeDoubleClick j'entre automatiquement en mode éd ition de cellule.
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Set sh1 = ActiveSheet
Set sh2 = Sheets("Feuille_insp")
If Intersect(Target, Range("D:D")) Is Nothing Then GoTo fin
sh1.Unprotect "7433304DanielPelletier15061954"
sh2.Unprotect "7433304DanielPelletier15061954"
Application.CutCopyMode = False
Selection.Copy Sheets("Feuille_insp").Range("H2")
sh1.Protect "7433304DanielPelletier15061954", DrawingObjects:lse , Contents:=True, Scenarios:=True
sh2.Protect "7433304DanielPelletier15061954", DrawingObjects:lse , Contents:=True, Scenarios:=True
' historique
fin:
End Sub
--
isabelle
petite remarque,
j'ai fait le test avec Worksheet_SelectionChange
car avec Worksheet_BeforeDoubleClick j'entre automatiquement en mode éd ition de cellule.
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Set sh1 = ActiveSheet
Set sh2 = Sheets("Feuille_insp")
If Intersect(Target, Range("D:D")) Is Nothing Then GoTo fin
sh1.Unprotect "7433304DanielPelletier15061954"
sh2.Unprotect "7433304DanielPelletier15061954"
Application.CutCopyMode = False
Selection.Copy Sheets("Feuille_insp").Range("H2")
sh1.Protect "7433304DanielPelletier15061954", DrawingObjects:=False , Contents:=True, Scenarios:=True
sh2.Protect "7433304DanielPelletier15061954", DrawingObjects:=False , Contents:=True, Scenarios:=True
' historique
fin:
End Sub
--
isabelle
petite remarque,
j'ai fait le test avec Worksheet_SelectionChange
car avec Worksheet_BeforeDoubleClick j'entre automatiquement en mode éd ition de cellule.
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Set sh1 = ActiveSheet
Set sh2 = Sheets("Feuille_insp")
If Intersect(Target, Range("D:D")) Is Nothing Then GoTo fin
sh1.Unprotect "7433304DanielPelletier15061954"
sh2.Unprotect "7433304DanielPelletier15061954"
Application.CutCopyMode = False
Selection.Copy Sheets("Feuille_insp").Range("H2")
sh1.Protect "7433304DanielPelletier15061954", DrawingObjects:lse , Contents:=True, Scenarios:=True
sh2.Protect "7433304DanielPelletier15061954", DrawingObjects:lse , Contents:=True, Scenarios:=True
' historique
fin:
End Sub
--
isabelle