Problème pour écrire une macro IF

vba95 · 17 Octobre 2012

Bonjour à tous,

J’ai un problème avec IF dans ma macro.
Voila …
Je souhaite que ma macro « ExcelDowloadsRechercheDateDuJourcherche » recherche dans la Feuil2 si la date du jour est présente.
Si elle est absente elle exécute ma macro « ExcelDowloadsInsertDateDuJour » et si elle est présente elle exécute directement ma macro « ExcelDownloadsFiltreCopierColler »

Je m’arrive pas rédiger correctement ma condition avec IF.
Est-ce que quelqu’un pourrais m’aider.

Je mets en pièce jointe le fichier pour plus de clareté.

Merci par avance.

Pierrot93 · 17 Octobre 2012

Re : Problème pour écrire une macro IF

Bonjour,

regarde ceci, devrait te permettre d'avancer :

Code:

Sub ExcelDowloadsRechercheDateDuJour()
Dim x As Range
With Worksheets("Feuill2")
    .Activate
    Set x = .Columns(1).Find(Date, , xlValues, xlWhole, , , False)
End With
If x Is Nothing Then macropastrouve Else macrotrouve
End Sub

bonne journée
@+

vba95 · 17 Octobre 2012

Re : Problème pour écrire une macro IF

Bonjour Pierrot93,

Super ça fonctionne parfaitement.

UN GRAND MERCI.

A @

Problème pour écrire une macro IF

vba95

Guest

Pièces jointes

Pierrot93

XLDnaute Barbatruc

vba95

Guest

Discussions similaires

Problème pour écrire une macro IF

vba95

Guest

Pièces jointes

Pierrot93

XLDnaute Barbatruc

vba95

Guest

Discussions similaires

Privacy & Transparency

Privacy & Transparency