Help!

PC-Problemen?
De vrijwilligers van Oplossing.be zoeken gratis met u mee!

Hulp bij posten

Recente topics

Auteur Topic: beveiligen met paswoord  (gelezen 1893 keer)

0 leden en 1 gast bekijken dit topic.

Offline Justaguy

  • Lid
  • *
  • Berichten: 86
  • Wie zoekt, die vindt ... het in Oplossing.be
beveiligen met paswoord
« Gepost op: 14 maart 2006, 21:15:20 »
hallo,

ik heb een bestand met een reeks gegevens waarvan bepaalde rijen en velden beveiligd zijn en andere velden zijn vrij om in te geven.
Het werkblad heb ik beveiligd em met een paswoord.

Nu is het zo nadat de gegevens ingevuld zijn er een kans moet bestaan om deze nieuwe gegevens te sorteren. Dus heb ik een macro aangemaakt die eerst het werkblad unprotect maakt, sorteert en daarna terug beveiligd.

Maar dan ben ik wel mijn paswoord kwijt en is het werkblad aleen beveiligd en kan dit door iedereen terug ongedaan gemaakt worden.

Dus hoe behou ik achteraf het ingegeven paswoord?
SYSTEEM: AMD Athlon 1Ghz - 256Mb RAM - Win XP - Office2003 – kabel)

Offline spyder

  • Ambassadeur
  • *****
  • Berichten: 5.265
  • PC probleem zit meestal tussen scherm en rugleun
Re:beveiligen met paswoord
« Reactie #1 Gepost op: 14 maart 2006, 21:24:31 »
Hoi Justaguy,


Met ActiveSheet.Unprotect ("jouw wachtwoord") haal je de beveiligin eraf, je voert je code uit, en met ActiveSheet.Protect Password:="jouw wachtwoord" zet je de beveiliging terug op.

groetjes
Windows 7 Ultimate Unknow NLD
Intel(R) Core(TM) i7 CPU         870  @ 2.93GHz 2934
P7P55D-E PRO
NVIDIA GeForce GTX 470 1280MB 1680 x 1050
HD 1 : INTEL SSDSA2M080G2GC (80GB)
HD 2 : ST31500341AS (1,5TB)
HD 3 : ST320006 41AS (2TB)
browser: Maxthon  mail:Thunderbird AV: Bitdefender
Scarlet user

Offline Justaguy

  • Lid
  • *
  • Berichten: 86
  • Wie zoekt, die vindt ... het in Oplossing.be
Re:beveiligen met paswoord
« Reactie #2 Gepost op: 14 maart 2006, 21:27:02 »
oeps, te vlug geweest. Reeds gevonden, Password:="????", vergeten in macro.

ActiveSheet.Protect Password:="????", DrawingObjects:=True, Contents:=True, Scenarios:=True
SYSTEEM: AMD Athlon 1Ghz - 256Mb RAM - Win XP - Office2003 – kabel)

 


www.combell.com