مراجعه به فایل شماره 1
با تشکر
|
🖤 پیام تسلیتبا نهایت تأسف و تأثر، باخبر شدیم جناب آقای محمد محمدی با نام کاربری smartman ، از مدیران ارزشمند انجمن اکسل ایران، دار فانی را وداع گفتهاند. ایشان سالها با دانش، تجربه، اخلاق نیکو و روحیه کمک به دیگران، سهم بزرگی در رشد و پویایی انجمن داشتند و خاطره حضور ارزشمندشان همواره در ذهن اعضای انجمن باقی خواهد ماند. مدیریت و اعضای انجمن ExcelIran این ضایعه را به خانواده محترم ایشان، دوستان و تمامی اعضای انجمن تسلیت عرض نموده و از خداوند متعال برای آن مرحوم، رحمت و مغفرت الهی و برای بازماندگان صبر و شکیبایی مسئلت دارند.
انا لله و انا الیه راجعون
|
Private Sub CommandButton5_Click()
Workbooks.Open Filename:="C:\Users\Amir\Desktop\2.xlsx"
Range("a1:a10").Value = TextBox1.Text
ActiveWorkbook.Save
ActiveWorkbook.Close
End Sub
Workbooks.Open "\\PC1\a\2.xlsx"
Range("a1:a10").Value = TextBox1.Text
ActiveWorkbook.Save
ActiveWorkbook.Close
Application.Windows.Application.Visible = False
Workbooks.Open Filename:="Path", Password:="OpenFile", WriteResPassword:="WriteFile"
Workbooks.Open Filename:="d:\a.xlsx", Password:="123"
کامنت