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

[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 وارد محیط کدنویسی بشید از سمت چپ لیست شیت های فایلتون مشخصه روی اون شیتی که قرار هست این عملیات انجام بشه دبل کلیک کنید بعد طبق عکس زیر عمل کنید و کد ها را در اونجا پیست کنید