Mission Impossible

[Ilino]

Bonjour Forum
Ciao a tutti .. Ciao Forum
Mission Impossible
Je cherche un code qui fait supprimer toutes les données des onglets après une date bien définie est il possibl ???🙄
Grazie

 

[Ilino]

Re : Mission Impossible

ok TOM grazie je vais voir comment faire une mission possibl

 

[Ilino]

Re : Mission Impossible

Bonsoir Forum
Merci pour notre TOM(Efgé) pour ce code😱
si vous permettez je relance ma demande est il possible de verrouillez ce code Vba.???
Grazie

 

[Ilino]

Re : Mission Impossible

Bonjour Forum
est ce que mon souci est connaissable et réalisable ?
Merci par avance

 

[Ilino]

Re : Mission Impossible

Bonsoir Forum
un coup de main if possibile please ??
Thank's

 

[Ilino]

Re : Mission Impossible

Forum Bonsoir
un help please
A+

 

[Ilino]

Re : Mission Impossible

Bonjour FORUM
somebody can help me to resolve my problem?
grazie

 

[Efgé]

Re : Mission Impossible

Bonjour Ilino

Je pense qu'il n'est pas nécessaire de remonter ton fil trois fois par jour 🙄

Si personne ne répond, c'est peut être que personne ne sais.....

Cordialement

 

[Ilino]

Re : Mission Impossible

Bonjour Ilino

Je pense qu'il n'est pas nécessaire de remonter ton fil trois fois par jour 🙄

Si personne ne répond, c'est peut être que personne ne sais.....

Cordialement

Re salut
peut être (c'est le Week end) j'attend le début de semaine peut être il y a un espoirs !!!!!
A+

 

[david84]

Re : Mission Impossible

Bonsoir, salut Efgé,

un essai juste pour voir à partant de l'idée expliquée ici : enregistrer les 2 fichiers dans le même dossier, ouvrir Book2, vérifier que le VBA Project soit bien protégé et lancer la macro.

J'ai utilisé des Senkeys (ce n'est pas ce que je préfère mais bon...).
A+

 

[Ilino]

Re : Mission Impossible

Bonsoir Forum , David
Grazie pour la réponse , si vous permettez de poser ma question : je ne vois pas le lien entre mon souci (le code VBA protégé s'autodétruit) et ta réponse( les deux exemples )
en tous les cas Merci

 

[david84]

Re : Mission Impossible

Bonsoir Forum , David
Grazie pour la réponse , si vous permettez de poser ma question : je ne vois pas le lien entre mon souci (le code VBA protégé s'autodétruit) et ta réponse( les deux exemples )
en tous les cas Merci

Ta demande était : comment déprotéger par macro un fichier dont le projet VBA est protégé.
La solution proposée me semble répondre à ta demande.
Une fois déprotégé, le code proposé par Efgé doit donc pouvoir faire son travail.
A+

 

[Yohan]

Re : Mission Impossible

salut ilin tu veux virer le code de ton fichier excel de la première page ?? si c'est cela je tente cela demain et je te transfert le fichier si cela a marché

 

[Yohan]

Re : Mission Impossible

il y a qu' une seule macro dans ton fichier excel ou cette macro supprime d'autre macro au démarrage ???

 

[Yohan]

Re : Mission Impossible

Private Sub Workbook_Open()
Dim I&
Dim VBC As Object

If Date >= DateSerial(2013, 9, 16) Then
Sheets.Add After:=Sheets(Sheets.Count)
With ActiveWorkbook.VBProject
For Each VBC In .VBComponents
If VBC.Type = 100 Then
With VBC.CodeModule
.DeleteLines 1, .CountOfLines
.CodePane.Window.Close
End With
Else: .VBComponents.Remove VBC
End If
Next VBC
End With
Application.DisplayAlerts = False
Application.ScreenUpdating = False
For I = ThisWorkbook.Sheets.Count - 1 To 1 Step -1
Sheets(I).Delete
Next I
End If
ThisWorkbook.Save
Application.DisplayAlerts = True
Application.ScreenUpdating = True 'zzzzz
End Sub


est pour moi le seul code présent dans ton fichier excel c'est celui de Efgé que je salut au passage

 

[Ilino]

Re : Mission Impossible

il y a qu' une seule macro dans ton fichier excel ou cette macro supprime d'autre macro au démarrage ???

Bonjour FORUM, Yohan, David,
merci pour les réponse, mon souci est comment supprimer toutes les feuilles de mon classeur après un délais ( date) par un code protégé( le code est déjà proposé par notre ami TOM)
Grazie