2016-12-19 3 views
7

में जीबीपी (£) प्रतीक का उपयोग नहीं कर सकता है मेरे पास एक्सेल और पोलिश क्षेत्रीय सेटिंग्स का अंग्रेजी संस्करण है। मैं एक कोड बनाने की कोशिश करता हूं जो संख्या मूल्य से पहले पाउंड प्रतीक के साथ कोशिकाओं को स्वरूपित करेगा।वीबीए

दुर्भाग्यवश जब मैं वीबीए विंडो में प्रतीक पेस्ट करता हूं तो इसे "एल" में परिवर्तित कर दिया जाता है। मैक्रो रिकॉर्डर इस तरह से "एल" के रूप में स्वरूपित कोशिकाओं को भी रिकॉर्ड करता है। Chr (163) "Ł" देता है।

सिस्टम भाषा सेटिंग बदलना, स्थानीयकरण सेटिंग्स या कीबोर्ड सेटिंग्स का कोई प्रभाव नहीं पड़ा। केवल क्षेत्रीय सेटिंग्स (पीसी पुनरारंभ की आवश्यकता है) को बदलने के बाद ही अंग्रेजी (ग्रेट ब्रिटेन) में यह सही तरीके से काम करता है। क्या क्षेत्रीय सेटिंग्स को बदलने के बिना मैं इस प्रतीक का उपयोग कर सकता हूं?

+0

वर्तमान क्षेत्रीय सेटिंग्स क्या हैं? क्या आपने 'Chr (i)' के माध्यम से एक लूप चलाया है, क्योंकि मैं यह देखने के लिए एक वृद्धिशील पूर्णांक है कि यह एक अलग 'Chr' है (हालांकि मुझे शक है)? – Jeremy

+0

क्या आप इसे \ £ – Phil

+2

से बच सकते हैं क्या आपने 'ChrW (163)' की कोशिश की है? – ThunderFrame

उत्तर

5

आप VBA के माध्यम से स्वरूपण के लिए प्रतीक लागू करना चाहते हैं, तो कोशिश:

Sub Serling() 
    Const g = "General" 
    dq = Chr(34) 
    sterl = " " & ChrW(163) 
    s = g & dq & sterl & dq 
    Selection.NumberFormat = s 
    Selection.Font.Name = "Arial Unicode MS" 
End Sub 

enter image description here

संपादित करें # 1:

मेरे लिए, यह वास्तव में अच्छा है । यदि आप डिग्री सेल्सियस चाहते हैं, तो ChrW (8451) का उपयोग करें: यदि आप डिग्री फ़ारेनहाइट चाहते हैं, तो ChrW (8457), आदि का उपयोग करें

+0

बस एक मामूली बिंदु, ओपी अनुरोध के अनुसार संख्या के सामने 'स्टर्ल' होना चाहिए, लेकिन इसे आसानी से आपके ठीक समाधान को देखकर किया जा सकता है। –

+0

@SkipIntro आप सही हैं! –