چگونه میتوان روی ماکرو های اکسل پسورد گذاشت؟

[arash2152]

با سلام
من یک فایل اکسل با چند ماکرو دارم .
چگونه میتوان روی ماکرو های اکسل پسورد گذاشت بصورتی که کسی قادر به دیدن دستورات ماکرو نباشه

اخطار: این یک موضوع قدیمی است به دلیل قدیمی بودن موضوع، ممکن است برخی فایل های ضمیمه به درستی کار نکنند. لطفا در صورت عدم ضرورت، از بالا آوردن موضوعات قدیمی خودداری نمایید.

[Nima]

تو پنجره vbe از منوی tools روی vba project properties کلیک کنید و از تب protection

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

[runmohsen]

runmohsen

Sub Macro4()
'
' Macro4 Macro
'
' Keyboard Shortcut: Ctrl+e
'
Range("L52").GoalSeek Goal:=0, ChangingCell:=Range("K52")
End Sub



با سلام این ماکرو رو چطور تغییر بدم تا برای ردیفهای بعدی هم کارکنه؟

[iranweld]

با سلام

محدوده ای که مد نظر است را برای i تعریف کنید

برای متال for i=52 to 100

sub CheckGoalSeek()

    Dim i as Long

    For i = 52 to 100

        Range("T"& i).GoalSeek Goal:=0, ChangingCell:=Range("V"& i)

    Next

 End Sub 

[runmohsen]

باسلام لطفا در رابطه با این فایل بفرمایید

[iranweld]

باسلام لطفا در رابطه با این فایل بفرمایید

با سلام

لطفا بررسی بفرمایید ببینید درست جواب میده؟

[runmohsen]

بله خیلی ممنون