کپی محتوا با کلیک در اکسل

[bluetoo3]

دنبال راه حلی هستم که توی اکسل وقتی روی یک سلول کلیک میکنم محتوای اون سلول کلیک شده رو داخل سلول دیگری بریزه
مثلا روی یک کد ملی کلیک میکنم توی شیت سوم سلول b3 اون کد ملی کپی بشه.
همچین چیزی امکان داره ؟؟

اخطار: این یک موضوع قدیمی است به دلیل قدیمی بودن موضوع، ممکن است برخی فایل های ضمیمه به درستی کار نکنند. لطفا در صورت عدم ضرورت، از بالا آوردن موضوعات قدیمی خودداری نمایید.

[iranweld]

با سلام

بایستی با استفاده از قابلیت رویدادها در اکسل کدنویسی لازم را انجام دهید

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

If Not Intersect(Target, Me.Range("A:A")) Is Nothing Then
    
    Sheet3.Range("b3") = Target
    
    Sheet3.Select
           
    End If

End Sub