Note: The other languages of the website are Google-translated. Back to English

Kako zakleniti ali odkleniti celice na podlagi vrednosti v drugi celici v Excelu?

V nekaterih primerih boste morda morali zakleniti ali odkleniti celice na podlagi vrednosti v drugi celici. Na primer, morate odkleniti obseg B1: B4, če celica A1 vsebuje vrednost »Sprejem«; in se zaklene, če celica A1 vsebuje vrednost »Zavrnitev«. Kako lahko to storite? Ta članek vam lahko pomaga.

Zaklepanje ali odklepanje celic na podlagi vrednosti v drugi celici s kodo VBA


Zaklepanje ali odklepanje celic na podlagi vrednosti v drugi celici s kodo VBA

Naslednja koda VBA vam lahko pomaga zakleniti ali odkleniti celice na podlagi vrednosti v drugi celici v Excelu.

1. Z desno miškino tipko kliknite zavihek lista (list s celicami, ki jih morate zakleniti ali odkleniti glede na vrednosti v drugi celici), in kliknite Ogled kode v meniju z desnim klikom.

2. Nato kopirajte in prilepite naslednjo kodo VBA v okno Code.

Koda VBA: zaklepanje ali odklepanje celic na podlagi vrednosti v drugi celici

Private Sub Worksheet_Change(ByVal Target As Range)
    If Range("A1") = "Accepting" Then
        Range("B1:B4").Locked = False
    ElseIf Range("A1") = "Refusing" Then
        Range("B1:B4").Locked = True
    End If
End Sub

3. Pritisnite druga + Q tipke hkrati, da zaprete tipko Microsoft Visual Basic za aplikacije okno.

Od zdaj naprej, ko v celico A1 vnesete vrednost »Accepting«, se obseg B1: B4 odklene.

Pri vnosu vrednosti »Zavrnitev« v celico A1 se določen obseg B1: B4 samodejno zaklene.


Sorodni članki:


Najboljša orodja za pisarniško produktivnost

Kutools za Excel rešuje večino vaših težav in poveča vašo produktivnost za 80%

  • Ponovna uporaba: Hitro vstavite zapletene formule, grafikoni in vse, kar ste že uporabljali; Šifriraj celice z geslom; Ustvari poštni seznam in pošiljanje e-pošte ...
  • Vrstica Super Formula (enostavno urejanje več vrstic besedila in formule); Bralna postavitev (enostavno branje in urejanje velikega števila celic); Prilepite v filtrirani obseg...
  • Združi celice / vrstice / stolpce brez izgube podatkov; Vsebina razdeljenih celic; Združi podvojene vrstice / stolpce... prepreči podvojene celice; Primerjaj obsege...
  • Izberite Duplicate ali Unique Vrstice; Izberite prazne vrstice (vse celice so prazne); Super Find in Fuzzy Find v mnogih delovnih zvezkih; Naključna izbira ...
  • Natančna kopija Več celic brez spreminjanja sklica formule; Samodejno ustvarjanje referenc na več listov; Vstavi oznake, Potrditvena polja in še več ...
  • Izvleček besedila, Dodaj besedilo, Odstrani po položaju, Odstrani presledek; Ustvari in natisni vmesne seštevke strani Pretvarjanje med vsebino celic in komentarji...
  • Super filter (shranite in uporabite sheme filtrov za druge liste); Napredno razvrščanje glede na mesec / teden / dan, pogostost in drugo; Poseben filter s krepko, ležeče ...
  • Združite delovne zvezke in delovne liste; Spoji tabele na podlagi ključnih stolpcev; Razdelite podatke na več listov; Paketna pretvorba xls, xlsx in PDF...
  • Več kot 300 zmogljivih funkcij. Podpira Office / Excel 2007-2021 in 365. Podpira vse jezike. Enostavna uvedba v vašem podjetju ali organizaciji. 30-dnevna brezplačna preizkusna različica vseh funkcij. 60-dnevna garancija vračila denarja.
zavihek kte 201905

Kartica Office prinaša vmesnik z zavihki v Office in poenostavi vaše delo

  • Omogočite urejanje in branje z zavihki v Wordu, Excelu, PowerPointu, Publisher, Access, Visio in Project.
  • Odprite in ustvarite več dokumentov v novih zavihkih istega okna in ne v novih oknih.
  • Poveča vašo produktivnost za 50%in vsak dan zmanjša na stotine klikov miške za vas!
