besoin d'aide sur modif macro

  • Initiateur de la discussion Initiateur de la discussion patrol
  • Date de début Date de début

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 !

patrol

XLDnaute Occasionnel
salut a tous

dans mon petit fichier joint il y a une macro qui efface les dates

mais ce fichier comporte de liaison que jai mis en ecriture blanche dans colonnes dates par MFC

pourriez vous m'aider à modifier la macro de sorte que ça n'efface que les dates qui ne commence pas par 00/01/00 ou par 00 tout simplement

merci a tous

patro
 

Pièces jointes

Re : besoin d'aide sur modif macro

Bonsoir patrol


Essayes ceci sur une copie sacrifiable de ton fichier

Code:
Sub test()
Dim c As Range
For Each c In ActiveSheet.UsedRange.SpecialCells(xlCellTypeFormulas, 23)
    If InStr(1, c.Formula, ":\") > 0 Then
    c.UnMerge: c.Cells(1, 1).ClearContents
    End If
Next
End Sub


PS: pourquoi tu ne restes pas dans ton fil d'origine 🙄 ?
(comme le conseilles la charte du forum ...)
 
Re : besoin d'aide sur modif macro

merci staple

mais ça ne fonctionne pas

je que je souhaiterai c'est que dans la macro "effacer dates"

dans les colonnes ci dessous que ça efface les dates sauf si elles commence

par "00"

Sub EffacerDates()
'
' EffacerDates Macro
' Macro enregistrée le 05/03/2010 par NOEL Philippe

If SheetIsProtected(ActiveSheet.Name) = False Then

Range("E38:F51,I38:J51,M38:N51,Q38:R51,U38:V51,Y38:Z51").ClearContents
End If
End Sub

merci a tous

patro
 
- 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

  • Question Question
Microsoft 365 Formule Outlook,
Réponses
8
Affichages
351
Retour