วิธีคัดลอกที่อยู่เซลล์ปัจจุบันไปยังตำแหน่งอื่นใน Excel

ใน Excel คุณสามารถคัดลอกเนื้อหาของเซลล์ปัจจุบันได้อย่างง่ายดายด้วยทางลัดหรือเมนูบริบท แต่คุณจะคัดลอกที่อยู่เซลล์ปัจจุบันไปยังตำแหน่งอื่นได้อย่างไร？

คัดลอกที่อยู่เซลล์ปัจจุบัน

คัดลอกที่อยู่เซลล์ปัจจุบันและวางด้วย VBA

คัดลอกที่อยู่เซลล์ปัจจุบัน

นี่คือสูตรที่สามารถรับที่อยู่เซลล์ปัจจุบันใน Excel

เลือกเซลล์ที่คุณจะวางที่อยู่ของเซลล์พิมพ์สูตรนี้ =ADDRESS(ROW(),COLUMN())จากนั้นที่อยู่เซลล์ปัจจุบันจะปรากฏขึ้น

จากนั้นกด Ctrl + C เพื่อคัดลอกและคลิกขวาที่เซลล์เพื่อเลือกวางเป็นค่า

ปลดล็อก Excel Magic ด้วย Kutools AI

• การดำเนินการอย่างชาญฉลาด: ดำเนินการกับเซลล์ วิเคราะห์ข้อมูล และสร้างแผนภูมิ ทั้งหมดนี้ขับเคลื่อนด้วยคำสั่งง่ายๆ
• สูตรที่กำหนดเอง: สร้างสูตรที่ปรับแต่งโดยเฉพาะเพื่อปรับปรุงขั้นตอนการทำงานของคุณ
• การเข้ารหัส VBA: เขียนและใช้งานโค้ด VBA ได้อย่างง่ายดาย
• การตีความสูตร: เข้าใจสูตรที่ซับซ้อนได้อย่างง่ายดาย
• การแปลข้อความ: ทลายกำแพงด้านภาษาภายในสเปรดชีตของคุณ

ปรับปรุงความสามารถ Excel ของคุณด้วยเครื่องมือที่ขับเคลื่อนด้วย AI ดาวน์โหลดเดี๋ยวนี้ และสัมผัสประสิทธิภาพอย่างที่ไม่เคยมีมาก่อน!

คัดลอกที่อยู่เซลล์ปัจจุบันและวางด้วย 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.