dno pisarniške mize
Komentarji (52)
Ocene še ni. Bodite prvi in ​​ocenite!
Ta komentar je moderator na spletnem mestu minimiziral
Kako lahko zaklenemo/odklenemo spremenljivo celico, npr. ko je celica [=INDEX(A16:L35,MATCH(W5,A16:A35,0),MATCH("PAY",A16:L16,0))]
Ta komentar je moderator na spletnem mestu minimiziral
Želim preprost ukaz VBA, ki ga ne morem ugotoviti, prosim za pomoč
Če je celica A1 Balnk, je celica A2 zaklenjena in če celica A1 vsebuje katero koli vrednost, je celica A2 odklenjena
Podobno, če je celica A2 prazna, je celica A3 zaklenjena in če celica A2 vsebuje katero koli vrednost, je celica A3 odklenjena
in tako naprej toliko celic glede na zahtevo v katerem koli delu lista.
Ta komentar je moderator na spletnem mestu minimiziral
Živjo, to poskušam doseči, vendar dobim napako, da VBA ne more nastaviti lastnosti Locked razreda Range, če je bil list zaščiten. Odstranitev zaščite lista bo nato izničila zaklenjeno celico. Kako to zaobiti? Hvala za kakršno koli pomoč.
Ta komentar je moderator na spletnem mestu minimiziral
Ste rešili? jaz imam enak problem
Ta komentar je moderator na spletnem mestu minimiziral
Spoštovani zapisek,
Prosimo, poskusite s spodnjo kodo VBA.

Zasebni pod delovni list_Aktiviraj()
Če ni ActiveSheet.ProtectContents Potem
Obseg("A1").Zaklenjeno = False
Obseg("B1:B4").Zaklenjeno = False
Konec Če
End Sub
Zasebni pod delovni list_Sprememba izbora(ByVal Target As Range)
Dim xRg kot razpon, xRgA kot razpon
On Error Resume Next
Application.EnableEvents = False
Nastavite xRg = Obseg ("B1:B4")
Nastavite xRgA = Obseg ("A1")
Če Intersect(Target, xRg).Address <> Target.Address _
Ali xRgA = "Sprejemam" Nato
Aplikacija EnableEvents = True
Exit Sub
ElseIf ActiveSheet.ProtectContents _
In Intersect(Target, xRg) = Target _
In xRgA.Value = "Zavrnitev" Nato
xRgA.Izberi
Konec Če
Aplikacija EnableEvents = True
End Sub
Ta komentar je moderator na spletnem mestu minimiziral
V delovnem zvezku boste želeli uporabiti vmesniško vrstico, tako da, ko odprete datoteko, zaščiti liste, vendar kljub temu omogoči makrom, da izvajajo spremembe;

Private Sub Workbook_Open() 'To gre v "Ta delovni zvezek"

Delovni listi ("Orodje za naročanje").Protect Password:="Pwd", UserInterFaceOnly:=True

End Sub
Ta komentar je moderator na spletnem mestu minimiziral
Spoštovani Ant,
Spodnja koda VBA vam lahko pomaga rešiti to težavo. Hvala za vaš komentar.

Zasebni pod delovni list_Aktiviraj()
Če ni ActiveSheet.ProtectContents Potem
Obseg("A1").Zaklenjeno = False
Obseg("B1:B4").Zaklenjeno = False
Konec Če
End Sub
Zasebni pod delovni list_Sprememba izbora(ByVal Target As Range)
Dim xRg kot razpon, xRgA kot razpon
On Error Resume Next
Application.EnableEvents = False
Nastavite xRg = Obseg ("B1:B4")
Nastavite xRgA = Obseg ("A1")
Če Intersect(Target, xRg).Address <> Target.Address _
Ali xRgA = "Sprejemam" Nato
Aplikacija EnableEvents = True
Exit Sub
ElseIf ActiveSheet.ProtectContents _
In Intersect(Target, xRg) = Target _
In xRgA.Value = "Zavrnitev" Nato
xRgA.Izberi
Konec Če
Aplikacija EnableEvents = True
End Sub
Ta komentar je moderator na spletnem mestu minimiziral
Hi,

