Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

Makro zwingend beim Öffnen ausführen

64 views
Skip to first unread message

Ernst Weinlig

unread,
Jul 7, 1999, 3:00:00 AM7/7/99
to
Wie kann man verhindern, daß ein Makro nicht gestartet wird, wenn der User
beim Öffnen die SHIFT-taste gedrückt hält?

Vielen Dank

Hans W. Herber

unread,
Jul 7, 1999, 3:00:00 AM7/7/99
to
Hallo Ernst,

an und für sich kannst Du das nicht unterbinden. Für XL8 kann man eine
Konstruktion schaffen, daß die Arbeitsmappe, wenn sie mit gedrückter
SHIFT-Taste geladen wird, sich selbst wieder schließt. Aber leider hast
Du ja keine Excel-Version angegeben.

hans

#############################################
# Der Excel-Server: http://herber.de #
# Die Excel-Hilfe: http://excel-hilfe.de #
# Das Excel-Forum: http://herber.de/bbs #
# Excel-Suche: http://herber.de/suchen.htm #
#############################################
--

Ernst Weinlig <wei...@gmx.de> schrieb in im Newsbeitrag:
7lvqhb$vpq$1...@news03.btx.dtag.de...

Ernst Weinlig

unread,
Jul 7, 1999, 3:00:00 AM7/7/99
to
Hallo Hans,

vielen Dank für die schnelle Antwort:

Ich habe Excel 2000.

Danke, Ernst

Hans W. Herber

unread,
Jul 7, 1999, 3:00:00 AM7/7/99
to
Hallo Ernst,

die unter der nachfolgenden Adresse liegende Arbeitsmappe entpacken,
dann in Excel mit und ohne gedrückter Hochschalttaste laden. Das
Passwort ist "Passwort".

An Rückmeldungen, ob und wenn ja, wie der Schutz geknackt wurde, bin ich
interessiert. Bei der Arbeitsmappe geht es darum, daß das Arbeitsblatt
nur angezeigt werden soll, wenn das richtige Paßwort eingegeben wurde.

hans

#############################################
# Der Excel-Server: http://herber.de #
# Die Excel-Hilfe: http://excel-hilfe.de #
# Das Excel-Forum: http://herber.de/bbs #
# Excel-Suche: http://herber.de/suchen.htm #
#############################################
--

Ernst Weinlig <wei...@gmx.de> schrieb in im Newsbeitrag:

7lvrsq$f$1...@news03.btx.dtag.de...

Hans W. Herber

unread,
Jul 7, 1999, 3:00:00 AM7/7/99
to
... die Angabe der Adresse der Mappe wäre wohl nicht übel gewesen ...

also:
http://herber.de/bbs/texte/schutz.zip

hans

#############################################
# Der Excel-Server: http://herber.de #
# Die Excel-Hilfe: http://excel-hilfe.de #
# Das Excel-Forum: http://herber.de/bbs #
# Excel-Suche: http://herber.de/suchen.htm #
#############################################
--

Hans W. Herber <ha...@herber.de> schrieb in im Newsbeitrag:
usM5xRJy#GA.222@cppssbbsa03...

Ernst Weinlig

unread,
Jul 7, 1999, 3:00:00 AM7/7/99
to
Hallo Hans,

absolute Spitze - sicher nicht einfach zu knacken.

Allerdings weiß ich nicht, wie Du´s realisiert hast, da das Makro geschützt
ist.

Grüße und für die Auflösung Dankbar ...

Ernst

Manfred Müller

unread,
Jul 8, 1999, 3:00:00 AM7/8/99
to
Hallo Hans.

Die Idee war nicht schlecht. Aber nach 2 Minuten war die Datei auch ohne
Kennworteingabe geöffnet ;-)

Gruß Manfred

Hans W. Herber

unread,
Jul 8, 1999, 3:00:00 AM7/8/99
to
Hallo Ernst,

nein, doch knackbar. Z.B. von Paul Bleijlevens über das Knacken des
VBE-Paßwortes und von Manfred Müller nach einer Methode, die er uns
sicher noch mitteilt.

Grundsätzlich gilt: Knackbar ist alles. Vor einigen Tagen bin ich z.B.
durch Zufall darauf gestoßen, wie der Inhalt der mit Schreib-/Leseschutz
versehenen Arbeitsmappen eingelesen werden kann.

Achso, das Paßwort für das VBAProjekt: HWH

hans

#############################################
# Der Excel-Server: http://herber.de #
# Die Excel-Hilfe: http://excel-hilfe.de #
# Das Excel-Forum: http://herber.de/bbs #
# Excel-Suche: http://herber.de/suchen.htm #
#############################################
--

Ernst Weinlig <wei...@gmx.de> schrieb in im Newsbeitrag:

7m01cc$gc$1...@news07.btx.dtag.de...

Hans W. Herber

unread,
Jul 8, 1999, 3:00:00 AM7/8/99
to
Hallo Manfred,

hierzu meine schon geäußerte Bitte: Wie?
Paul Bleijlevens hat es über das Knacken des VBProjekt-Paßwortes
geschafft.

