Bonjour à tous;
Je sollicite votre aide pour résoudre un problème de macro;
en fait je souhaite réaliser une macro qui me permet de vérifier si le contenu de la feuil1 d'un classeur est vide si c'est le cas une deuxième macro s'exécute
si par contre le contenu de la feuil n'est pas vide, dans ce cas il faut le vider et exécuter la deuxième macro.

voici une macro que j'ai réalisé mais malheureusement pour moi elle marche pas

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
Sub macro1()
Set ab = Range("a1:z100")
    With ab.Value
        If Not IsEmpty(ab.Value) Then
            ab.ClearContents
            ab.QueryTable.Delete
            Macro2
        Else: Macro2
        End If
    End With
End Sub
En exécutant cette macro elle marche, mais le problème c'est que le "else' ne s'exécute pas.
Aidez moi svp
davance merci

Ps: la macro2 contient une requête c'est pour ça que j'ai mis querytable.delete. Pour supprimer tous les tables avant d'exécuter la dite macro.