Ali je mogoče, da ta VBA na podlagi tega zaklene en niz celic/odklene drugega? Na primer območje B1:B4 je odklenjeno in C1:C4 je zaklenjeno za "sprejemanje", nato pa je B1:B4 zaklenjeno in C1:C4 je odklenjeno za "zavrnitev"?


Hvala,
Christian
Ta komentar je moderator na spletnem mestu minimiziral
Dragi Christian,
Ali je vaš delovni list zaščiten?
Ta komentar je moderator na spletnem mestu minimiziral
prosim, če mi lahko kdo pomaga z naslednjim.
Želim vstaviti slike študenta na en list, se pojavi na drugem listu glede na njihova imena
Za ustvarjanje navigacijske ravnine za pomoč uporabnikom
Za dodelitev določenega lista(-ov) uporabniku
Če želite ustvariti vmesnik za delovni zvezek
Za ustvarjanje strani za prijavo
Ta komentar je moderator na spletnem mestu minimiziral
Dragi leo,
Kakršna koli vprašanja o Excelu, ne oklevajte in jih objavite na našem forumu: https://www.extendoffice.com/forum.html.
Več podpore glede Excela boste dobili od našega strokovnjaka za Excel.
Ta komentar je moderator na spletnem mestu minimiziral
Zdravo,

Preizkusil sem vašo kodo in malo uredil, vendar ne morem ugotoviti, kaj delam narobe?

Zasebni poddelovni list_Spremeni (ByVal Target As Range)
Če Obseg("A40") <> "" Potem
Obseg("D40:E40").Zaklenjeno = False
ElseIf Range("A40") = "" Potem
Obseg("D40:E40").Zaklenjeno = Res
Konec Če
End Sub


Moje razmišljanje o tem je bilo, če v njem ni ničesar (A40). Potem želim zakleniti z VBA. Če A40 vsebuje nekaj, potem želim, da se odklene. Upam, da vidite smisel tega.


Lep pozdrav Kristoffer
Ta komentar je moderator na spletnem mestu minimiziral
Dober dan,
Nič ni narobe z vašo kodo. Meni dobro deluje.
Ta komentar je moderator na spletnem mestu minimiziral
Živjo Tudi jaz ne morem spraviti te kode v delo. Popolnoma nič ne naredi. Kot da kode sploh ni?? Sem zelo nov v VBA in imam osnovno razumevanje o tem. Ali se ta koda izvaja takšna, kot je, ali ji morajo biti dodane tudi stvari, da lahko deluje? Ali pa se spremeni v makro (za katerega pravzaprav ne razumem, zakaj, ker je to posnetek navodil, kolikor jih razumem)
Ta komentar je moderator na spletnem mestu minimiziral
KAKŠNA BO KODA, ČE ŽELIM ZAKLJUČITI CELIČKO E1, E2, E3 .............. ZA DOLOČENO BESEDILO (Recimo "P") V CELICI B1, B2, B3... ............... OZZ.

HVALA VNAPREJ
Ta komentar je moderator na spletnem mestu minimiziral
Good Day
Poskusite spodaj skript VBA.

Zasebni poddelovni list_Spremeni (ByVal Target As Range)
Če je Target.Count = 1 Potem
Če je Target.Address = Range("A1").Address in Target.Value = "A", potem
Obseg("B1").Zaklenjeno = True
ElseIf Target.Address = Range("A2").Address In Target.Value = "A" Nato
Obseg("B2").Zaklenjeno = True
ElseIf Target.Address = Range("A3").Address In Target.Value = "A" Nato
Obseg("B3").Zaklenjeno = True
Konec Če
Konec Če
End Sub
Ta komentar je moderator na spletnem mestu minimiziral
Dober dan!
Tudi meni je potrebno zablokirati vrednost, vendar samo v eni jački v odvisnosti od vrednosti v drugi, poskusila sem uporabiti kodo v komentarjih zgoraj, vendar ne deluje (ostavila samo en parameter za blokiranje), vendar ne deluje - pri tem sporočilu ob napaki, jačejka, ki mora biti blokirana - preprosto se ne blokira, ostaja aktivna. V čem je lahko razlog?

To je koda, ki sem jo uporabil:

