Vous utilisez un navigateur obsolète. Il se peut que ce site ou d'autres sites Web ne s'affichent pas correctement. Vous devez le mettre à jour ou utiliser un navigateur alternatif.
Bonjour le forum
Je voudrais mettre en double click la macro ci-dessous
Mais où?
Cordialement
Merci pour vos éventuels retours?
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Intersect(Range("H3:H500"), Target) Is Nothing Then
UsfInfos.Show 0
End If
End Sub
Mis ça dans ThisWorkbook
Ça fonctionne
Vous cassez pas la tête les "amis"!!
Merci à vous tous
Cordialement
'*****************************************************************************
If (Target <> "" And Not IsError(Application.Match(CSng(Date), Columns("G"), 0))) Or Target <>...
Bonjour à tous et merci pour vos contributions mais trop difficile pour moi
J'ai encore modifié le programme pour avoir des R.V le même jour car ce n'était pas prévu
Le seul truc c'est supprimer une ligne
Ça se passe ici suivant que j'inverse ces 2 lignes en commentaires ou non
Si je met la 2ème en non commentaires je ne peux plus afficher la date du jour
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
DerLig = Range("A" & Rows.Count).End(xlUp).Row
If...
Bonjour sylvanu
Et pourtant...
Si je veux inscrire la date du jour je double click sur cellule A4 ça affiche Samedi 04 Octobre 2025 ainsi que dans colonne G
J'enregistre tout va bien
Si je veux modifier la date toujours cellule A4 je tape par exemple 02/02/2026 ça affiche bien ainsi que dans...
Je m'excuse encore si c'est possible
Peut-on faire afficher la date G sous le format affiché au lieu de la taper
J'ai fait
J'ai bricolé quelque chose mais pour effacer la date du 11 Février 2026 (exemple) il faut double cliquer 2 fois cellule A4 pour revenir à la date du jour puis ça efface la...
Bonjour le forum
Il y a des années que j'ai voulu faire afficher la père lettre en Majuscule des dates colonne A
Ça fonctionne bien quand c'est la date du jour mais quand j'anticipe un futur R.V par exemple 02/02/2026
Tout d'abord il faut que la date colonne G soit la même donc je fait un double...
Bonjour le forum
Dans la macro ci-dessous ça bug mais pas toujours sur cette ligne
Sheets(1).Select 'Mettre Sheets(1).Select à cet endroit sinon il passe en revue toutes les feuilles
Je suis obligé d'aller dans format afficher feuille et les faire afficher
Auriez-vous svp...
C'est celui de la feuille qu'il faut activer et ça fonctionne
Merci sylvanu
Bonne journée
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Intersect(Range("C3:C500"), Target) Is Nothing Then
UsfInfos.Show 0
End If
End Sub