چگونه از نمایش فرمول ها جلوگیری کنیم

[kindcrasher]

من ميخوام روي فايل اكسلم قفل يو اس بي بزارم 2007 هست فايلم. كمك كنييد لطفآ

[~M*E*H*D*I~]

من ميخوام روي فايل اكسلم قفل يو اس بي بزارم 2007 هست فايلم. كمك كنييد لطفآ

دوست گرامی اگر امکانش بود پاسخ داده میشد

نرم افزار های موجود که قفل شکسته باشند تنها برای 2003 جوابگو هستن

[kindcrasher]

آقا حداقل بهم بفرمائيد كه چطور ميتونم از فرمولام محافظت كنم؟

[~M*E*H*D*I~]

آقا حداقل بهم بفرمائيد كه چطور ميتونم از فرمولام محافظت كنم؟

یکی از شیوه ها Protect کردن هست یعنی ابتدا همه شیت رو انتخاب کنید و سپس Ctrl+1 رو بزنید از تب پروتکشن تیک Locked رو بردارید سپس هرجایی که فرمول دارید اون سلول رو Lock کنید و سپس از تب Review گزینه protect sheet رو بزنید و تیک select locked cell رو بردارید و یک پسورد مناسب هم اختصاص بدید .

روش دوم استفاده از کد زیر هست

Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)

Dim rFormulaCheck As Range

On Error Resume Next

Sh.Unprotect Password:="Exceliran"

With Selection

.Locked = False

.FormulaHidden = False

End With

If Target.Cells.Count = 1 Then

If Target.HasFormula Then

With Target

.Locked = True

.FormulaHidden = True

End With

Sh.Protect Password:="Exceliran", UserInterFaceOnly:=True

End If

ElseIf Target.Cells.Count > 1 Then

Set rFormulaCheck = Selection.SpecialCells(xlCellTypeFormulas)

If Not rFormulaCheck Is Nothing Then

With Selection.SpecialCells(xlCellTypeFormulas)

.Locked = True

.FormulaHidden = True

End With

Sh.Protect Password:="Exceliran", UserInterFaceOnly:=True

End If

End If

On Error GoTo 0

End Sub

[khakzad]

سلام دوست عزیز
اگه بخاید فرمول ها دیده نشن
کافیه موقع حرکت از مسیری که جناب وطن پرست (M*E*H*D*I) فرمودن، علاوه بر تیک گزینه lock تیک گزینه Hide رو هم بزنید. بعد مسیر رو همونطور که گفتن ادامه بدید
اینطوری فرمول ها علاوه برپروتکت شدن، دیده هم نمیشن
موفق باشید

[kindcrasher]

لطفآ بفرمائید چطور و کجا باید ازون کد استفاده کنم؟

[mokaram]

لطفآ بفرمائید چطور و کجا باید ازون کد استفاده کنم؟

فایل پیوست را دانلود کن اجرا کن بعد با زدن کلیدهای Alt+F11 وارد محیط کدنویسی بشید از سمت چپ لیست شیت های فایلتون مشخصه روی اون شیتی که قرار هست این عملیات انجام بشه دبل کلیک کنید بعد طبق عکس زیر عمل کنید و کد ها را در اونجا پیست کنید
3907