Aide pour la modification d'un code VBA qui ne fonctionne pas...

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

ordaz75

XLDnaute Nouveau
Bonsoir,

J'ai besoin de votre aide... Je n'arrive pas a modifier mon code suivant (qui permet lors du double clique d'afficher la date dans une cellule) déjà existant sur le fichier dans l'onglet PORTEFEUILLE LIVRABLE :

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
With Target
If .Column = 1 Then
.Value = Date: Cancel = True
End If
End With
End Sub



Je voulais nommer les colonnes 1,2,3 et 4... mais j'ai un "débogage" a chaque fois...

et 2eme partie :

J'aimerais insérer le code suivant ( qui permet de souligner une ligne d'un classeur ) sur l'onglet PORTEFEUILLE LIVRABLE mais pareil j'ai le droit à un débogage....

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Static AncAdress As Long
'Si la fonction activer/Déactiver est implémentée ajouter la ligne ci-dessous
If ActivationLigne Then Exit Sub

If Target.Count > 1 Then Exit Sub
If AncAdress <> 0 Then 'remettre en normal
Rows(AncAdress).Interior.ColorIndex = xlNone
Rows(AncAdress).Font.ColorIndex = 0
End If
Target.EntireRow.Font.ColorIndex = 5
Target.EntireRow.Interior.ColorIndex = 28
Target.EntireRow.Interior.Pattern = xlSolid
AncAdress = Target.Row
End Sub


MERCI d'avance pour votre aide
 

Pièces jointes

  • V2.zip
    V2.zip
    178.8 KB · Affichages: 31
  • V2.zip
    V2.zip
    178.8 KB · Affichages: 27
  • V2.zip
    V2.zip
    178.8 KB · Affichages: 27
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
4
Affichages
223
Réponses
32
Affichages
1 K
Réponses
4
Affichages
243
Retour