PDA

توجه ! این یک نسخه آرشیو شده میباشد و در این حالت شما عکسی را مشاهده نمیکنید برای مشاهده کامل متن و عکسها بر روی لینک مقابل کلیک کنید : [حل شده] رفع خطای کد نویسی HyperLink در VBA


sabertb
2018/09/01, 12:10
سلام و خسته نباشید به اساتید گرامی ،
سعی کردم در یک Button کدی بنویسم که فایل مورد نظر منو از مسیر مشخص شده که متغییر هم هست باز کنه ولی نمیدونم چرا جواب نمیده !
علت این مشکلم رو می تونید توضیح بدید ؟
17192
Amir Ghasemiyan
2018/09/04, 09:43
سلام دوست عزيز
ظاهرا شيتي به اسم Number_R2 در ليست شيت هاتون نداريد
sabertb
2018/09/04, 15:48
سلام دوست عزيز
ظاهرا شيتي به اسم Number_R2 در ليست شيت هاتون نداريد


این اسم فرمول Offset ای هست که یک عدد رو برمی گردونه که در واقع شامل اسم فایل مورد نظر می باشد.
Amir Ghasemiyan
2018/09/04, 16:00
این اسم فرمول Offset ای هست که یک عدد رو برمی گردونه که در واقع شامل اسم فایل مورد نظر می باشد.

اگر فرموله چرا داخل دابل كوتيشن هست؟

وقتي داخل "" قرار ميديد يعني متن. يعني اسم يك شيت. اگر فرمول هست بايد از داخل كوتيشن خارج بشه
sabertb
2018/09/05, 08:49
اگر فرموله چرا داخل دابل كوتيشن هست؟

وقتي داخل "" قرار ميديد يعني متن. يعني اسم يك شيت. اگر فرمول هست بايد از داخل كوتيشن خارج بشه
در واقع یه Range اسم گزاری شده است که با فرمول به دست می آید ولی مشکل با "" گذاشتن یا نکذاشتن حل نمیشه نمی دونم چرا !
سعی میکنم فایل بزارم تا بهتر بشود بررسیش کرد
sabertb
2018/09/05, 09:33
این نمونه فایل هست
Amir Ghasemiyan
2018/09/05, 14:56
دوست عزيز فايلتون كاملا درسته. فقط تو كدهاتون دو تا اسپيس اضافه گذاشته بودين. اين كد رو جايگزين كنيد مشكلتون حل ميشه



Private Sub CommandButton1_Click()
ActiveWorkbook.FollowHyperlink Address:=Application.ThisWorkbook.Path & "\Note\" & Sheet5.Range("Number_R2").Value & ".docx"
End Sub