Microsoft Office Forum [ www.Office-Fragen.de ] >> READONLY <<

Microsoft Office 2003-2019 => Excel => Thema gestartet von: Winne am Februar 25, 2019, 08:26:47 Vormittag

Titel: Office 365: Das Makro SN eines USB Sticks
Beitrag von: Winne am Februar 25, 2019, 08:26:47 Vormittag
Hallo zusammen,

als kompletter Nichtswisser im Bereich Makro habe ichmal folgende Frage. Unter https://www.excel-inside.de/vba-loesungen/sonstiges/933-makro-kann-nur-von-einem-bestimmten-usb-stick-aus-gestartet-werden (https://www.excel-inside.de/vba-loesungen/sonstiges/933-makro-kann-nur-von-einem-bestimmten-usb-stick-aus-gestartet-werden) gibt es ja diese schöne Anleitung. Nun habe ich mal eine Frage:

Ich habe ein Kalkulationsprogramm erstellt, wo es um Produktionszeiten geht (was ja aber keine Rolle spielt). Was muss ich denn genau machen um diese Exceltabelle auf einem Stick so abzusichern. Wo muß ich denn genau was eingeben. Die Seriennummer habe ich ausgelesen und auch entsprechend eintragen, aber was danach kommt - null Plan...

LG

Winne
Titel: Antw:Office 365: Das Makro SN eines USB Sticks
Beitrag von: maninweb am Februar 25, 2019, 09:31:02 Vormittag
Hallo,

in dem Artikel ist auch eine Beispieldatei vorhanden. Unabhängig davon und meine persönliche Ansicht,
vergiss Sicherheit und/oder Kopierschutz für Excel-Dateien. Das auszuhebeln ist in 99% der Fälle gar
kein Problem.

Gruß
Titel: Antw:Office 365: Das Makro SN eines USB Sticks
Beitrag von: Winne am Februar 25, 2019, 09:35:40 Vormittag
Das mit der Sicherheit ist mir alles sehr bewußt.
Im Beispiel wird mir aber nirgends gezeigt/gesagt wir ich ein EIGENES Excelfile absichere. Der Code steht zwar im Hintergrund aber ich kann auf einem falschen Sticks meine Tabelle mmer noch starten. Also ist doch das Markro nicht aktiv :-(
Titel: Antw:Office 365: Das Makro SN eines USB Sticks
Beitrag von: maninweb am Februar 25, 2019, 10:41:04 Vormittag
Hallo,

Du könntest z.B. beim Start der Mappe vom USB Stick die Seriennummer auslesen. Ist diese gültig,
müsste Weiterer_Code ausgeführt werden, sonst nicht. Habe das allerdings nicht ausführlich getestet.

Code: Visual Basic
  1. Private Sub Workbook_Open()
  2.  
  3.   USB_ID_auslesen
  4.  
  5. End Sub

Gruß
Titel: Antw:Office 365: Das Makro SN eines USB Sticks
Beitrag von: Winne am Februar 25, 2019, 12:00:16 Nachmittag
und was müßte in "Weiterer_Code" eingefügt werden um das Blatt text.xlsm zu starten ?
Titel: Antw:Office 365: Das Makro SN eines USB Sticks
Beitrag von: maninweb am Februar 25, 2019, 17:47:42 Nachmittag
Hallo,

unabhängig davon, ob ich in diesem Thread weiter aktiv sein kann oder nicht, ist mir beispielsweise nicht 100 Prozent
klar, was Du genau erreichen möchtest. Was meinst Du mit "Blatt text.xlsm starten"?

Wenn das nicht mit dem Code zum USB-Stick als solches nicht funktioniert, kann ich nicht viel dazu sagen.
Müsstest Dich ggf. nach was anderem umschauen.

Gruß