خواندن ادرس از تکست باکس

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

    • 2018/04/21
    • 59

    [حل شده] خواندن ادرس از تکست باکس

    سلام دوستان
    کد زیر رو با ضبط ماکرو بدست آوردم، چطور می تونم کد رو تغییر بدم تا آدرس رو از تکست باکس بگیره؟
    از این کد برای درج عکس در سلول می خوام استفاده کنم.
    با تشکر
    کد:
    Range("A1").Select
        ActiveSheet.Pictures.Insert( _
            "C:\Users\Public\Pictures\Sample Pictures\Chrysanthemum.jpg").Select
        Selection.ShapeRange.Height = 72
        Range("B1").Select
  • rayeagni

    • 2018/04/21
    • 59

    #2

    کد:
    Range("B" & j).Select
        ActiveSheet.Pictures.Insert(TextBox1.Value).Select
        Selection.ShapeRange.Height = 20
        Range("B1").Select

    کامنت

    چند لحظه..