> Tous les forums > Forum Bureautique
 Protéger un fichier avec des macroSujet résolu
Ajouter un message à la discussion
Page : [1] 
Page 1 sur 1
dpx
  Posté le 23/11/2008 @ 19:44 
Aller en bas de la page 
Petit astucien

Bonsoir,

J' ai créé un fichier sur excel 2007 qui contient de nombreuses fonctions enregitrées comme Macro. Comme il est destiné à être manipulé par tout le monde, je veux protéger chaque feuille par un mot de passe.

Créé sur 2007,en mode compatibilité car destiné à fonctionner sur excel 2003, j'ai fait régulierement des essais de module sur 2003 pour ne pas avoir de surprises (Il est fait de plusieurs modules car complet il fait + de 800 Mo)

La suprise je l'ai eu:Sur 2003 les macro de tri "A à Z" ne fontionnent pas quand il y a un mot de passe. Fontionne pas avec la macro 2007, fontionne pas avec la macro 2003

Sur 2007, ça fontionne en cochant les cases Utilser le filtre, Modifier les objets, Modifier les scénario. Je fais de même sur 2003, la macro échoue avec le message << erreur d'execution 1004 la méthode Sort de la classe range à échoué >>

Macro_Trier_CDD_2003

Range("A82:AV105").Select
Selection.Sort Key1:=Range("B82"), Order1:=xlAscending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False
, Orientation:=xlTopToBottom
Range("B82").Select

End Sub

Si je tente avec la macro faite sur 2007 le message est <<erreur de compilation Variable non définie

Macro_Trier_CDD_2007

Range("A82:AV105").Select
ActiveWorkbook.Worksheets("PREPARATION A").Sort.SortFields.Clear
ActiveWorkbook.Worksheets("PREPARATION A").Sort.SortFields.Add Key:=Range( _
"B82:B105"), SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:= _
xlSortNormal
With ActiveWorkbook.Worksheets("PREPARATION A").Sort
.SetRange Range("A82:AV105")
.Header = xlGuess
.MatchCase = False
.Orientation = xlTopToBottom
.SortMethod = xlPinYin
.Apply
End With
End Sub

Voila, si quelqu'un a du temps de reste et une idée! Un grand merci d'avance car ce fichier est un pari avec mon patron, et une partie est déjà en place, mais comme tout le monde tripote dedans,ça devient vite un et je passe ma vie à le remettre en place au point qu' au 1er janvier ou celui ci tourne, ou on reprends tous la gomme et le crayon! Suis pas informatitien moi

Publicité
vieuxmonsieur
 Posté le 24/11/2008 à 07:07 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Astucien

bonjour dpx, le forum,

sur 2003, dans outils, protection, tu coche la case tri

bonne journée

dpx
 Posté le 24/11/2008 à 19:47 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petit astucien

bonsoir, vieuxmonsieur

Mon problème n'est pas là. Pour créer la macro, je lui dis bien de trier. Mais en fait, j'y ai pensé cette nuit, et la je rentre juste, je viens d'essayer ça marche:

Pour 2003: il faut laisser la dernière ligne de la zone de tri vide pour que le tri fonctionne avec ma macro et une protection. Bizarement, sans protection, ça fontionne sans cette ligne vide

Merci d'avoir passé du temps sur mon problème

Cordialement

dpx

Page : [1] 
Page 1 sur 1

Vous devez être connecté pour participer à la discussion.
Cliquez ici pour vous identifier.

Vous n'avez pas de compte ? Créez-en un gratuitement !
Recevoir PC Astuces par e-mail


La Lettre quotidienne +226 000 inscrits
Avec l'actu, des logiciels, des applis, des astuces, des bons plans, ...

Les bonnes affaires
Une fois par semaine, un récap des meilleurs offres.

Les fonds d'écran
De jolies photos pour personnaliser votre bureau. Une fois par semaine.

Les nouveaux Bons Plans
Des notifications pour ne pas rater les bons plans publiés sur le site.

Les bons plans du moment PC Astuces

Tous les Bons Plans
Grosses promotions pour le Super Sale chez Geekbuying
-70% -1 -%
@Geekbuying
Ventes flash de printemps sur Amazon
-40% -1 -%
@Amazon
Souris sans-fil ergonomique verticale Logitech MX Vertical
64,99 € 90 € -28%
@Amazon
Lot de 36 piles Amazon Basics AA (alcaline, 1,5V, durée de vie de 10 ans)
11,42 € 15,05 € -24%
@Amazon
SSD Kingston KC3000 2 To (M.2, NVMe 7000 Mo/s, PCIe 4)
120,48 € 160 € -25%
@Amazon Allemagne
Norton 360 Deluxe (5 postes, 1 an)
15,75 € 50 € -68%
@Amazon

Sujets relatifs
Taille d'un fichier excessive avec une macro
Macro ouvrir fichier avec raccourci clavier
Ouvrir avec macro un fichier dans autre classeur
macro pour enregistrer fichier avec nom d1cellule
Comparaison 3 lignes avec fichier
Creation d' une boucle macro dans fichier EXCEL pour impression
Fichier joint avec un fichier pdf
Pas de son fichier pps lu avec OpenOffice
Tirage au sort avec macro
Comment créer fichier client avec carte de fidélité
Plus de sujets relatifs à Protéger un fichier avec des macro
 > Tous les forums > Forum Bureautique