Zasebni poddelovni list_Spremeni (ByVal Target As Range)
If Target.Coun t=1 Potem
Če je Target.Address = Range("C9").Address And Target.Value = "согласно плану", potem
Razpon ("C10"). Zaklenjeno = True
Konec Če
End Sub
Ta komentar je moderator na spletnem mestu minimiziral
Živjo Ghost,
Oprosti, ne razumem čisto, kaj misliš. Zaradi jasnosti priložite vzorčno datoteko ali posnetek zaslona z vašimi podatki in želenimi rezultati.
Ta komentar je moderator na spletnem mestu minimiziral
Živjo! rabim kakšen nasvet.
Ali obstaja način, da ne dovolite posodobitve celice, razen če je izpolnila pogoj v drugi celici?
Vzorec: če celica A ni posodobljena, mi ne bo omogočila, da spremenim vrednost celice B za dokončanje.

Cenite povratne informacije.
Hvala!
Ta komentar je moderator na spletnem mestu minimiziral
Draga Margie,
Poskusite spodnjo kodo VBA.

Dim PreVal kot niz
Zatemni NextVal kot niz
Zasebni pod delovni list_Aktiviraj()
PreVal = Obseg ("A1")
NextVal = Obseg ("A1")
End Sub
Zasebni poddelovni list_Spremeni (ByVal Target As Range)
Če (Target.Count = 1) In (Target.Address = "$A$1") potem
NextVal = Obseg ("A1")
Konec Če
End Sub
Zasebni pod delovni list_Sprememba izbora(ByVal Target As Range)
Če je Target.Count = 1 Potem
Če je Target.Address = "$A$1" Potem
PreVal = Obseg ("A1")
ElseIf (Target.Address = "$B$1") Nato
Če je PreVal = NextVal Potem
Application.EnableEvents = False
Obseg("A1").Izberi
Aplikacija EnableEvents = True
Konec Če
Konec Če
Konec Če
End Sub
Ta komentar je moderator na spletnem mestu minimiziral
ali lahko kdo to popravi pls>>>

Zasebni poddelovni list_Spremeni (ByVal Target As Range)
Za i = 7 Za 100
Če je obseg("Celice(D, i)") = "Izposoja" Potem
Obseg("Celice(V, i):Celice(X, i)").Zaklenjeno = True
ElseIf Range("Cells(D, i)") = "Prihranki" Nato
Obseg("Celice(Q, i):Celice(U, i)").Zaklenjeno = True
Obseg("Celice(W, i):Celice(X, i)").Zaklenjeno = True
ElseIf Range("Cells(D, i)") = "ShareCap" Nato
Obseg("Celice(Q, i):Celice(U, i)").Zaklenjeno = True
Obseg("Celice(V, i)").Zaklenjeno = True
Konec Če
Naslednja i
End Sub
Ta komentar je moderator na spletnem mestu minimiziral
Živjo! Mi lahko kdo pomaga? Moram zakleniti/zamrzniti celico. Ta celica je povezana z drugo in ima vrednost, ki se spreminja vsako minuto. Kaj moram storiti, je ohraniti vrednost za določeno minuto/uro. Kako lahko to storim, ne da bi jo kopiral in prilepil kot vrednost?
Ta komentar je moderator na spletnem mestu minimiziral
Draga Mira,
Žal ne morem pomagati s tem, svoje vprašanje lahko objavite na našem forumu: https://www.extendoffice.com/forum.html da pridobite več podpore za Excel od našega strokovnjaka.
Ta komentar je moderator na spletnem mestu minimiziral
Hi,
Res sem nov v tem.
Poskušal sem sestaviti sistem izdajanja računov v excelu.
Ustvaril sem 3 liste.
1. Predloga računa (Račun) – Samo splošni račun, ki se tedensko pošilja mojim agentom.

2. Podatkovni list (podatkovni list), če smo natančni – kjer lahko račun prebere naslov imena podjetja itd., tako da se bo račun samodejno posodobil, če se kaj spremeni.

3. Natančneje, zavihek koledarja (Koledar 2018) - ki je naveden v predlogi računa in na dejanske račune doda ustrezen datum in številko računa.

kar želim narediti.
Zavihek koledarja bi bil moja glavna stran, dodal sem spustno celico stanja za vsak teden z možnostmi "Aktivno" in "Zaprto". Rad bi zaklenil celoten zavihek »Račun«, če je ustrezna celica nastavljena na »Zaprto«.

