Hayatın İçinden Haberler…

Excel Şifre Kırma ve Kaldırma ve Koruma Şifresi Sıfırlama %100 Çözüm

Çalışanların En Çok Başına Gelen Sıkıntılardan Biridir Excel Koruma Şifresi… Excel Koruma Şifresi Nasıl Kırılır?, Excel Koruma Şifresi Değiştirme, Excel Koruma Şifresi Sıfırlama , Excel Koruma Şifresi Kaldırma Hakkında Tüm Ayrıntılar ve %100 Çözümü Özel Haberimizde…

Excel Şifre Kırma ve Kaldırma ve Koruma Şifresi Sıfırlama %100 Çözüm
Bu haber 01 Ocak 2018 - 13:46 'de eklendi ve 18.931 kez görüntülendi.

İş hayatında en çok karşılaşılan sıkıntılardan biri excel dosyalarına konulan şifreler. Aslında uzun uğraşlar verdiğiniz formüller yazdığınız ve tablolar ile düzenlediğiniz excel dosyanızın içeriğinin kimse tarafından alınmamasını istemeniz gayet normal. Fakat bazen excel dosyanızda ki koruma şifresini unutabilirsiniz. Yada çok önemli bir zamanda size gönderilen excel dosyasındaki verilere ihtiyacınız olabilir. Bu gibi durumlarda bir çok excel şifre kırıcı olsa da maalesef sonuç almak imkansız.

Excel dosyalarında en çok kullanılan şifreleme ise koruma şifresi koymaktır. Bu koruma şifresi bazen formüllerin kopyalanmasını engeller bazen dosya üzerinde değişiklik yapmanızı engelleyebilir. Özellikle excel 2000 versiyonlarında koruma şifresi ve açılış şifresi kırmak son derece zor idi. Fakat aşağıdaki yöntemle sadece excel 2000 ve 2003 te yapılmış Xls dosyaları ile Excel 2007 – 2010-2013 ve 2016 sürümlerinde hazırlanmış Xlsx dosyalarınında şifrelerini kolaylıkla çözebilirsiniz.




Gelelim Excel Koruma Şifresi Konmuş dosyanın şifresini nasıl kaldırıp sıfırlayacağımıza. Aslında aşağıda resimlerle de net bir şekilde anlattık. Yinede takıldığınız konu olursa yorum bölümünden yazabilirsiniz.




1 ) Öncelikle excel koruma şifresi olan excel dosyamızı açıyoruz.

2 ) Önce Alt+F11 tuşlarına basarak yada Geliştirici sekmesinden Visual Basic bölümüne tıklayarak Excel dosyalarında kod yazabileceğimiz ekranı açıyoruz. Geliştirici sekmesini açmak için Dosya > Seçenekler > Şeridi Özelleştir > Geliştirici bölümünün yanındaki tüm check işaretlerini işaretlemeliyiz.

3 ) Visual Basic kod ekranında Üst menülerden İnsert içerisinden Module bölümüne tıklıyoruz.

4 ) En önemli yer burası açılan modüle kısmına aşağıdaki kodları yapıştırmanız gerekiyor.

Sub SifreAc()
Dim i As Integer, j As Integer, k As Integer
Dim l As Integer, m As Integer, n As Integer
Dim i1 As Integer, i2 As Integer, i3 As Integer
Dim i4 As Integer, i5 As Integer, i6 As Integer
On Error Resume Next
For i = 65 To 66
For j = 65 To 66
For k = 65 To 66
For l = 65 To 66
For m = 65 To 66
For i1 = 65 To 66
For i2 = 65 To 66
For i3 = 65 To 66
For i4 = 65 To 66
For i5 = 65 To 66
For i6 = 65 To 66
For n = 32 To 126
ActiveSheet.Unprotect Chr(i) & Chr(j) & Chr(k) & _
Chr(l) & Chr(m) & Chr(i1) & Chr(i2) & Chr(i3) _
& Chr(i4) & Chr(i5) & Chr(i6) & Chr(n)
If ActiveSheet.ProtectContents = False Then
MsgBox “One usable password is ” & Chr(i) & Chr(j) _
& Chr(k) & Chr(l) & Chr(m) & Chr(i1) & Chr(i2) _
& Chr(i3) & Chr(i4) & Chr(i5) & Chr(i6) & Chr(n)
Exit Sub
End If
Next
Next
Next
Next
Next
Next
Next
Next
Next
Next
Next
Next
End Sub

Tavsiye Haber:   Kablosuz Elektrik Akımı Projesi Nedir?Hangi Aşamada?

