Trois personnal.xlsb

Staple1600

XLDnaute Barbatruc

• 26 Septembre 2017

• #2

Bonsoir le fil, le forum

@Claudy
Sauvegarde ton personal.xlb le plus récent
Puis dans tes options Windows, affiche les fichiers cachés
(voir sur le net comment faire)
Ensuite ouvre un classeur vierge
Copie cette macro

VB:

Sub a()
With CreateObject("Shell.Application")
.Open Application.StartupPath
End With
ThisWorkbook.Close False
Application.Quit
End Sub

Exécute la puis ferme entièrement si Excel si besoin

Dans le dossier qui aura été ouvert dans l'explorateur Windows, ne garde que personnal.xlsb

 

Dernière édition: 29 Septembre 2017

Vote positif 0 Vote négatif

Claudy

XLDnaute Accro

• 26 Septembre 2017

• #3

Ok merci Staple...
J'essaie ça dans mon univers super sécurisé demain ;-(
A +
Claudy

 

Vote positif 0 Vote négatif

Staple1600

XLDnaute Barbatruc

• 26 Septembre 2017

• #4

Re,

Qu'entends-tu par ton univers super sécurisé?
Ton boulot ?

Cette macro ne fait qu'ouvrir qu'un dossier.

Ensuite tu peux les personal.xlsb surnuméraires sans danger
(surtout si tu les copies/zippes avant dans un autre dossier)

 

Dernière édition: 29 Septembre 2017

Vote positif 0 Vote négatif

Claudy

XLDnaute Accro

• 26 Septembre 2017

• #5

Oui boulot... pffff
T'inquiète te dit quoi demain.
Bonne soirée,
Claudy

 

Vote positif 0 Vote négatif

Claudy

XLDnaute Accro

• 27 Septembre 2017

• #6

Bonjour,
ouf ça a super bien marché!
Encore merci et bonne journée,
Claudy

 

Vote positif 0 Vote négatif