Upam, da razumete, kaj poskušam narediti.
Hvala vnaprej.
Ta komentar je moderator na spletnem mestu minimiziral
Dragi Ando Veres.
Spodnja koda VBA vam lahko pomaga. Prosimo, vstavite kodo v okno s kodo lista koledarja 2018, spremenite A1 v spustno celico. Hvala vam.

Zasebni poddelovni list_Spremeni (ByVal Target As Range)
Dim xRg As Range
On Error Resume Next
Nastavi xRg = preseči (cilj, razpon ("A1"))
Če xRg ni nič, zapustite Sub
Če je Target.Validation.Type >= 0 Potem
Če je Target.Value = "Zaprto" Potem
Listi("Podatkovni list").Zaščiti
ElseIf xRg.Value = "Aktiven" Potem
Listi("Podatkovni list").Odstrani zaščito
Konec Če
Konec Če
End Sub
Ta komentar je moderator na spletnem mestu minimiziral
Pripravljam upravljanje zalog v skladišču v predlogi excel. Za dostavo zalog moram izdati prepustnico za prehod. Želim, da se vsak prehod za vrata posodabljajo ustrezni podatki na strani dnevnega prevzema zalog. S spremembo serijske št. vrstica bo zaklenjena in naslednja bo zapolnjena.
Ta komentar je moderator na spletnem mestu minimiziral
Dober dan,
Lepo bi bilo, če lahko tukaj naložite svoj delovni zvezek. Hvala za vaš komentar.
Ta komentar je moderator na spletnem mestu minimiziral
Mi lahko prosim poveste, kaj je tukaj narobe? Hvala v naprej.

Zasebni poddelovni list_Spremeni (ByVal Target As Range)
Če je Obseg("K:K") = "PREVEČ ZALOG" Potem
Obseg("S:S").Zaklenjeno = Res
ElseIf Range("K:K") = "POČASNO PREMIKANJE" Nato
Obseg("S:S").Zaklenjeno = Res
ElseIf Range("K:K") = "NORMALNO" Potem
Obseg("S:S").Zaklenjeno = False
ElseIf Range("K:K") = "SHORTAGE" Nato
Obseg("S:S").Zaklenjeno = False
Konec Če
End Sub
Ta komentar je moderator na spletnem mestu minimiziral
Bi mi vljudno svetovali, kako to popraviti? Hvala v naprej.

Zasebni poddelovni list_Spremeni (ByVal Target As Range)
Če je Range("A:A") = "POČASNO PREMIKANJE" Potem
Obseg("B:B").Zaklenjeno = Res
ElseIf Range("A:A") = "PREVEČ ZALOG" Nato
Obseg("B:B").Zaklenjeno = Res
ElseIf Range("A:A") = "NORMALNO" Potem
Obseg("B:B").Zaklenjeno = False
Konec Če
End Sub
Ta komentar je moderator na spletnem mestu minimiziral
Ker nisem strokovnjak za VB, bi rekel, da imate preveč "Elseif" - če jih vse spremenite v samo IF, razen zadnjega, potem upam, da bo to delovalo.
V bistvu Če X naredi to, Če Y naredi to, če Z naredi to, če nobeden od teh - naredi to.
Ta komentar je moderator na spletnem mestu minimiziral
Kakšna bi bila koda, če bi želel zakleniti blok celic (vrstice 6, 7 in 8/črke od D do U ter celici F5 in J5) in jih odkleniti, ko v celico E5 vstavim "X"? Hvala vnaprej!
Ta komentar je moderator na spletnem mestu minimiziral
Živjo MitchyII,
Ali mislite, da je bil določen blok celic vnaprej ročno zaklenjen in jih želite samo odkleniti tako, da v celico E5 vnesete "X"?
Če odstranite "X" iz celice E5, želite ponovno zakleniti obsege?
Potrebujem več podrobnosti o problemu.
Hvala za komentar.
Ta komentar je moderator na spletnem mestu minimiziral
Živjo, Mitchyll (ali kdorkoli), gradimo na Crystalu. Ročno sem zaklenil vse celice in glede na podatke v stolpcu G želim, da ostanejo zaklenjene ali odklenjene. Primer celic v stolpcu H je treba odkleniti SAMO, če je "c/p" postavljen v predhodno celico v stolpcu G
Ta komentar je moderator na spletnem mestu minimiziral
Ali je mogoče zakleniti celico, ko doseže določeno vrednost?
Ta komentar je moderator na spletnem mestu minimiziral
Pozdravljeni, ali lahko preverite razlog, zakaj ne deluje?

