كيفية نسخ عنوان الخلية الحالي إلى موقع آخر في إكسيل؟

في Excel ، يمكنك نسخ محتويات الخلية الحالية بسهولة باستخدام الاختصارات أو قائمة السياق ، ولكن كيف يمكنك نسخ عنوان الخلية الحالي إلى موقع آخر？

نسخ عنوان الخلية الحالي

انسخ عنوان الخلية الحالي والصقه باستخدام VBA

---

نسخ عنوان الخلية الحالي

إليك صيغة يمكنها الحصول على عنوان الخلية الحالي في Excel.

حدد الخلية التي ستضع فيها عنوان الخلية ، اكتب هذه الصيغة =ADDRESS(ROW(),COLUMN())، ثم تم عرض عنوان الخلية الحالي.

ثم اضغط Ctrl + C لنسخها والنقر بزر الماوس الأيمن فوق خلية لتحديد لصقها كقيمة.

---

انسخ عنوان الخلية الحالي والصقه باستخدام VBA

إليك رمز VBA الذي يمكنه نسخ عنوان الخلية ثم لصقه في خلية أخرى.

1. صحافة Alt + F11 مفاتيح لتمكين Microsoft Visual Basic for Applications نافذة.

2. انقر Insert > Module، والصق الكود أدناه في البرنامج النصي.

VBA انسخ والصق عنوان الخلية

Sub AddressCopy()
'UpdatebyExtendoffice20180307
    Dim xSRg As Range
    Dim xDRg As Range
    On Error Resume Next
    Set xSRg = Application.InputBox("Select cell(s) to copy its address:", "KuTools for Excel", Selection.Address, , , , , 8)
    If xSRg Is Nothing Then Exit Sub
    Set xDRg = Application.InputBox("Select a cell to paste:", "KuTools for Excel", , , , , , 8)
    If xDRg Is Nothing Then Exit Sub
    xDRg(1).Value = xSRg.Address
End Sub

3. صحافة F5 مفتاح ، ينبثق مربع حوار لتحديد الخلية التي تريد نسخ عنوانها.

4. انقر OK، حدد خلية للصق عنوان الخلية.

5. انقر OK.