• Úvod
• Excel návod
• Excel šablony
• Nástěnka
• Mobility
• Tipy na výlet
• Galerie
• Fórum

MS Excel

Téma: Zamknutí buňky na základě hodnoty v seznamu

Zaslal/a berrz 21.11.2011 17:10

Zdravím,
připravuji formulář a chtěl bych tímto požádat o radu jak na základě vybrané hodnoty z rozevíracího seznamu zamknout buňku a současně jí nastavit šedé pozadí.

Přikládám jednoduchý vzor:

www.zdapol.com/Tab.xls

Např. když se vybere "Liberec" bude zamknutá oblast s šedivým pozadím (G4:G5), když "Plzeň" tak např. buňka (E5)

Děkuji za radu

Uzamčeno - nelze přidávat nové příspěvky.

---

Poki(24.11.2011 9:57)#006540

Zdravim,
tohle lze upravit kodem - problem se zamcenim bunek je ten, ze pokud chcete mit uzamcene bunky opravdu uzamcene (tim myslim, ze do nich nelze psat), musi byt uzamcen list.
Defaultne jsou vsechny bunky listu uzamcene.

Nasledujici kod vlozte do modulu listu, na kterem pracujete:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$B$4" Then
ActiveSheet.Unprotect
'bila barva cele oblasti a jeji odemceni (bunek)
Range("B3:H5").Interior.ColorIndex = 2
Range("B3:H5").Locked = False
'--Liberec
If Target.Value = "Liberec" Then
Range("G4:G5").Interior.ColorIndex = 15
Range("G4:G5").Locked = True
End If
'--Plzeň
If Target.Value = "Plzeň" Then
Range("E5").Interior.ColorIndex = 15
Range("E5").Locked = True
End If
ActiveSheet.Protect
End If
End Subcitovat

berrz(27.11.2011 21:17)#006558

Zdravím,
a děkuji moc, dělá to přesně to jak jsem si to představoval

Díky berrzcitovat

Uživatelské menu

Nejste přihlášen(a)

• přihlásit
• registrace

\n

Menu

On-line nástroje

Formulář Faktura

Aktivní diskuse