> 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
-5 €5 euros de remise dès 25 euros d'achats chez Amazon (selon éligibilité)
Valable jusqu'au 01 Février

Amazon propose actuellement 5 euros de remise dès 25 euros d'achats avec le code PROMO5. Vous pouvez vérifier votre éligibilité à cette offre en vous rendant sur cette page.


> Voir l'offre
149,99 €Ecouteurs intra-auriculaires sans fil Bluetooth Jabra Elite 75t à 149,99 €
Valable jusqu'au 25 Janvier

Cdiscount fait une promotion sur les Ecouteurs intra-auriculaires sans fil Bluetooth Jabra Elite 75t qui passent à 149,99 € livrés. On les trouve ailleurs à partir de 179 €. Confortables, les Jabra Elite 75t tiennent parfaitement dans l'oreille et s'adaptent à toutes les morphologies. Ils comportent 4 microphones embarqués pour des conversations parfaitement claires et audibles avec vos interlocuteurs. Les bruits de fond indésirables sont filtrés pour vous assurer une expérience confortable à chaque utilisation.Ils sont certifiés IP55 pour une résistance accrue à la poussière et à l'eau. Côté autonomie, ces écouteurs assurent jusqu'à 7h30 d'utilisation sur une seule charge et une autonomie pouvant atteindre 28 heures grâce à l'étui de charge/transport fourni. Ce dernier dispose également d'une fonction de charge rapide avec 1 heure d'énergie supplémentaire en seulement 15 minutes de recharge.


> Voir l'offre
64,99 €Alimentation PC Corsair CV650 650W à 64,99 €
Valable jusqu'au 25 Janvier

Boulanger fait une promotion sur l'alimentation PC Corsair CV650 650W à 64,99 € au lieu de 80 € ailleurs. Cette alimentation certifiée 80+ Bronze dispose d'un ventilateur thermorégulé de 120 mm qui assure le refroidissement silencieux de votre système, tandis que son format compact s’adapte facilement à presque tous les boîtiers PC modernes avec une longueur de seulement 125mm.


> Voir l'offre

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