nedovoljeno brisanje

Pomoč pri delu z MS Excelom
Odgovori
miha1
Prispevkov: 20
Pridružen: Sr Avg 10, 2005 5:07 pm

nedovoljeno brisanje

Odgovor Napisal/-a miha1 »

pozdravljeni

še en majhen problem(zame je velik) me tare pri mojem delu in sicer:

kako bi z makrom preprečil brisanje ene ali več celic v obsegu("a1:c100")
in nato
msgbox("v tem obsegu je nedovoljeno brisanje celic")

tako nekako,vendar kot že večkrat mi na koncu zmanjka znanja...

za odgovor se najlepše zahvaljujem.
lp miha1
admin
Site Admin
Prispevkov: 3687
Pridružen: Sr Jul 20, 2005 10:06 pm

Odgovor Napisal/-a admin »

Pozdravljeni,

Z makrom to ne bo šlo. No pravzaprav je majhna verjetnost, da bi šlo, a bi stvar neizmerno zakompliciralo, saj bi bilo v tem primeru potrebno onemogočiti vse Excelove načine brisanja vrstice (menuji, hitri menuji, tastatura in še kakšen način).... Se nikakor ne izide.

Edina prava rešitev, to je rešitev v duhu Excela in ne proti njemu :), je da list zaščitite in s tem preprečite neželjene akcije.
lp,
Matjaž Prtenjak
Administrator
Stenly
Prispevkov: 223
Pridružen: Sr Jul 27, 2005 11:29 pm

Odgovor Napisal/-a Stenly »

Pozdravljen miha1

Res bo najbolj enostavno, kot je rekel Matjaž. Omenjeno zaščito pa naj namesto vas opravi računalnik ob aktivaciji lista.

Koda: Izberi vse

Private Sub Worksheet_Activate()
'
    Cells.Locked = False
    Range("A1:C100").Locked = True
    ActiveSheet.Protect
    
End Sub
Lp
Odgovori