Excel Forum - Porady, Pomoc,  Excel Help, Excel FAQ Strona Główna
 FAQ  RegulaminRegulamin  Szukaj   Użytkownicy   Grupy   Rejestracja   Profil   Twoje wiadomości   Zaloguj 


Poprzedni temat «» Następny temat
ID tematu: 69451 Skopiuj do schowka Wrażliwe dane - anonimizacja
Autor Wiadomość
J_B 
Excel Expert


Wersja: Win Office 2016
Pomógł: 541 razy
Posty: 1339
Wysłany: 28-11-2020, 18:35   Wrażliwe dane - anonimizacja

Często zdarza problem z umieszczaniem załączników w których mamy "wrażliwe" dane
Postanowiłem jakoś temu zaradzić
W załączniku kod szyfrujący zaznaczony obszar w arkuszu
Przyznam że nie był intensywnie testowany (kod w znacznej części znaleziony w internecie ) przed zastosowaniem zalecam zrobienie kopii skoroszytu
Może w ten sposób nie będzie tłumaczenia "nie mogę załączyć skoroszytu ze względu na wrażliwe dane"
Janusz

SzyfrujOdszyfruj.xlsm
Pobierz Plik ściągnięto 23 raz(y) 28.2 KB

ID posta: 395737 Skopiuj do schowka
 
 
Maciej Gonet 
Excel Expert


Wersja: Win Office 2016
Pomógł: 2119 razy
Posty: 6636
Wysłany: 28-11-2020, 19:37   

Pomysł ciekawy :beer , nie jestem specjalistą od szyfrów, więc nie potrafię ocenić mocy tego szyfrowania, ale rozumiem, że to nie jest narzędzie dla szpiegów.
Z prostych zastosowań excelowych zauważyłem, że procedury szyfrowania-deszyfrowania nie zachowują formatu liczb sformatowanych jak tekst za pomocą apostrofu - zamieniają je na zwykłe liczby.
Przydałaby się też opcja szyfrowania tylko tekstów, a pomijania liczb. Ta procedura pomija szyfrowanie formuł, ale jeśli dane formuły zostaną zaszyfrowane, to nic i tak z tego nie wyniknie.
ID posta: 395741 Skopiuj do schowka
 
 
Maciej Gonet 
Excel Expert


Wersja: Win Office 2016
Pomógł: 2119 razy
Posty: 6636
Wysłany: 29-11-2020, 01:03   

Ale to jest chyba ten sam załącznik, co poprzednio.
ID posta: 395753 Skopiuj do schowka
 
 
J_B 
Excel Expert


Wersja: Win Office 2016
Pomógł: 541 razy
Posty: 1339
Wysłany: 29-11-2020, 08:41   

Maciej Gonet napisał/a:
Ale to jest chyba ten sam załącznik, co poprzednio.

Starość nie radość Robię zawsze kopie więc mam w 2 lokalizacjach plik :oops:
Mam nadzieję że trafiłem w poprawny
Janusz

SzyfrujOdszyfruj.xlsm
Pobierz Plik ściągnięto 26 raz(y) 28.11 KB

ID posta: 395756 Skopiuj do schowka
 
 
Maciej Gonet 
Excel Expert


Wersja: Win Office 2016
Pomógł: 2119 razy
Posty: 6636
Wysłany: 29-11-2020, 10:24   

Tak, teraz załącznik jest już inny. Widać to nawet po długości pliku :-D
Wszystko działa, na potrzeby anonimizacji załączników na pewno wystarczy.
Warto podkreślić, że do zaszyfrowania można zaznaczyć zakres nieciągły, więc łatwo można wybrać to, co chcemy zaszyfrować. :clap

Gdyby ktoś chciał to wykorzystać do bardziej zaawansowanego szyfrowania, to można by uwzględniać też adres komórki. W tej chwili jest tak, że ten sam tekst w różnych komórkach jest szyfrowany tak samo. Można więc łatwo zidentyfikować identyczne teksty.
Ale to tylko taka obserwacja. Nie czuj się wywołany do kolejnej modyfikacji :-D
ID posta: 395758 Skopiuj do schowka
 
 
J_B 
Excel Expert


Wersja: Win Office 2016
Pomógł: 541 razy
Posty: 1339
Wysłany: 29-11-2020, 10:45   

Maciej Gonet napisał/a:
Można więc łatwo zidentyfikować identyczne teksty.

To jest do zrobienia w pętli przed wywołaniem funkcji kodującej wygenerować nowy klucz szyfrujący
Odczytanie ponowne raczej mało realne
Maciej Gonet napisał/a:
Nie czuj się wywołany do kolejnej modyfikacji

