वीबीए बिना किसी सेल की सामग्री की प्रतिलिपि कैसे करें।

Question

चुनें मैं एक विधि लिख रहा हूं जो Target ले सकता है और सेल को किसी अन्य सेल पर पेस्ट कर सकता है। सेल कुछ फैंसी बनाने के साथ एक शिपिंग लेबल है। क्या मैं ऐसा कर सकता हूं?

Worksheets("Label").Range("A1").Value = Worksheets("Get Address").Range("A28").Value 

यह सादे पाठ के लिए काम किया:

मूल रूप से मैं इस किया है। हालांकि मैं स्टाइल मैं बनाया खो दिया है, वे अलग हैं पहली पंक्ति के बाद, शैली अलग है क्योंकि:

मैं भी मैक्रो रिकॉर्डर का उपयोग करने की कोशिश की और मैं एक समाधान .Select का उपयोग कर गया, और I read this question जब भी संभव हो इसका उपयोग न करें। मैं क्या कर सकता हूँ?

' Created by the Macro Recorder 
Range("A28:A33").Select 
Range("A33").Activate 
Selection.Copy 
Sheets("Label").Select 
Range("A1").Select 
ActiveSheet.Paste 

Answer 1

Worksheets("Get Address").Range("A33").Copy _ 
     Destination := Worksheets("Label").Range("A1") 

Answer 2

कॉपी करने के लिए और पेस्ट मूल्यों केवल उसके बाद निम्न

Worksheets("Label").Range("A1").value = _ 
    Worksheets("Get Address").Range("A33").value 

इस बयान क्लिप बोर्ड का उपयोग नहीं होगा का उपयोग