Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11

double click macro

9 réponses
Avatar
STEPH B
Bonjour
Je dispose d'une feuille nommée "2010" je voudrais que lorsque je
double-click sur des cellules de la colonne A de cette feuille
qu'il me copie la ligne mais seulement les colonnes "A";"N";"O";"P";"U"
correspondante en feuille "2010_2" a partir de la ligne 49
est ce possible?

merci d'avance

9 réponses

Avatar
Daniel.C
Bonjour.
Mets la macro suivante dans le module de la feuille 2010 :

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel
As Boolean)
If Target.Column = 1 Then
Cancel = True
Union(Cells(Target.Row, 1), Range("N" & Target.Row & _
":P" & Target.Row), Cells(Target.Row, "U")).Copy _
Sheets("2010_2").Range("A65536").End(xlUp).Offset(1)
End If
End Sub

Daniel

Bonjour
Je dispose d'une feuille nommée "2010" je voudrais que lorsque je
double-click sur des cellules de la colonne A de cette feuille
qu'il me copie la ligne mais seulement les colonnes "A";"N";"O";"P";"U"
correspondante en feuille "2010_2" a partir de la ligne 49
est ce possible?

merci d'avance
Avatar
STEPH B
MERCI CA MARCHE DU TONNERRE


est ce que tu connais une fonction pour pouvoir activer le la macro
doubleclick et la desactiver.?

merci

"STEPH B" a écrit dans le message de news:
4be82910$0$27610$
Bonjour
Je dispose d'une feuille nommée "2010" je voudrais que lorsque je
double-click sur des cellules de la colonne A de cette feuille
qu'il me copie la ligne mais seulement les colonnes "A";"N";"O";"P";"U"
correspondante en feuille "2010_2" a partir de la ligne 49
est ce possible?

merci d'avance


Avatar
STEPH B
en fait je voudrais pouvoir clicker sur un bouton pour activer le double
click sur cette feuille "2010" et uniquement si je click sur ce bouton alors
il m'executeras la macro....après ce double click

"STEPH B" a écrit dans le message de news:
4be83b65$0$2952$
MERCI CA MARCHE DU TONNERRE


est ce que tu connais une fonction pour pouvoir activer le la macro
doubleclick et la desactiver.?

merci

"STEPH B" a écrit dans le message de news:
4be82910$0$27610$
Bonjour
Je dispose d'une feuille nommée "2010" je voudrais que lorsque je
double-click sur des cellules de la colonne A de cette feuille
qu'il me copie la ligne mais seulement les colonnes "A";"N";"O";"P";"U"
correspondante en feuille "2010_2" a partir de la ligne 49
est ce possible?

merci d'avance






Avatar
Daniel.C
Dans un module standard, en tête :

Public Top As Boolean

Le bouton s'appelle "CommandButton1". Dans le module de la feuille :

Private Sub CommandButton1_Click()
If Me.CommandButton1.Caption = "Activer" Then
Me.CommandButton1.Caption = "Désactiver"
Top = True
Else
Me.CommandButton1.Caption = "Activer"
Top = False
End If
End Sub

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel
As Boolean)
If Target.Column = 1 And Top = True Then
Cancel = True
Union(Cells(Target.Row, 1), Range("N" & Target.Row & _
":P" & Target.Row), Cells(Target.Row, "U")).Copy _
Sheets("2010_2").Range("A65536").End(xlUp).Offset(1)
End If
End Sub

Daniel

en fait je voudrais pouvoir clicker sur un bouton pour activer le double
click sur cette feuille "2010" et uniquement si je click sur ce bouton alors
il m'executeras la macro....après ce double click

"STEPH B" a écrit dans le message de news:
4be83b65$0$2952$
MERCI CA MARCHE DU TONNERRE


est ce que tu connais une fonction pour pouvoir activer le la macro
doubleclick et la desactiver.?

merci

"STEPH B" a écrit dans le message de news:
4be82910$0$27610$
Bonjour
Je dispose d'une feuille nommée "2010" je voudrais que lorsque je
double-click sur des cellules de la colonne A de cette feuille
qu'il me copie la ligne mais seulement les colonnes "A";"N";"O";"P";"U"
correspondante en feuille "2010_2" a partir de la ligne 49
est ce possible?

merci d'avance






Avatar
STEPH B
merci beaucoup ca marche super bien
mais au lieu de activer et desactiver est ce que on peut mettre autre chose
dans le texte du bouton?


"Daniel.C" a écrit dans le message de news:
%
Dans un module standard, en tête :

Public Top As Boolean

Le bouton s'appelle "CommandButton1". Dans le module de la feuille :

