Šajā rakstā mēs izmantosim darblapas maiņas notikumu, lai aizsargātu šūnas, kurās ir formulas.
Neapstrādāti dati sastāv no darbinieku pārdošanas datiem, kas ietver sadalījumu pa mēnešiem un gadu.
Mēs vēlamies noskaidrot kopējos pārdošanas apjomus pa mēnešiem, kā arī pa gadiem.
Mēs esam izmantojuši summas funkciju, lai aprēķinātu kopējo pārdošanas apjomu katru mēnesi un gadu. Darblapas mainīšanas notikums tiek izmantots, lai aizsargātu šūnas, kurās ir formulas. Mēģinot rediģēt šūnu, kurā ir formula, mēs saņemsim uznirstošo ziņojumu, kurā teikts, ka šūnas vērtību nevar mainīt.
Koda skaidrojums
rng.HasFormula
HasFormula metode atgriezīs True, ja šūna satur formulu. Pretējā gadījumā tas atgriezīs False.
ActiveSheet.Protect
Iepriekš minētais kods tiek izmantots šūnas aizsardzībai.
Piezīme: Šūna tiks aizsargāta tikai tad, ja tā būs bloķēta. Tātad, pirms aizsargāt šūnu, tai jābūt aizslēgtai.
ActiveSheet. Aizsargāt
Iepriekš minēto kodu izmanto, lai atceltu šūnas aizsardzību.
Lūdzu, sekojiet tālāk norādītajam kodam
'Pievienot zemāk esošo kodu darblapas modulī Opcija Explicit Private Sub Worksheet_SelectionChange (ByVal Target As Range) Dim rng kā diapazons katrai mērķa rindiņai.
Ja jums patika šis emuārs, kopīgojiet to ar saviem draugiem Facebook. Varat arī sekot mums Twitter un Facebook.
Mēs labprāt uzklausītu jūsu viedokli, dariet mums zināmu, kā mēs varam uzlabot savu darbu un padarīt to labāku jums. Rakstiet mums e -pasta vietnē