hans

#############################################
# Der Excel-Server: http://herber.de #
# Die Excel-Hilfe: http://excel-hilfe.de #
# Das Excel-Forum: http://herber.de/bbs #
# Excel-Suche: http://herber.de/suchen.htm #
#############################################
--

Manfred Müller <mam...@aol.com> schrieb in im Newsbeitrag:
emw#ERNy#GA....@cppssbbsa02.microsoft.com...


> Hallo Hans.
>
> Die Idee war nicht schlecht. Aber nach 2 Minuten war die Datei auch
ohne
> Kennworteingabe geöffnet ;-)
>
> Gruß Manfred
>
>
> Hans W. Herber <ha...@herber.de> schrieb in im Newsbeitrag:
> usM5xRJy#GA.222@cppssbbsa03...
> > Hallo Ernst,
> >
> > die unter der nachfolgenden Adresse liegende Arbeitsmappe entpacken,
> > dann in Excel mit und ohne gedrückter Hochschalttaste laden. Das
> > Passwort ist "Passwort".
> >
> > An Rückmeldungen, ob und wenn ja, wie der Schutz geknackt wurde, bin
ich
> > interessiert. Bei der Arbeitsmappe geht es darum, daß das
Arbeitsblatt
> > nur angezeigt werden soll, wenn das richtige Paßwort eingegeben
wurde.
> >

> > hans
> >
> > #############################################
> > # Der Excel-Server: http://herber.de #
> > # Die Excel-Hilfe: http://excel-hilfe.de #
> > # Das Excel-Forum: http://herber.de/bbs #
> > # Excel-Suche: http://herber.de/suchen.htm #
> > #############################################
> > --
> >
> > Ernst Weinlig <wei...@gmx.de> schrieb in im Newsbeitrag:

Ernst Weinlig

unread,
Jul 8, 1999, 3:00:00 AM7/8/99
to
Vielen Dank Hans,

mir reicht der Schutz. Klar ist alles irgendwie knackbar, da hilft nur
verschlüsseln.

Ernst


Andreas Steffens

unread,
Jul 8, 1999, 3:00:00 AM7/8/99
to
Hallo Hans,

> die unter der nachfolgenden Adresse liegende Arbeitsmappe entpacken,
> dann in Excel mit und ohne gedrückter Hochschalttaste laden. Das
> Passwort ist "Passwort".
>
> An Rückmeldungen, ob und wenn ja, wie der Schutz geknackt wurde, bin
ich
> interessiert. Bei der Arbeitsmappe geht es darum, daß das Arbeitsblatt
> nur angezeigt werden soll, wenn das richtige Paßwort eingegeben wurde.

leider war der Schutz noch keine echte Herausforderung, folgendes
Minimakro löst das Problem (Excel 97 SR-2, Win98):

Sub testy()
Application.EnableEvents = False
Workbooks.Open FileName:="d:\schutz.xls"
Workbooks("schutz.xls").IsAddin = False
End Sub

Scheinbar wird die Kontrolle auf Add-In durch das Abschalten der Events
übergangen. Zusätzlich ist das Passwort für das Tabellenblatt nicht
erforderlich.

Tschö,
Andreas

Hans W. Herber

unread,
Jul 8, 1999, 3:00:00 AM7/8/99
to
Hallo Andreas,

es wäre zum Haareraufen, hätte man den welche ...

hans

#############################################
# Der Excel-Server: http://herber.de #
# Die Excel-Hilfe: http://excel-hilfe.de #
# Das Excel-Forum: http://herber.de/bbs #
# Excel-Suche: http://herber.de/suchen.htm #
#############################################
--

Andreas Steffens <Andreas....@post.rwth-aachen.de> schrieb in im
Newsbeitrag: OYzbV0Uy#GA....@cppssbbsa02.microsoft.com...

Manfred Müller

unread,
Jul 8, 1999, 3:00:00 AM7/8/99
to
Hallo,

Ich wollte den Anderen auch noch was zum knacken lassen.
So habe ich es gemacht:
Die Datei mit deaktivierten Makros geöffnet.
Neue Mappe angelegt.
Modul mit folgendem Makro eingefügt:
---
Sub u1()


Workbooks("schutz.xls").IsAddin = False
End Sub

---
Fertig mit vollem Zugriff auf die Mappe.

mit freundlichen Grüßen

Manfred Müller
MAM Software
Webdesign, Grafik und Officelösungen

eMail: mam...@aol.com
Homepage: http://members.aol.com/mamsoft


Manfred Müller