Private Sub CommandButton1_Click()
If Me.CommandButton1.Caption = "Activer" Then
Me.CommandButton1.Caption = "Désactiver"
Top = True
Else
Me.CommandButton1.Caption = "Activer"
Top = False
End If
End Sub

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As
Boolean)
If Target.Column = 1 And Top = True Then
Cancel = True
Union(Cells(Target.Row, 1), Range("N" & Target.Row & _
":P" & Target.Row), Cells(Target.Row, "U")).Copy _
Sheets("2010_2").Range("A65536").End(xlUp).Offset(1)
End If
End Sub

Daniel

en fait je voudrais pouvoir clicker sur un bouton pour activer le double
click sur cette feuille "2010" et uniquement si je click sur ce bouton
alors il m'executeras la macro....après ce double click

"STEPH B" a écrit dans le message de news:
4be83b65$0$2952$
MERCI CA MARCHE DU TONNERRE


est ce que tu connais une fonction pour pouvoir activer le la macro
doubleclick et la desactiver.?

merci

"STEPH B" a écrit dans le message de news:
4be82910$0$27610$
Bonjour
Je dispose d'une feuille nommée "2010" je voudrais que lorsque je
double-click sur des cellules de la colonne A de cette feuille
qu'il me copie la ligne mais seulement les colonnes "A";"N";"O";"P";"U"
correspondante en feuille "2010_2" a partir de la ligne 49
est ce possible?

merci d'avance












Avatar
Daniel.C
Qu'est-ce que tu veux mettre ?
Daniel

merci beaucoup ca marche super bien
mais au lieu de activer et desactiver est ce que on peut mettre autre chose
dans le texte du bouton?


"Daniel.C" a écrit dans le message de news:
%
Dans un module standard, en tête :

Public Top As Boolean

Le bouton s'appelle "CommandButton1". Dans le module de la feuille :

Private Sub CommandButton1_Click()
If Me.CommandButton1.Caption = "Activer" Then
Me.CommandButton1.Caption = "Désactiver"
Top = True
Else
Me.CommandButton1.Caption = "Activer"
Top = False
End If
End Sub

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As
Boolean)
If Target.Column = 1 And Top = True Then
Cancel = True
Union(Cells(Target.Row, 1), Range("N" & Target.Row & _
":P" & Target.Row), Cells(Target.Row, "U")).Copy _
Sheets("2010_2").Range("A65536").End(xlUp).Offset(1)
End If
End Sub

Daniel

en fait je voudrais pouvoir clicker sur un bouton pour activer le double
click sur cette feuille "2010" et uniquement si je click sur ce bouton
alors il m'executeras la macro....après ce double click

"STEPH B" a écrit dans le message de news:
4be83b65$0$2952$
MERCI CA MARCHE DU TONNERRE


est ce que tu connais une fonction pour pouvoir activer le la macro
doubleclick et la desactiver.?

merci

"STEPH B" a écrit dans le message de news:
4be82910$0$27610$
Bonjour
Je dispose d'une feuille nommée "2010" je voudrais que lorsque je
double-click sur des cellules de la colonne A de cette feuille
qu'il me copie la ligne mais seulement les colonnes "A";"N";"O";"P";"U"
correspondante en feuille "2010_2" a partir de la ligne 49
est ce possible?

merci d'avance












Avatar
STEPH B
bien au lieu d activer mettre MULT et sinon CALCULS STOPPES
est ce possible?

"Daniel.C" a écrit dans le message de news:

Qu'est-ce que tu veux mettre ?
Daniel

merci beaucoup ca marche super bien
mais au lieu de activer et desactiver est ce que on peut mettre autre
chose dans le texte du bouton?


"Daniel.C" a écrit dans le message de news:
%
Dans un module standard, en tête :

Public Top As Boolean

Le bouton s'appelle "CommandButton1". Dans le module de la feuille :

Private Sub CommandButton1_Click()
If Me.CommandButton1.Caption = "Activer" Then
Me.CommandButton1.Caption = "Désactiver"
Top = True
Else
Me.CommandButton1.Caption = "Activer"
Top = False
End If
End Sub

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As
Boolean)
If Target.Column = 1 And Top = True Then
Cancel = True
Union(Cells(Target.Row, 1), Range("N" & Target.Row & _
":P" & Target.Row), Cells(Target.Row, "U")).Copy _
Sheets("2010_2").Range("A65536").End(xlUp).Offset(1)
End If
End Sub

Daniel

en fait je voudrais pouvoir clicker sur un bouton pour activer le
double click sur cette feuille "2010" et uniquement si je click sur ce
bouton alors il m'executeras la macro....après ce double click

