Detection cases / date début & fin

C'est à dire que avat d'enregistrer :

J'applique des filtres pour ne garder que les valeurs qui m'intéressent,

Or, lors de l'export, je retrouve toutes les valeurs et non uniquement celles que j'ai choisi à travers les filtres

Oui sans doute, mais c'est un point que tu n'avais nullement soulevé jusqu'ici, il faut donc éliminer les lignes masquées, ce qui attendra un peu car j'ai d'autres activités prévues ce jour.

@+

Voilà !

Sub ExportFeuille()
    Dim chD$, nFich$, nF, i&, shp As Shape, nm As Name
    chD = "N:\Elaboration outil\Fichiers Excels exportés\"
    nFich = Worksheets("Planning avec dates").Range("D1") & ".xlsx"
    nF = "Task_Table1"
    Application.ScreenUpdating = False
    Worksheets("Task_Table1").Copy before:=Worksheets(1)
    With Worksheets(1)
        With .UsedRange
            For i = .Rows.Count To 1
                If .Rows(i).Hidden Then .Rows(i).Delete
            Next i
        End With
        If .FilterMode Then .ShowAllData
        With .UsedRange
            .Value = .Value
        End With
        For Each shp In .Shapes
            shp.Delete
        Next shp
    End With
    Worksheets(1).Move
    With ActiveWorkbook
        .Worksheets(1).Name = nF
        For Each nm In .Names
            nm.Delete
        Next nm
        .SaveAs chD & nFich, xlOpenXMLWorkbook
    End With
End Sub

capture

Vérifie le chemin ! Le morceau de code incriminé marchait, ce n'est pas cela qui a été modifié, pas de raison que ça se mette à ne plus marcher !

Toujours pas chef

capture

Bon, j'voudrais rien dire mais j'avais donné une réponse en 1 coup et 38mn

https://forum.excel-pratique.com/viewtopic.php?p=675120#p675120

Il n'y avait pas l'enregistrement dans ton fichier

Salut Steelson ! On n'est pas sur le même problème... !

J'avais testé, et confirmé que cette macro fonctionnait ! Depuis, je n'ai pas testé la suppression de lignes, mais cette modification est sans rapport avec l'enregistrement.

Moi, je teste nécessairement sur mon disque dur, et j'enregistre sur un chemin que je redéfinis (pas sur le tien ! ). Alors si cela échoue, cela ne peut venir que du chemin, qui est la seule chose variable. Je ne connais pas ton arborescence de dossier, je ne sais à quoi correspond le lecteur N, c'est à toi de vérifier tout ça.

Si N: est un lecteur réseau, vérifie qu'il est bien fonctionnel, et à quelle adresse réseau il correspond, et éventuellement tu substitue un chemin réseau n'utilisant pas ce lecteur...

Cordialement.

edit: et je dois partir (à l'instant)...

MFerrand, j'ai fini par comprendre, en effet ca fonctionne, lorsqu'on masque les lignes.

Le nouveau fichier génére contient aussi lignes masques.

Cependant lorsque je transfere vers MS Project, les lignes masques sont affichées.

L'idée est que le nouveau fichier généré ne se contente pas seulement de tout importer et de masquer les lignes concernées, mais plutôt de les supprimer.(uniquement sur le nouveau fichier)

C'est bien la suppression que j'ai codée ! ! il va donc falloir que je teste ça...

Pour l'instant, je rentre et je suis un peu claqué...

Rechercher des sujets similaires à "detection cases date debut fin"