unread,
Jul 8, 1999, 3:00:00 AM7/8/99
to
Das mit dem Anhang hat nicht gefunkt ;-(
Aber hier ist die Datei: http://members.aol.com/mam/secure.xls

Manfred Müller

unread,
Jul 8, 1999, 3:00:00 AM7/8/99
to
Hallo zum dritten Mal

Irgentwie ist heute der Wurm drin.
Wie ich die Datei von Hans geöffnet habe, habe ich schon geschrieben.
Was in dem Posting nicht drin gestanden hat, ist die Bitte, sich doch mal
dieser Mappe anzunehmen. Bestimmt ist auch diese Datei zu knacken.
Ich möchte aber wissen, wie leicht es ist und wie es gemacht wurde.
Hier noch mal die Adresse:

Manfred Müller

unread,
Jul 9, 1999, 3:00:00 AM7/9/99
to
Ich werde noch wahnsinnig
Die Adresse lautet:http://members.aol.com/mamsoft/mam/secure.xls


Manfred Müller <mam...@aol.com> schrieb in im Newsbeitrag:

#f9#M#Xy#GA....@cppssbbsa02.microsoft.com...

Andreas Steffens

unread,
Jul 9, 1999, 3:00:00 AM7/9/99
to
Hallo Manfred,

> > Irgentwie ist heute der Wurm drin.
> > Wie ich die Datei von Hans geöffnet habe, habe ich schon
geschrieben.
> > Was in dem Posting nicht drin gestanden hat, ist die Bitte, sich
doch mal
> > dieser Mappe anzunehmen. Bestimmt ist auch diese Datei zu knacken.
> > Ich möchte aber wissen, wie leicht es ist und wie es gemacht wurde.

Gleicher Grundansatz wie bei Hans, Events ausschalten, Mappe per Makro
öffnen, Arbeitsmappen- und Blattschutz z.B. mit password.xla entfernen,
schwarze Füllung entfernen, ausgeblendete Zeilen und Spalten einblenden,
that's it.
Leider habe ich keinen VBA-Passwort-Knacker, deshalb weiß ich nicht
genau, was im Hintergrund passiert, es scheint allerdings nicht
besonders kompliziert zu sein (einfache Abfrageschleife, die nach
dreimaliger falscher Eingabe des Passworts den Inhalt des Arbeitsblattes
löscht.).
Nicht besonders trickreich. Die Idee mit dem Löschen des Datenbereichs
bei dreifach falscher Passworteingabe ist ja ganz nett, läßt sich aber
mit der Abschaltung der Events aushebeln.
Mal allgemein zu diesem Thema: Das ein zwangsweises Ausführen von Makros
beim Öffnen einer Mappe scheinbar nicht möglich ist, halte ich für gut,
so sind "echte" Makroviren nahezu unmöglich, bzw. leicht zu erkennen.
Aber vielleicht findet sich ja doch noch eine Möglichkeit...

Tschö,
Andreas

Manfred Müller

unread,
Jul 9, 1999, 3:00:00 AM7/9/99
to

> Gleicher Grundansatz wie bei Hans, Events ausschalten, Mappe per Makro
> öffnen, Arbeitsmappen- und Blattschutz z.B. mit password.xla entfernen,
> schwarze Füllung entfernen, ausgeblendete Zeilen und Spalten einblenden,
> that's it.
> Leider habe ich keinen VBA-Passwort-Knacker, deshalb weiß ich nicht
> genau, was im Hintergrund passiert, es scheint allerdings nicht
> besonders kompliziert zu sein (einfache Abfrageschleife, die nach
> dreimaliger falscher Eingabe des Passworts den Inhalt des Arbeitsblattes
> löscht.).

Wenn es SO einfach gewesen wäre, dann hätte ich die Mappe nicht gepostet.
Hast du die Daten und den eMail-Link gefunden???

Andreas Steffens

unread,
Jul 9, 1999, 3:00:00 AM7/9/99
to
Hallo Manfred,

> Wenn es SO einfach gewesen wäre, dann hätte ich die Mappe nicht
>gepostet.
> Hast du die Daten und den eMail-Link gefunden???

(Das Passwort für die Abfrage sollte übrigens nicht gerade in sicher!A1
stehen, dieses Blatt habe ich ja schon beim ersten Versuch vollständig
sehen können)

Folgendes Vorgehen:

password.xla geladen

Sub testy()
Application.EnableEvents = False

Workbooks.Open FileName:="d:\secure.xls"
End Sub

Arbeitsmappenschutz mit password.xla aufheben. Dann

Sub testy2()
For Each blatt In Workbooks("secure.xls").Sheets
blatt.Visible = True
Next
End Sub

Und schon kann ich Deinen Mail Link und die "wichtigen" Daten in
Tabelle2 lesen.(mam...@aol.com)
>:->>

Übrigens, den Code des Blattes Sicher kann ich ebenfalls lesen:

Blatt nach Deaktivierung des Arbeitsmappenschutzes in neue Mappe
kopieren. Schon ist der VBA-Schutz dahin. Übrigens: ein sehr kreatives
Blattschutzkennwort;-)
(Willst Du daraus allen Ernstes wirklich Shareware machen ?! ;-))

Der Haken bleibt nach wie vor, das sich kein Makro beim Öffnen der
Arbeitsmappe zwingend starten läßt. Damit sind alle Hintertürchen offen.
Arbeitsmappen- und Blatt- und Dateischutz sind heutzutage ja leider kein
Hindernis
mehr.

Tschö,
Andreas


0 new messages