"STEPH B" a écrit dans le message de news:
4be83b65$0$2952$
MERCI CA MARCHE DU TONNERRE


est ce que tu connais une fonction pour pouvoir activer le la macro
doubleclick et la desactiver.?

merci

"STEPH B" a écrit dans le message de news:
4be82910$0$27610$
Bonjour
Je dispose d'une feuille nommée "2010" je voudrais que lorsque je
double-click sur des cellules de la colonne A de cette feuille
qu'il me copie la ligne mais seulement les colonnes
"A";"N";"O";"P";"U" correspondante en feuille "2010_2" a partir de la
ligne 49
est ce possible?

merci d'avance


















Avatar
Daniel.C
Private Sub CommandButton1_Click()
If Me.CommandButton1.Caption = "MULT" Then
Me.CommandButton1.Caption = "CALCULS STOPPES"
Top = True
Else
Me.CommandButton1.Caption = "MULT"
Top = False
End If
End Sub
Daniel


Dans un module standard, en tête :

Public Top As Boolean

Le bouton s'appelle "CommandButton1". Dans le module de la feuille :

Private Sub CommandButton1_Click()
If Me.CommandButton1.Caption = "Activer" Then
Me.CommandButton1.Caption = "Désactiver"
Top = True
Else
Me.CommandButton1.Caption = "Activer"
Top = False
End If
End Sub

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As
Boolean)
If Target.Column = 1 And Top = True Then
Cancel = True
Union(Cells(Target.Row, 1), Range("N" & Target.Row & _
":P" & Target.Row), Cells(Target.Row, "U")).Copy _
Sheets("2010_2").Range("A65536").End(xlUp).Offset(1)
End If
End Sub

Daniel

en fait je voudrais pouvoir clicker sur un bouton pour activer le double
click sur cette feuille "2010" et uniquement si je click sur ce bouton
alors il m'executeras la macro....après ce double click

"STEPH B" a écrit dans le message de news:
4be83b65$0$2952$
MERCI CA MARCHE DU TONNERRE


est ce que tu connais une fonction pour pouvoir activer le la macro
doubleclick et la desactiver.?

merci

"STEPH B" a écrit dans le message de news:
4be82910$0$27610$
Bonjour
Je dispose d'une feuille nommée "2010" je voudrais que lorsque je
double-click sur des cellules de la colonne A de cette feuille
qu'il me copie la ligne mais seulement les colonnes "A";"N";"O";"P";"U"
correspondante en feuille "2010_2" a partir de la ligne 49
est ce possible?

merci d'avance
Avatar
STEPH B
merci ca marche super...

j'avais essayé cela mais fallais pour enlever le activer cliké deux fois...
merci encore


"Daniel.C" a écrit dans le message de news:
%
Private Sub CommandButton1_Click()
If Me.CommandButton1.Caption = "MULT" Then
Me.CommandButton1.Caption = "CALCULS STOPPES"
Top = True
Else
Me.CommandButton1.Caption = "MULT"
Top = False
End If
End Sub
Daniel


Dans un module standard, en tête :

Public Top As Boolean

Le bouton s'appelle "CommandButton1". Dans le module de la feuille :

Private Sub CommandButton1_Click()
If Me.CommandButton1.Caption = "Activer" Then
Me.CommandButton1.Caption = "Désactiver"
Top = True
Else
Me.CommandButton1.Caption = "Activer"
Top = False
End If
End Sub

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As
Boolean)
If Target.Column = 1 And Top = True Then
Cancel = True
Union(Cells(Target.Row, 1), Range("N" & Target.Row & _
":P" & Target.Row), Cells(Target.Row, "U")).Copy _
Sheets("2010_2").Range("A65536").End(xlUp).Offset(1)
End If
End Sub

Daniel

en fait je voudrais pouvoir clicker sur un bouton pour activer le double
click sur cette feuille "2010" et uniquement si je click sur ce bouton
alors il m'executeras la macro....après ce double click

"STEPH B" a écrit dans le message de news:
4be83b65$0$2952$
MERCI CA MARCHE DU TONNERRE


est ce que tu connais une fonction pour pouvoir activer le la macro
doubleclick et la desactiver.?

merci

"STEPH B" a écrit dans le message de news:
4be82910$0$27610$
Bonjour
Je dispose d'une feuille nommée "2010" je voudrais que lorsque je
double-click sur des cellules de la colonne A de cette feuille
qu'il me copie la ligne mais seulement les colonnes
"A";"N";"O";"P";"U" correspondante en feuille "2010_2" a partir de la
ligne 49
est ce possible?

merci d'avance