input box and lock the table and particular cells to user can acess

[Anisusa]

HI Buddy's,

i need the code for the input box for Entering value in column "C" & "F" table in "sheet2" by selecting the date in column "B".

once i click on the table on the active sheet ( because i have many worksheet on the workbook ), then pop up box should appear for input value to enter for column heading "C" & "F" by selecting the date in pop up box automatically value should go on the particular row on table only and if value entering has "zero" only it should not accept the value has zero it should be greater than zero only or it can be accept the value instead of "zero" to enter has " N/A" (because to eliminate zero value for the chart).

then i need also to protect my entire table and sheet and particular cells which is in yellow on column " D15 , D16 & F 12" the other user can be access only on the particular cells because if protect this sheet and another "sheet7" the pivot table i can't be refresh its getting msg has " you cant edit pivot table on protected sheet".

pls guys help to solve this problems...

[dflak]

I am having a bit of a problem interpreting the requirement, but I think this is what you want to do. Put this code on the sheet module for sheet 2

rivate Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim ColC_Value As Variant
Dim ColF_Value As Variant
Dim RowNum As Long

If Intersect(Target, Range("Table2[Date]")) Is Nothing Then Exit Sub

RowNum = Target.Row

' Unprotect Sheet
ActiveSheet.Unprotect Password:="Password"

' Get values
ColC_Value = InputBox("Enter Column C Value", "Column C Value")
ColF_Value = InputBox("Enter Column F Value", "Column F Value")

' Put values in cells
Cells(RowNum, "C") = ColC_Value
Cells(RowNum, "F") = ColF_Value

' Protect Sheet
ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True, Password:="Password"
End Sub

[Anisusa]

hi

thanks for the code but there was a some problem after running the code.

1. After entering the value in the cell the sheet is protected but after that i need to use the filter months on the "F12" its saying i need to unprotect the sheet and enter password .

2. also i have a chart on this same sheet 2 that i cant do filtering.

3.after i close and open the file its says " u cant edit the pivot table on protected sheet"

this sheet going to use other users so i dont want to give password to unprotect the sheet for filtering the months and charts.

All ur work code is nice only thing this steps works fine then my problems will be solve try for me pls...

[Anisusa]

hi,

again i updated the new worksheet for clear visual to understand the error pls check the attached file.

all the user will work to edit on the "F12" and column "C & d" and the filtering option of the chart so according to that acces to free from others to edit.