5 ) Ekranda bulunan yeşil ok (Çalıştır) tuşuna basıyoruz. Ekrana bir şifre yazacak aslında bu şifre çokta önemli değil. Zaten şuan dosya koruması kalkmış durumda. En sağlıklısı dosyayı yeniden farklı kaydederek masaüstünüze korumasız bir kopyasını almak. Bundan sonra tüm formüller kodlar yazılar ve korunan alanların hepsine erişebilirsiniz.

Yukarıdaki işlem kesinlikle %100 çalışmaktadır. Excel tüm sürümlerinde denenmiştir. Fakat yinede takıldığınız konu olursa yorum kısmından yazabilirsiniz.

24.10.1987 İstanbul Doğumlu.
Marmara Üniversitesi Radyo ve Televizyon Programcılığı Mezunu
Evli ve 3 Çocuk Babası / Uzmanlık Alanı : Gündem ve Siyaset
HABER HAKKINDA GÖRÜŞ BELİRT

YASAL UYARI! Suç teşkil edecek, yasadışı, tehditkar, rahatsız edici, hakaret ve küfür içeren, aşağılayıcı, küçük düşürücü, kaba, pornografik, ahlaka aykırı, kişilik haklarına zarar verici ya da benzeri niteliklerde içeriklerden doğan her türlü mali, hukuki, cezai, idari sorumluluk içeriği gönderen kişiye aittir.
16 ADET YORUM YAPILDI
Adem yigit23 Mayıs 2018 / 06:56 Cevapla

Ya gerçek ten çok sağolun. Çok önemli bir Excel dosyasinin şifresini unutmuşum. Sayenizde çok basit şekilde çözdüm. Harikasınız

Kenan yigit29 Mayıs 2018 / 15:24 Cevapla

Çok sağolun acayip işime yaradı aylardır uğraşıyordum sayenizde Excel dosyasinin şifresini buldum. Teşekkürler…

ismail18 Haziran 2018 / 22:39 Cevapla

MsgBox “One usable password is ” & Chr(i) & Chr(j) _
& Chr(k) & Chr(l) & Chr(m) & Chr(i1) & Chr(i2) _
& Chr(i3) & Chr(i4) & Chr(i5) & Chr(i6) & Chr(n)

syntax error çalıştırınca hata mesajı veriyor

    Güçlü29 Haziran 2018 / 14:59 Cevapla

    Bunu dene. Indentationlardan kaynaklı sanırım sorun.
    Sub SifreAc()
    Dim i As Integer, j As Integer, k As Integer
    Dim l As Integer, m As Integer, n As Integer
    Dim i1 As Integer, i2 As Integer, i3 As Integer
    Dim i4 As Integer, i5 As Integer, i6 As Integer
    On Error Resume Next
    For i = 65 To 66
    For j = 65 To 66
    For k = 65 To 66
    For l = 65 To 66
    For m = 65 To 66
    For i1 = 65 To 66
    For i2 = 65 To 66
    For i3 = 65 To 66
    For i4 = 65 To 66
    For i5 = 65 To 66
    For i6 = 65 To 66
    For n = 32 To 126
    ActiveSheet.Unprotect Chr(i) & Chr(j) & Chr(k) & _
    Chr(l) & Chr(m) & Chr(i1) & Chr(i2) & Chr(i3) _
    & Chr(i4) & Chr(i5) & Chr(i6) & Chr(n)
    If ActiveSheet.ProtectContents = False Then
    MsgBox “One usable password is ” & Chr(i) & Chr(j) _
    & Chr(k) & Chr(l) & Chr(m) & Chr(i1) & Chr(i2) _
    & Chr(i3) & Chr(i4) & Chr(i5) & Chr(i6) & Chr(n)
    Exit Sub
    End If
    Next
    Next
    Next
    Next
    Next
    Next
    Next
    Next
    Next
    Next
    Next
    Next
    End Sub

Hikmet polat23 Haziran 2018 / 09:50 Cevapla

Allah razı olsun sizden . O kadar uğraştım çok önemli bir Excel dosyasının şifresini sifirladim. Hiç kimse neden bunu yazmamıs anlamadım Excel koruma şifresi kırmak çok basit mis.

emre sarısoy25 Haziran 2018 / 11:35 Cevapla

MsgBox “One usable password is ” & Chr(i) & Chr(j) _
& Chr(k) & Chr(l) & Chr(m) & Chr(i1) & Chr(i2) _
& Chr(i3) & Chr(i4) & Chr(i5) & Chr(i6) & Chr(n)