No i poczułem się wywołany :-D
Kod:
    For Each Kom In Selection
        If IsNumeric(Kom.Value) = True Or Kom.HasFormula = True Then
        Else
         call GenerujLosowyKlucz
            Kom.Value = Base64Encode(Kom.Value)
        End If
    Next

Janusz
ID posta: 395763 Skopiuj do schowka
 
 
Rafał B.
Stały bywalec Excelforum



Wersja: Win Office 2016
Pomógł: 40 razy
Posty: 288
Wysłany: 01-12-2020, 15:00   

Pomysł bardzo fajny, ale należy do implementacji użyć kryptografii- jakiegoś algorytmu szyfrującego, a nie kodującego jak base64; aktualne rozwiązanie nie jest bezpieczne.
_________________
Jest niemal niemożliwe nauczenie dobrego programowania uczniów, którzy byli narażeni na kontakt z BASIC: jako potencjalni programiści są okaleczeni, bez nadziei na poprawę. (Edsger Dijkstra, pionier informatyki).
Po części dotyczy również VBA.
ID posta: 395862 Skopiuj do schowka
 
 
J_B 
Excel Expert


Wersja: Win Office 2016
Pomógł: 541 razy
Posty: 1339
Wysłany: 01-12-2020, 15:57   

Rafał B. napisał/a:
ale należy do implementacji użyć kryptografii

Może powinienem temat nazwać "Wrażliwe dane- animizacja " zamiast szyfrowanie
Moim zamiarem nie było tworzenie nowej "enigmy" dla szyfrantów
Raczej chciałem wytrącić z rąk argument "nie mogę załączyć oryginału bo...."
Obecnie podam link i zaproponuję zaciemnienie wrażliwych danych a czy skorzysta z tego rozwiązania to już jego sprawa
Janusz
ID posta: 395867 Skopiuj do schowka
 
 
Artik 



Wersja: Win Office 365
Pomógł: 3142 razy
Posty: 10399
Wysłany: 11-12-2020, 15:21   

J_B napisał/a:
Może powinienem temat nazwać "Wrażliwe dane- animizacja "
Czy takie rzeczy musi robić Admin? ;-)
Choć wątek nazwę nieco inaczej.

Janusz, jeśli uważasz, że dzieło można uznać za zakończone, proponuję utworzyć nowy, przypięty wątek z krótkim opisem jak z tego korzystać. Bo temat będzie bardzo pomocny. Jak będą problemy z przypięciem, to Admini służą pomocą.

Artik
_________________
Persistence is a virtue in the world of programming.
ID posta: 396442 Skopiuj do schowka
 
 
J_B 
Excel Expert


Wersja: Win Office 2016
Pomógł: 541 razy
Posty: 1339
Wysłany: 11-12-2020, 15:47   

Artik napisał/a:
Choć wątek nazwę nieco inaczej.

Proszę bardzo nazywaj inaczej
Artik napisał/a:
jeśli uważasz, że dzieło można uznać za zakończone

Myślę że można uznać za zakończone
Artik napisał/a:
Bo temat będzie bardzo pomocny. Jak będą problemy z przypięciem, to Admini służą pomocą.

Jeżeli uznasz że warty przepięcia to proszę przypinaj
Z racji wiekowych ograniczeń pozostanę przy opisie z arkusza
Chyba że Ty zachcesz dodać sensowny opis
Ps
Dodam że zauważyłem iż może to być z powodzeniem użyte jako generator hasła
Tak wygenerowane hasło na podstawie nazwiska i imienia w moim banku zostało uznane za bardzo dobre :-D
Janusz
ID posta: 396446 Skopiuj do schowka
 
 
Wyświetl posty z ostatnich:   
Odpowiedz do tematu
Nie możesz pisać nowych tematów
Nie możesz odpowiadać w tematach
Nie możesz zmieniać swoich postów
Nie możesz usuwać swoich postów
Nie możesz głosować w ankietach
Nie możesz załączać plików na tym forum
Możesz ściągać załączniki na tym forum
Dodaj temat do Ulubionych
Wersja do druku

Skocz do:  

Powered by phpBB modified by Przemo © 2003 phpBB Group
Theme xandgreen created by spleen& Programosy modified v0.3 by warna
Opieka techniczna www.marketingNET.pl

Archiwum

Strona używa plików cookies.

Kliknij tutaj, żeby dowiedzieć się jaki jest cel używania cookies oraz jak zmienić ustawienia cookie w przeglądarce.
Korzystając ze strony użytkownik wyraża zgodę na używanie plików cookies, zgodnie z bieżącymi ustawieniami przeglądarki.
Sprawdź, w jaki sposób przetwarzamy dane osobowe