Centar za edukaciju-BiH


Stranice (2):1,2

#1 22.02.2021 20:35
Amelasar Van mreze
Clan
Registrovan od:07.04.2011
Postovi:263


Predmet:Excel - pomoc
Potrebno mi je naci odakle kupi podatak "PoslGod". Sve sam pretrazila i bezuspjesno. Moze li neko pogledati? Postoji sheet "Baza" al je negdje skriven. Obrisala sam PoslGod i napravila drugi sa istim imenom na jednom od dostupnih listova i to sada radi.
Hvala.

Prilozi:
Informacije o tipu datoteke za:rar  GodObracun.rar
Preuzimanja:103
Velicina datoteke:907.30 KB


Pozdrav, Amela
Ovaj post je ureden 1 puta. Posljednja izmjena 22.02.2021 20:57 od strane Amelasar. ↑  ↓

#2 22.02.2021 21:01
zxz Van mreze
Administrator
Registrovan od:03.02.2009
Postovi:10,612


Predmet:Re: Excel - pomoc
Pa dobr gdje se pojavljuje.
Gdje vidis
Podrška samo putem foruma, jer samo tako i ostali imaju koristi od toga.
↑  ↓

#3 22.02.2021 21:39
zxz Van mreze
Administrator
Registrovan od:03.02.2009
Postovi:10,612


Predmet:Re: Excel - pomoc
Nema tog skrivenog sita u stvari nije niti jedan sit skriven.
Kad je skriven imas na situ-skocnom meniju unhide.
Mozda si zakacila tu popravljenu.
ne razumijem te, mozda neko drugi razumije.
Podrška samo putem foruma, jer samo tako i ostali imaju koristi od toga.
↑  ↓

#4 24.02.2021 13:21
Avko Van mreze
Administrator
Registrovan od:28.05.2014
Postovi:4,707


Predmet:Re: Excel - pomoc
fakat je skriven list Baza, to je list20. Skriveni su listovi od 20 do 26.
Dobro je to Amela primjetila. Vjerojatno zenska intuicija, a sta bi drugo bilo.

Uglavnom. Otvorim ja excel dokument pa u vba, onda kliknem na taj list i u propertisu stavim na visible.
sada kada odem na njega trazi me password za gledati. Sav je plav kao more. nista se nevidi

Onda ubacim u njega kod

PreuzmiIzvorni kôd (Text):
  1. Sub PasswordBreaker()
  2.     'Breaks worksheet password protection.
  3.  
  4.     Dim i As Integer, j As Integer, k As Integer
  5.     Dim l As Integer, m As Integer, n As Integer
  6.     Dim i1 As Integer, i2 As Integer, i3 As Integer
  7.     Dim i4 As Integer, i5 As Integer, i6 As Integer
  8.  
  9.     On Error Resume Next
  10.  
  11.     For i = 65 To 66: For j = 65 To 66: For k = 65 To 66
  12.     For l = 65 To 66: For m = 65 To 66: For i1 = 65 To 66
  13.     For i2 = 65 To 66: For i3 = 65 To 66: For i4 = 65 To 66
  14.     For i5 = 65 To 66: For i6 = 65 To 66: For n = 32 To 126
  15.  
  16.         ActiveSheet.Unprotect Chr(i) & Chr(j) & Chr(k) & _
  17.             Chr(l) & Chr(m) & Chr(i1) & Chr(i2) & Chr(i3) & _
  18.             Chr(i4) & Chr(i5) & Chr(i6) & Chr(n)
  19.  
  20.         If ActiveSheet.ProtectContents = False Then
  21.             MsgBox "Password is " & Chr(i) & Chr(j) & _
  22.                 Chr(k) & Chr(l) & Chr(m) & Chr(i1) & Chr(i2) & _
  23.                 Chr(i3) & Chr(i4) & Chr(i5) & Chr(i6) & Chr(n)
  24.  
  25.             Exit Sub
  26.  
  27.         End If
  28.  
  29.     Next: Next: Next: Next: Next: Next
  30.     Next: Next: Next: Next: Next: Next
  31. End Sub
  32.  
  33. pokrenem sa F5 i pricekam jedno par minuta.

sada se vratim na njega, ne unosim password samo gledam . Ima zbrajanja i sve ostaloga.
Trebalo bi maknuti ispunu i slova staviti da biudu crna.
Eto toliko ja znam, neznam vise.