Zasebni poddelovni list_Spremeni (ByVal Target As Range)
Če Obseg("A3:A37").Vrednost <> "" Potem
Obseg("B3:B37").Zaklenjeno = Res
ElseIf Range("A3:A37") = "" Potem
Obseg("B3:B37").Zaklenjeno = False
Konec Če

Če Obseg("B3:B37").Vrednost <> "" Potem
Obseg("A3:A37").Zaklenjeno = Res
ElseIf Range("B3:B37") = "" Potem
Obseg("A3:A37").Zaklenjeno = False
Konec Če

End Sub


Najlepša hvala v naprej!!!
Ta komentar je moderator na spletnem mestu minimiziral
Hi
Pravkar sem poskusil uporabiti zgornjo kodo
in piše napaka tipa 13, ko ga poskušam uporabiti.
mi lahko pomagaš pri tem?

Hvala
Ta komentar je moderator na spletnem mestu minimiziral
Hi,
Katero različico Excela uporabljate?
Ta komentar je moderator na spletnem mestu minimiziral
hi

če moram zakleniti celico na listu 2 (celica C4) na podlagi zahtevka iz lista 1 (celica C1),
če "ne" na listu 1 C4; list 2 mora biti zaklenjen in mora prenesti vrednost iz lista 1 C4,
na list 2 C4.

če "da" na listu 1, moram biti sposoben tipkati v celico na listu 2

Hvala Benthe
Ta komentar je moderator na spletnem mestu minimiziral
Živjo prosim, če mi kdo pomaga pri kodi VBA.

če iz spustnega menija v celici Obseg(A1:A1000) izberem "abc", potem ne zaklenem obsega (D1:D1000) do (F1:F1000)



če iz spustnega menija v celici Obseg(A1:A1000) izberem "abc", potem ne zaklenem obsega (D1:D1000) do (F1:F1000)



če iz spustnega menija v celici Obseg(A1:A1000) izberem "abc", potem zakleni obseg (D1:D1000) do (F1:F1000)



tj. ustrezna celica A1 za D1 do F1



A2 za od D2 do F2
Ta komentar je moderator na spletnem mestu minimiziral
Vse sem kopiral od zgoraj na list. Delovalo je za sekundo in zdaj dobivam napako »Ne morem nastaviti zaklenjene lastnosti razreda Range«. Odprl sem celo povsem nov list in dobesedno kopiral vaš primer. Imate kakšno idejo, kaj se dogaja?
Ta komentar je moderator na spletnem mestu minimiziral
Zdravo,

Potrebujem tvojo naklonjenost. ko v celici izberem možnost Brez možnosti, želim, da so spodnji stolpci zaklenjeni/sivi.

Je to mogoče? Preizkusil sem to formulo, vendar ni delovalo

Zasebni poddelovni list_Spremeni (ByVal Target As Range)

Če je Range("D90") = "Da", potem

Obseg("C94:F104").Zaklenjeno = False

ElseIf Range("D90") = "Ne" Potem

Obseg("C94:F104").Zaklenjeno = Res

Konec Če

End Sub
Ta komentar je moderator na spletnem mestu minimiziral
Živjo Steffi,
Koda deluje dobro.
Če želite zakleniti obseg celic, da preprečite urejanje, morate delovni list zaščititi ročno, potem ko v D90 izberete možnost Brez možnosti.
In ker je D90 v območju C94:F104, po zaščiti delovnega lista tudi D90 ni mogoče urejati.
Ta komentar je moderator na spletnem mestu minimiziral
D90 ni v dosegu. To je 4 vrstice nad C94
Tu še ni objavljenih komentarjev
Obremenitev Več
Pustite vaše komentarje
Objava kot gost
×
Ocenite to objavo:
0   Znaki
Predlagane lokacije

Sledi nam

Copyright © 2009 - www.extendoffice.com. | Vse pravice pridržane. Poganja ga ExtendOffice. | Kazalo
Microsoft in logotip Office sta blagovni znamki ali registrirani blagovni znamki družbe Microsoft Corporation v ZDA in / ali drugih državah.
Zaščiteno s Sectigo SSL