XL pour MAC Création de RDV . . . Je pars de rien :(

Phil69970

XLDnaute Barbatruc

• 7 Avril 2023

• #2

Bonjour @fanou06

Quand je lis ceci :



et quand je lis cela :

fanou06 à dit:

Colonne D : Type de RDV (j'ai la liste déroulante)

Cliquez pour agrandir...

Je me dis que tu as quand même quelque chose sur ton ordinateur et donc je me dis pourquoi @fanou06 ne poste pas le quelque chose !!!

@Phil69970

 

Vote positif 0 Vote négatif

F

fanou06

XLDnaute Occasionnel

• 7 Avril 2023

• #3

Je vais mettre un fichier.

 

Vote positif 0 Vote négatif

F

fanou06

XLDnaute Occasionnel

• 7 Avril 2023

• #4

Voilà un exemple. Merci.

 

Pièces jointes

• entretiens.xlsx

  9.1 KB · Affichages: 7

Vote positif 0 Vote négatif

Phil69970

XLDnaute Barbatruc

• 8 Avril 2023

• #5

@fanou06

Je te propose ce fichier

Le tri se fait automatiquement sur clic droit de la souris suivant la colonne que tu cliques
Exemple :
Tu cliques sur le bouton droit de la souris sur A1 le tri est descendant
Tu recliques sur le bouton droit de la souris sur A1 le tri est ascendant
Tu cliques sur le bouton droit de la souris droit sur B1 le tri est descendant
Tu recliques sur le bouton droit de la souris sur B1 le tri est ascendant .....
Cela fonctionne sur les 4 colonnes colorées A,B,C,D

Merci de ton retour

@Phil69970

 

Pièces jointes

• Tri sur colonne V1.xlsm

  36.8 KB · Affichages: 20

Vote positif 0 Vote négatif

F

fanou06

XLDnaute Occasionnel

• 8 Avril 2023

• #6

Merci, je viens de tester mais la macro ne semble pas répondre.
Je vais regarder pourquoi je n'y arrive pas.

 

Vote positif 0 Vote négatif

Phil69970

XLDnaute Barbatruc

• 8 Avril 2023

• #7

Re

@fanou06 :

Décris moi ce que tu fais et que veux dire ne semble pas répondre, as tu des messages d'erreur et lesquels ?
Rappel :
1) Il faut accepter les macros à l'ouverture du fichier
2) Ma macro fonctionne uniquement avec le clic droit de la souris dans les cellules A1, B1, C1 et D1



Merci de ta réponse

@Phil69970

 

Vote positif 0 Vote négatif

F

fanou06

XLDnaute Occasionnel

• 8 Avril 2023

• #8

Bonjour, Oui les macros sont activées mais quand je clique rien ne se passe.
J'ai essayé aussi en testant le fichier sur mon PC (au lieu de MAC) : idem.
Pas de message d'erreur.

Bon c'est pas grave, je vais insérer les RDV selon les dates.
Merci en tout cas.

 

Vote positif 0 Vote négatif

Phil69970

XLDnaute Barbatruc

• 8 Avril 2023

• #9

Re

@fanou06
Tu cliques bien avec le bouton droit de la souris dans la cellule A1 ou B1 ou C1 ou D1
Car j'ai fait l'essai sur 2 pc différents et bien sur cela fonctionne chez moi

Edit : Si quelqu'un peut me confirmer que cela fonctionne sur son PC

@Phil69970

 

Dernière édition: 8 Avril 2023

Vote positif 0 Vote négatif

J

JM27

XLDnaute Barbatruc

• 8 Avril 2023

• #10

bonjour
OK pour moi

 

Vote positif 0 Vote négatif

job75

XLDnaute Barbatruc

• 8 Avril 2023

• #11

Bonjour fanou06, Phil69970,

Il faut peut-être préciser que la macro doit être dans le code de la feuille.

On peut se passer de variable Public, voyez le fichier joint et cette macro :

VB:

Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As Boolean)
With ActiveCell
    If Intersect(.Cells, [A1:D1]) Is Nothing Then Exit Sub
    Cancel = True
    .CurrentRegion.Sort .Cells, IIf(Cells(Application.CountA(.EntireColumn), .Column) < .Cells(2), 1, 2), Header:=xlYes
End With
End Sub

A+

 

Pièces jointes

• entretiens(1).xlsm

  16.7 KB · Affichages: 9

Vote positif 0 Vote négatif

V

VIARD

XLDnaute Impliqué

• 8 Avril 2023

• #12

Bonjour @Phil69970 , @fanou06 et à tous

Je confirme sur excel2007 le fichier de @Phil69970 fonctionne correctement
@ + Jean-Paul

 

Vote positif 0 Vote négatif

Phil69970

XLDnaute Barbatruc

• 8 Avril 2023

• #13

Bonjour à tous

Merci @JM27, @job75 et @VIARD pour la réponse qui confirme mes dires

Phil69970 à dit:

Car j'ai fait l'essai sur 2 pc différents et bien sur cela fonctionne chez moi

Cliquez pour agrandir...

@fanou06 tu as du raté quelque chose car mon fichier fonctionne sur plusieurs micros

@Phil69970

 

Vote positif 0 Vote négatif

F

fanou06

XLDnaute Occasionnel

• 8 Avril 2023

• #14

Je ne sais pas . . .
Je reteste plus tard. Merci

 

Vote positif 0 Vote négatif