لود لینک عکس بطور اتوماتیک

Collapse
این تاپیک قفل است.
X
X
 
  • زمان
  • نمایش
حذف همه
new posts
  • ناصر خان خان

    • 2015/12/22
    • 118
    • 54.00

    [حل شده] لود لینک عکس بطور اتوماتیک

    سلام خدمت اساتید گرامی
    فایل ضمیمه دارای یه سری لینک تو هر سلول که میخوام بطور اتوماتیک، هر لینکی عکسش تو سلول روبه رو لود بشه.
    لطفا پاسخ بدید مثل پرسش قبلیم که هیچ کس علیکم بهش نگفت.

    ممنونم
    فایل های پیوست شده
    هر گاه خدا تو را به لبه پرتگاه برد باز به او اعتماد کن چون يا تو را از پشت خواهد گرفت يا پرواز را به تو خواهد آموخت
  • ناصر خان خان

    • 2015/12/22
    • 118
    • 54.00

    #2
    سلام
    چرا ایجا اینطوری شده یعنی چی؟
    چرا کسی دیگه جواب نمیده.
    اون از پست قبلیم که بدون جواب موند. اینهم از این.
    کسی پاسخگو نیست؟؟؟؟
    هر گاه خدا تو را به لبه پرتگاه برد باز به او اعتماد کن چون يا تو را از پشت خواهد گرفت يا پرواز را به تو خواهد آموخت

    کامنت

    • M_ExceL

      • 2018/04/23
      • 677

      #3
      نوشته اصلی توسط ناصر خان خان
      سلام
      چرا ایجا اینطوری شده یعنی چی؟
      چرا کسی دیگه جواب نمیده.
      اون از پست قبلیم که بدون جواب موند. اینهم از این.
      کسی پاسخگو نیست؟؟؟؟
      سلام،
      اینکه کسی پاسخ نمیده، برداشت منفی از این موضوع نداشته باشید
      اگر دوستان راه حل مناسبی به ذهنشون برسه قطعا سوالتون بدون پاسخ نمی مونه، ممکنه بعضی از سوالات نیاز به کدنوسیی و زمان بیشتری داشته باشه تا پاسخ مناسب داده بشه ...
      فایل زیر رو بررسی بفرمایید :
      توضیح :
      داخل ستون A نام تصاویر وارد شده است.
      روی باتن 1 کلیک کنید.
      مسیر تصاویر از مسیر جاری فایل گرفته می شود لذا اگر مسیر تصاویر و نام پوشه تصاویر رو تغییر بدید، می بایست داخل کد اصلاح کنید.
      کد:
      Sub InsertPicture()
      Dim v, pt As String
      pt = ThisWorkbook.Path & "\pic2"
          For i = 1 To 6
               v = pt & "\" & Range("a" & i).Text & ".jpg"
               ActiveSheet.Pictures.Insert(v).Select
                  With selction
                     Selection.ShapeRange.Width = Cells(i, 2).Width
                     Selection.ShapeRange.Height = Cells(i, 2).Height
                     Selection.ShapeRange.Left = Cells(i, 2).Left + 5
                     Selection.ShapeRange.Top = Cells(i, 2).Top
                  End With
          Next
      End Sub
      فایل های پیوست شده
      [CENTER]Telegram Channel : [url]https://t.me/UltraOfficeSkills[/url]
      [/CENTER]

      کامنت

      • mrexcel

        • 2010/02/03
        • 436
        • 81.00

        #4
        با سلام
        برای آوردن عکس در سلول مسیر دو راه را میگم ، که هر کدام نیاز به تخصص خاصی دارد ، که برای انجانم آن باید پیش نیازهای آن را نیز یاد بگیرید .
        روش اول : استفاده از کدهای ویژوال بیسیک ، به دلیل اینکه تخصص من کد نویسی و برنامه نویسی در ویژوال نیست بنابراین حتما توضیحاتی اساتید مربوط به این روش خواهند داد .
        روش دوم پیشنهادی که محدودیت های زیادی نیز دارد از مسیر زیر باید صورت بگیرد .
        شما باید ابتدا عکس ها در یک جدول که اطلاعات مربوط به عکس ها را نیز میخواهید در آن بنویسید یا حداقل یک شماره ردیف داشته باشد در سلول ها اضافه نمایید ( عکس ها را طوری قرار بدهید که در سلول fit شود )
        سپس باید با استفاده از فرمول نویسی در ابزار name manager فرمولی را بنویسسید که با نوشتن کد مربوط به سلول روبروی عکس قرار باشد ، اطلاعات مربوط به سلول روبروی آن را که در آن عکس وجود دارد را لود نماید ، این فرمول میتواند index باشد .
        سپس در صفحه یک عکس دخواه قرار میدهید و بعد از انتخاب این عکس در نوار فرمول علامت مساوی و نامی که به فرمول index در name manager داده اید قرار میدهید و اینتر میزنید . حال متغییر تابع index را به هر سلولی که مد نظرتان بوده است ارجاع داده باشید با تغییر آن سلول عکس نمد نظر نمایش داده میشود .
        با توجه به طولانی بودن نمونه فایل در این پست ضمیمه گردیده است ،
        البته این روش محدودیت های خاص خود از جمله اضافه شدن حجم و .. دارد که باید در نظر گرفت .




        فایل های پیوست شده
        زنگ تفريح دنيا هميشگي نيست ، ساعت بعد حساب داريم

        کامنت

        • ناصر خان خان

          • 2015/12/22
          • 118
          • 54.00

          #5
          نوشته اصلی توسط mrexcel
          با سلام
          برای آوردن عکس در سلول مسیر دو راه را میگم ، که هر کدام نیاز به تخصص خاصی دارد ، که برای انجانم آن باید پیش نیازهای آن را نیز یاد بگیرید .
          روش اول : استفاده از کدهای ویژوال بیسیک ، به دلیل اینکه تخصص من کد نویسی و برنامه نویسی در ویژوال نیست بنابراین حتما توضیحاتی اساتید مربوط به این روش خواهند داد .
          روش دوم پیشنهادی که محدودیت های زیادی نیز دارد از مسیر زیر باید صورت بگیرد .
          شما باید ابتدا عکس ها در یک جدول که اطلاعات مربوط به عکس ها را نیز میخواهید در آن بنویسید یا حداقل یک شماره ردیف داشته باشد در سلول ها اضافه نمایید ( عکس ها را طوری قرار بدهید که در سلول fit شود )
          سپس باید با استفاده از فرمول نویسی در ابزار name manager فرمولی را بنویسسید که با نوشتن کد مربوط به سلول روبروی عکس قرار باشد ، اطلاعات مربوط به سلول روبروی آن را که در آن عکس وجود دارد را لود نماید ، این فرمول میتواند index باشد .
          سپس در صفحه یک عکس دخواه قرار میدهید و بعد از انتخاب این عکس در نوار فرمول علامت مساوی و نامی که به فرمول index در name manager داده اید قرار میدهید و اینتر میزنید . حال متغییر تابع index را به هر سلولی که مد نظرتان بوده است ارجاع داده باشید با تغییر آن سلول عکس نمد نظر نمایش داده میشود .
          با توجه به طولانی بودن نمونه فایل در این پست ضمیمه گردیده است ،
          البته این روش محدودیت های خاص خود از جمله اضافه شدن حجم و .. دارد که باید در نظر گرفت .




          سلام به همگی

          متشکرم عالی بود مثل همیشه.
          هر گاه خدا تو را به لبه پرتگاه برد باز به او اعتماد کن چون يا تو را از پشت خواهد گرفت يا پرواز را به تو خواهد آموخت

          کامنت

          چند لحظه..