syntax error çalıştırınca hata mesajı veriyor

    Guclu29 Haziran 2018 / 15:00 Cevapla

    Sub SifreAc()
    Dim i As Integer, j As Integer, k As Integer
    Dim l As Integer, m As Integer, n As Integer
    Dim i1 As Integer, i2 As Integer, i3 As Integer
    Dim i4 As Integer, i5 As Integer, i6 As Integer
    On Error Resume Next
    For i = 65 To 66
    For j = 65 To 66
    For k = 65 To 66
    For l = 65 To 66
    For m = 65 To 66
    For i1 = 65 To 66
    For i2 = 65 To 66
    For i3 = 65 To 66
    For i4 = 65 To 66
    For i5 = 65 To 66
    For i6 = 65 To 66
    For n = 32 To 126
    ActiveSheet.Unprotect Chr(i) & Chr(j) & Chr(k) & _
    Chr(l) & Chr(m) & Chr(i1) & Chr(i2) & Chr(i3) _
    & Chr(i4) & Chr(i5) & Chr(i6) & Chr(n)
    If ActiveSheet.ProtectContents = False Then
    MsgBox “One usable password is ” & Chr(i) & Chr(j) _
    & Chr(k) & Chr(l) & Chr(m) & Chr(i1) & Chr(i2) _
    & Chr(i3) & Chr(i4) & Chr(i5) & Chr(i6) & Chr(n)
    Exit Sub
    End If
    Next
    Next
    Next
    Next
    Next
    Next
    Next
    Next
    Next
    Next
    Next
    Next
    End Sub

gencay atay1 Temmuz 2018 / 22:46 Cevapla

MsgBox “One usable password is ” & Chr(i) & Chr(j) _
& Chr(k) & Chr(l) & Chr(m) & Chr(i1) & Chr(i2) _
& Chr(i3) & Chr(i4) & Chr(i5) & Chr(i6) & Chr(n)

syntax error çalıştırınca hata mesajı veriyor

Nazif dogan7 Temmuz 2018 / 09:47 Cevapla

Aylardır Excel dosyasinin şifresini kırmaya çalışıyorum. Bu kadar basit olamaz ya:) valla sayenizde 5 dakika surmedi Excel şifresinin sıfırlanması. Teşekkürler

numANdroid19 Temmuz 2018 / 10:13 Cevapla

hata veren yerdeki Tırnak İşaretlerini (“) silip tekrar yazın
satır sonlarındaki Alt Çizgileri (_) silin ve alt çizgiyle ayrılmış olan satırları yukarı alarak birleştirin. Tek bir satır haline getirin…

Hasan Basri Yılmaz27 Temmuz 2018 / 17:19 Cevapla

Malesef 2016 da çalışmıyor Bu hata alınmaktadır.
MsgBox “One usable password is ” & Chr(i) & Chr(j) _
& Chr(k) & Chr(l) & Chr(m) & Chr(i1) & Chr(i2) _
& Chr(i3) & Chr(i4) & Chr(i5) & Chr(i6) & Chr(n)

syntax error çalıştırınca hata mesajı veriyor

ismail28 Temmuz 2018 / 22:31 Cevapla

merhaba, excel in açılış şifresini nasıl bulabilirim… şifreyi unuttum… dosyayı açamıyorum…

Selçuk karaca31 Temmuz 2018 / 23:54 Cevapla

Merhabalar bu yöntem sayfa korumasını kaldırıyor peki çalışma kitabına koyulan parola nasıl kaldırılabilinir

ERSEN ŞENER28 Ağustos 2018 / 09:51 Cevapla

2013 sürümünde hata veriyor yardımcı olabilirimisiniz?

İSMAİL AS18 Eylül 2018 / 13:07 Cevapla

Hocam Merhaba
Benim için çok önemli bir dosya var bir türlü açamıyorum. yardımcı olabilirseniz sevinirim.
Bu ve benzeri bir kaç işlem uyguladım ama olmuyor maalesef
dosyayı sizlere göndersem açabilir misiniz ?

MUHARREM AYGÜN10 Ekim 2018 / 16:59 Cevapla

EXCEL ÇALIŞMA SAYFASINDAKİ KORUMAYI KALDIRMA KODUNU YAZDIĞIMDA MsgBox “One usable password is ” & Chr(i) & Chr(j) _
& Chr(k) & Chr(l) & Chr(m) & Chr(i1) & Chr(i2) _
& Chr(i3) & Chr(i4) & Chr(i5) & Chr(i6) & Chr(n)

KODUNU KIRMIZI YAZARAK “COMPİLE ERROR: SYNTAX ERROR “YAZIYOR.

POPÜLER FOTO GALERİLER
SON DAKİKA HABERLERİ
İLGİLİ HABERLER
web counter free