کپی کردن در حالت لینک

Collapse
X
 
  • زمان
  • نمایش
حذف همه
new posts
  • ggroup

    • 2021/09/20
    • 25
    • 39.00

    پرسش کپی کردن در حالت لینک

    سلام
    میخام توی VBA دستوری بنویسم که مقدارر رنج A3:B42 در Sheet1 رو بصورت سورس لینک در Sheet3 کپی کنم، جوری که اگه در Sheet1 مقداری تغییر کرد در Sheet3 هم همون مقدار ثبت بشه

    به این حالت در Sheet3 ثبت بشه
    ='Sheet1'!A5
  • kazamie

    • 2021/12/14
    • 249
    • 87.00

    #2
    نوشته اصلی توسط ggroup
    سلام
    میخام توی vba دستوری بنویسم که مقدارر رنج a3:b42 در sheet1 رو بصورت سورس لینک در sheet3 کپی کنم، جوری که اگه در sheet1 مقداری تغییر کرد در sheet3 هم همون مقدار ثبت بشه

    به این حالت در sheet3 ثبت بشه
    ='sheet1'!a5
    سلام یک ماکرو ضبط کنید ابتدا روی دکمه ضبط ماکرو کلیک کنید و بعد در شیت اول محدوده مورد نظر را انتخاب کنید و کپی کنید و به شیت سوم بروید و در سلولa3 به صورت لینک پیست کنید و بعد ضبط ماکرو را متوقف کنید
    دکتر کاظمی

    کامنت

    • ggroup

      • 2021/09/20
      • 25
      • 39.00

      #3
      نوشته اصلی توسط kazamie
      سلام یک ماکرو ضبط کنید ابتدا روی دکمه ضبط ماکرو کلیک کنید و بعد در شیت اول محدوده مورد نظر را انتخاب کنید و کپی کنید و به شیت سوم بروید و در سلولa3 به صورت لینک پیست کنید و بعد ضبط ماکرو را متوقف کنید
      این روش جواب نمیده چون گزینه لینک پیست برام ظاهر نمیشه

      کامنت

      • kazamie

        • 2021/12/14
        • 249
        • 87.00

        #4
        نوشته اصلی توسط ggroup
        این روش جواب نمیده چون گزینه لینک پیست برام ظاهر نمیشه
        برای من که ماکرو ضبط شد
        کد:
        Sub Macro1()
        Application.ScreenUpdating = False
        Sheets("Sheet1").Select
            Range("A3:B42").Select
            Application.CutCopyMode = False
            Selection.Copy
            Sheets("Sheet3").Select
            Range("A3").Select
            ActiveSheet.Paste Link:=True
            Application.ScreenUpdating = True
        End Sub
        دکتر کاظمی

        کامنت

        • ggroup

          • 2021/09/20
          • 25
          • 39.00

          #5
          نوشته اصلی توسط kazamie
          برای من که ماکرو ضبط شد
          کد:
          Sub Macro1()
          Application.ScreenUpdating = False
          Sheets("Sheet1").Select
              Range("A3:B42").Select
              Application.CutCopyMode = False
              Selection.Copy
              Sheets("Sheet3").Select
              Range("A3").Select
              ActiveSheet.Paste Link:=True
              Application.ScreenUpdating = True
          End Sub
          بله مشکل اینکه من داخل جدول میخام کپی کنم برا همین داخل جدول لینک پیست نمیاد

          کامنت

          چند لحظه..