Desbloquear senha de planilhas Excel ou LibreOffice Calc

E aí Rezenhadores de plantão beleza? Não é das dicas mais recomendas pelos puristas, contudo, já me ajudou muito, tem me ajudado conforme a demanda e tenho certeza que irá ajudar você ou quem pesquisar por algo nesta infinita Highway que é a Internet. Tenho este código salvo há pelo menos oito anos em meus arquivos e não sei porque cargas-d’água até hoje nunca compartilhei. Então vamos deixar de lenga lenga e confira abaixo, descubra de forma muito simples e rápida como desbloquear planilhas salvas por senha, seja do Office Excel ou LibreOffice Calc.

Primeiramente, se você ainda não conhece o canal ReZenhando, tá esperando o quê? Acesse já!

Como desbloquear senha de planilha Excel

• Clique na aba Desenvolvedor e no botão Visual Basic;
• Na guia de projetos á esquerda localize o projeto VBAProject;
• Clique na pasta módulos deste projeto e abra um dos módulos;
• No final dos códigos que existem lá, cole o código abaixo. O resultado pode demorar um pouco para aparecer, mas ele vai exibir uma mensagem na tela informando uma nova senha, mas já terá desbloqueado a planilha.

Sub DesprotegerPlanilhaAtiva()
Dim i, i1, i2, i3, i4, i5, i6 As Integer, j As Integer, k As Integer, l As Integer, m As Integer, n 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

Como desbloquear senha de planilha LibreOffice Calc

• Clique na aba Ferramentas,Macros e em seguida Executar Macros;
• Na guia de projetos á esquerda localize o projeto e selecione Module1 com dois cliques;
• Na tela que abri cole o código abaixo. O resultado pode demorar um pouco para aparecer, mas ele vai exibir uma mensagem na tela informando uma nova senha, mas já terá desbloqueado a planilha.

Sub DesprotegerPlanilhaAtiva()
Dim i, i1, i2, i3, i4, i5, i6 As Integer, j As Integer, k As Integer, l As Integer, m As Integer, n 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

Curtiu esse macete RAIZ? Comente, seu comentário é a alma do canal e do blog. Até mais e obrigado pelos peixes!

• Inscreva-se no Youtube
• Siga-nos no WordPress
• Siga-nos no Twitter
• Siga-nos no Instagram
• Curta no Facebook

#excel #office #microsoftexcel #microsoft #powerpoint #word #o #cursodeexcel #cursoexcel #curso #business #microsoftoffice #aprenderexcel #motivation #dicasexcel #msexcel #planilhas #data #windows #like #cursos #smallbusiness #truquesexcel #ado #vespa #empresarios #covid #studentlife #agencylife #dataentry #powerbi #media #socialbrand #weekendwork #nightauditmemes #networkyourway #managersgonewild #careerstrategy #careerbydesign #loveyourwork #linkedinlearning #informationalinterviews #hotellife #courser #workplace #dashboard #online #s #exceltips #software #exceltraining #informatica #spreadsheet #excelbasico #ktm #planilhasexcel #dataanalysis #libreoffice #informatique #openoffice #adomicile #excel #assistanceinformatique #lauragais #hautegaronne #occitanie #word #tarn #powerpoint #ari #domicile #formationbureautique #formateurinformatique #formationadomicile #ge #pc #microsoft #soutientinformatique #formateur #aude #tablette #mac #senior #aideinformatique #aide #coursinformatique #opensource #formationinformatique #windows #inform #linux #wpsoffice #computer #calc #ofimatica #informatica #linuxfan #computerscience #linuxubuntu #pcpr #linuxday #o #office #concurso #fabianoabreu #linuxmint #pmpr #blico #ticaparaconcursos #concursosp #bmpr #freesoftware #compliance #sepatuanak #technologysolutions #cyberresilience #docs #google #spreadsheet #hacker #hacking #cybersecurity #hackers #hack #ethicalhacking #linux #programming #kalilinux #coding #security #technology #anonymous #programmer #ethicalhacker #infosec #python #hacked #tech #cyber #hackerindonesia #hackerman #pentesting #cybercrime #computerscience #malware #cyberattack #computer #developer #coder #hackerspace #hacks #code #java #informationsecurity #instagram #termux #hackinstagram #javascript #privacy #instagramhack #internet #html #facebookhack #bugbounty #hackernews #software #android #follow #dataprotection #windows #virus #webdeveloper #blackhat #networking #memes #programmingmemes #hackfacebook #Amateur #Amazon #Art #Articles #Beauty #Best #Books #Blog #Blogger #Blogging #Book #Review #Book #Reviews #Books #Breaking #News #Business #Business #Books #CNN #Chocolate #Christian #Christianity #Computer #Books #Covid19 #CraftBeerPi3 #Cultura #Culture #Cyberpainting #Digital #Marketing #Donald #Trump #Education #Engineering #Books #Engineering #Books #Authority #Books #Buy #online #English #Entertainment #Europe #Faith #Family #Fantasy #Fashion #Featured #Fiction #Fitness #Food #Food #Porn #Football #France #Funny #God #Gratis #Halloween #History #Home #Horror #Humor #Info #Inspiration #Instagram #Italy #Jesus #Jobs #Jokes #KRON4 #Không #phân #loại #Life #Lifestyle #Love #Marketing #Mental #Health #Moneycontrol #Latest #News #Movies #Music #Música #NYT #Nature #New #Poems #Opinion #Opsi #Informasi #Personal #Photo #Photography #Podcast #Poem #Poems #Poesía #Poetry #Politics #Política #Pornhub #- #RSS #Video #Feed #Producto #Quotes #Reading #Real #Estate #Recipes #Review #Reviews #Romance #SEO #SEO #& #Tech #SFW #Sports #TOP #Tech #Tribune #France #Thoughts #Tidak #dikategorikan #Travel #Trending #Trump #Tumblr #USA #Uncategorised #Updates #Video #Vidão #Work #World #YouTube #Animals #Autumn #Baby #animals #Bzendoo #Christ-ing #Coronavirus #Covid #Craftbeerpi #Ctp #kaplama #izolasyon #Cute #Digitalmarketing #Duckcam #Facebook #Film #Health #Lambcam #Landscape #New #News #2 #P2p사이트 #순위 #P2p사이트 #추천 #Photos #President #trump #news #Rajasthan #Recipe #Reddit #Rgrol #Technology #Text #The #guardian #Twitter #Videos #Writing #Rezenhando #Nerd #Geek #visualbasic #css #java #javascript #php #html #programadorweb #coding #c #sql #programador #sqlserver #visualstudio #javascriptdeveloper #pemrograman #javadeveloper #programmerindonesia #it #bootstrap #csharp #pemrogramanweb #koding #javaindonesia #programmingindonesia #javascriptindonesia #phpdeveloper #vb #phpindonesia #fullstackdeveloper #backenddeveloper #net #jquery #frontenddeveloper #ajax #desarrolladornet #frontendwebdeveloper #entityframework #programadornet #ti #python #programmer #programming #developer #website #cursopresencial #capacitacionpresencial #recienegrsado #buscandoempleo #web #desarrollo #windows #code #yaz #microsoft #l #universidad #delphi #coder #software