probao sam ucitati i u google , tamo nemoram unositi kod google mi razbije sifru
evo ovako izgleda kada ucitam u google



Jedino ja mislim da bi Dex to znao rijesiti u potpunosti, ali ko zna di je on? neznam jeli popio svu onu rakiju sto je ispeko?
hehehe
zivot je moja domovina.
Ovaj post je ureden 1 puta. Posljednja izmjena 24.02.2021 13:23 od strane Avko. ↑  ↓

#5 24.02.2021 15:40
zxz Van mreze
Administrator
Registrovan od:03.02.2009
Postovi:10,612


Predmet:Re: Excel - pomoc
Hehe dobro si nasao da je skriven.
ja sam samo gledao na desnom misu sita a tamo ga nje bilo.
E sta sad treba uradit ja i dalje neznam gdje se to pojavljuje.
sta bi trebalo ispraviti.
Podrška samo putem foruma, jer samo tako i ostali imaju koristi od toga.
↑  ↓

#6 24.02.2021 16:00
zxz Van mreze
Administrator
Registrovan od:03.02.2009
Postovi:10,612


Predmet:Re: Excel - pomoc
evo razbijeno.
Pole oznaceno bojom.
Avko je sve odradio.

Prilozi:
Informacije o tipu datoteke za:zip  godobracun.zip
Preuzimanja:96
Velicina datoteke:917.99 KB


Podrška samo putem foruma, jer samo tako i ostali imaju koristi od toga.
↑  ↓

#7 24.02.2021 16:46
Avko Van mreze
Administrator
Registrovan od:28.05.2014
Postovi:4,707


Predmet:Re: Excel - pomoc
ja na kraju zaboravio staviti excel fajl koji sam razbio. samo opisao postupak.
sada bi trebalo ta plava polja uciniti vidljivima
zivot je moja domovina.
↑  ↓

#8 24.02.2021 22:04
Amelasar Van mreze
Clan
Registrovan od:07.04.2011
Postovi:263


Predmet:Re: Excel - pomoc
Svaka cast momci. Ja sam to rijesila sto sam izbrisala PoslGod i napravila ga na nekom drugom listu.
Interesuje me kako ste vi to rijesili?

Prilozi:
Informacije o tipu datoteke za:bmp  New Bitmap Image.bmp
Preuzimanja:102
Velicina datoteke:1.12 MB
Informacije o tipu datoteke za:bmp  New Bitmap Image.bmp
Preuzimanja:103
Velicina datoteke:1.12 MB


Pozdrav, Amela
↑  ↓

#9 24.02.2021 23:45
Amelasar Van mreze
Clan
Registrovan od:07.04.2011
Postovi:263


Predmet:Re: Excel - pomoc
Razumjela sam kako :-) Hvala.
Pozdrav, Amela
↑  ↓

#10 25.02.2021 11:35
Avko Van mreze
Administrator
Registrovan od:28.05.2014
Postovi:4,707


Predmet:Re: Excel - pomoc
da bas sam htio napisati da sam objasnio ali nisam zakacio primjer kad si odgovorila da si shvatila.
Ali, jos cu jednom objasniti za svaki slucaj.

Prvo mora biti ukljucen tab Developer (Razvoj) na traci.
Jednom davno kada sam i ja trazio pomoc Dex mi je rekao da ako zelim da mu postanem frend obavezno da ukljucim taj tag. Ukljucio bi ja i crnog vraga samo da postanem njegov frend.
Bez developera nema ni VBA, poslje mi je to postalo mnogo jasnije.

1. otvoris excel fajl
2. kliknes na tab razvoj
3. pa onda na Visual Basic
4. pronades List20(baza), kliknes na njega jednom
5. u doljnem, propertisu postavis da je visible
6. uneses gornji kod , startas sa F5. Meni se vrtilo jedno minutu dok nije pokazo neka slova AABBAABBBB, ali ti to nije sifra tako da to ne unosis. Samo se otkljuca list20
7. odes na list20, i izmjenis godinu u C4 na recimo 2021

Prilozi:
Informacije o tipu datoteke za:rar  1.GodObr 12 2018 za preduzeca RS-a_razbijeno.rar
Preuzimanja:112
Velicina datoteke:908.51 KB


zivot je moja domovina.
↑  ↓

Stranice (2):1,2


Sva vremena su GMT +02:00. Trenutno vrijeme: 11: 00 am.