2013-12-16 7 views
7

का उपयोग कर Excel में किसी सेल में टेक्स्ट जोड़ना मैं SQL और Excel Macros के साथ काम कर रहा हूं, लेकिन मुझे नहीं पता कि सेल में टेक्स्ट कैसे जोड़ना है।वीबीए

मैं "01/01/13 00:00" कोपर पाठ जोड़ना चाहता हूं। मैं इसे केवल सेल में नहीं लिख सकता क्योंकि मैक्रो पहले शीट की सामग्री को साफ़ करता है और बाद में जानकारी जोड़ता है।

मैं इसे वीबीए में कैसे कर सकता हूं?

+0

लाइन है कि सामग्री को साफ करता है का पता लगाने और इसे संशोधित में चाहते हो जाएगा। या 'रेंज ("ए 1") का उपयोग करें। संख्याफॉर्मैट = "@" 'और फिर' रेंज (" ए 1 ") =" 01/01/13 00:00 "' –

+0

@mehow दोनों उत्तरों से बेहतर है; उनमें से एक मेरा है। – Bathsheba

+0

@ बाथशेबा +1 लोग –

उत्तर

14

Range("$A$1").Value = "'01/01/13 00:00" ऐसा करेगा।

एकल उद्धरण नोट करें; यह एक प्रकार के स्वचालित रूपांतरण को हरा देगा। लेकिन क्या आप वास्तव में चाहते हैं? सेल-टाइम मान लेने के लिए सेल को प्रारूपित करना एक विकल्प होगा। फिर स्ट्रिंग से एकल उद्धरण ड्रॉप करें।

+2

+1 दिमाग के लिए एक जैसे सोचने के लिए +1 - लेकिन आप थोड़ा तेज़ थे क्योंकि मैं '[ए 1] 'नोटेशन की व्याख्या जोड़ रहा था। – Floris

+0

टेक्स्ट ठीक है लेकिन धन्यवाद, मैं बस मामले में दोनों की कोशिश करूंगा। – Phil

+0

यह मेरे लिए काम नहीं करता है .. यह कुछ कक्षों के लिए काम करता है जहां मैं कुछ संख्या जोड़ता हूं, लेकिन कुछ को टेक्स्ट जोड़ने के लिए नहीं .. यह एक संरक्षित वर्कशीट है लेकिन मैं मैन्युअल रूप से कक्षों में टेक्स्ट दर्ज कर सकता हूं .. यह समस्या क्या हो सकती है मैक्रो विफल रहता है? मैंने अभी रेंज ("$ D $ 2") का उपयोग किया है। वैल्यू = "'टेस्ट" –

9

आप

[A1].Value = "'O1/01/13 00:00" 

कर सकता है यदि आप वास्तव में पाठ (प्रथम चरित्र के रूप में apostrophe ध्यान दें) के रूप में यह जोड़ने के लिए मतलब है।

[A1].ValueRange("A1").Value के लिए वीबीए शॉर्टेंड है।

आप कोई दिनांक दर्ज करना चाहते हैं, आप के बजाय (@SiddharthRout करने के लिए धन्यवाद के साथ संपादित क्रम) कर सकता है:

[A1].NumberFormat = "mm/dd/yyyy hh:mm;@" 
[A1].Value = DateValue("01/01/2013 00:00") 
+1

+1 उस नोटेशन के लिए जो मैं हमेशा भूल जाता हूं। – Bathsheba

+0

टेक्स्ट ठीक है क्योंकि मैं इसे SQL तालिका में टाइमस्टैम्प प्रारूपित करने के लिए टेम्पलेट के रूप में उपयोग कर रहा हूं। धन्यवाद। – Phil

+0

सावधान रहें कि एस्ट्रोफ़े एक वास्तविक चरित्र के रूप में वहां होगा। एसक्यूएल शायद ऐसा नहीं हो सकता है। – Floris

2

आप Range और Valu ई कार्यों का उपयोग करने की आवश्यकता है।
Range सेल जहां आप पाठ चाहते हो सकता है आप चाहते हैं
Value पाठ है कि आप उस सेल

Range("A1").Value="whatever text"