এক্সেল শীটগুলিতে বোল্ড পাঠ্য

Question

আমাদের কাছে 2 টি ট্যাব সহ একটি স্প্রেড শীট রয়েছে, 1 টি অভ্যন্তরীণ ব্যবহারের জন্য এবং অন্যটি ক্লায়েন্টের অনুলিপি। আমরা অভ্যন্তরীণ অনুলিপিতে সমস্ত ব্যয় এবং বিবরণ কী করে থাকি এবং এটি ক্লায়েন্টের অনুলিপিটিতে উপস্থিত হয়। আমার প্রশ্ন হ'ল আমি গা bold় পাঠ্য বা শব্দগুলিকে নিম্নরেখার মাধ্যমে বর্ণনায় উচ্চ হালকা তথ্য চাই, আমি অভ্যন্তরীণ অনুলিপিটিতে এটি করতে পারি তবে এটি ক্লায়েন্টের অনুলিপিটিতে এটি প্রতিফলিত করে না

এটি ক্লায়েন্টের অনুলিপি = IF ('অভ্যন্তরীণ ব্যবহার'! H13 = 0, "", 'অভ্যন্তরীণ ব্যবহার'! এইচ 13) এর ঘরে থাকা সূত্রটি হ'ল
আমরা কি এটি করতে সক্ষম এবং যদি তাই হয় তবে আমাকে কী যুক্ত করতে হবে? এটি করার সূত্রে

ধন্যবাদ কাইলি

Comments

আপনি কি ক্লায়েন্টের অনুলিপিগুলিতে কেবল সেই কক্ষগুলি নির্বাচন করতে পারবেন না যেগুলি সাহসী বা আন্ডারলাইন করা উচিত এবং সেই কক্ষে পাঠ্যকে বিন্যাসিত বা আন্ডারলাইনযুক্ত হিসাবে ফর্ম্যাট করতে হবে?

— ব্যান্ডারসনচ

আপনি স্ট্যান্ডার্ড ফাংশন দিয়ে এটি করতে পারবেন না। ম্যাক্রোগুলি ব্যবহারের জন্য একটি কার্যকারিতা হতে পারে।

— মাতা জুহেজ

ম্যাক্রোস কী তা কাজের সাথে

— কাইলি

ব্যান্ডারসনচ - আমরা চেষ্টা করেছি এবং এটি কার্যকর হয় না

— কাইলি

আপনি কি আপনার প্রয়োজনীয়তার বিষয়ে বিস্তারিত বলতে পারেন? বর্ণনার কিছু শব্দ কি হাইলাইট করা হয়েছে ("এই সমাধানটি আসলেই ব্যয়বহুল ")? এবং যদি তা হয় তবে কোন শব্দটি কী হাইলাইট করা হয়েছে?

— আয়ান

Answer 1

আমি এটি করার সহজ উপায় দেখতে পাচ্ছি না। এমএস এক্সেল যেমন এমভিপি বলেছে :

সূত্র এবং ফাংশনগুলি কেবল ফলাফল প্রত্যাবর্তন করতে পারে। তারা ফর্ম্যাটিং পরিবর্তন বা অনুলিপি করতে পারে না।

আপনার সমস্যার 2 টি সম্ভাব্য সমাধান রয়েছে যা আমি দেখতে পাচ্ছি:

1 শর্তসাপেক্ষ বিন্যাস

যদি উত্স কোষগুলি শর্তযুক্ত বিন্যাসের নিয়মগুলির সাথে ফর্ম্যাট করা হয় তবে গন্তব্য কক্ষগুলিতে একই নিয়ম প্রয়োগ করুন।

2 ভিবিএ স্ক্রিপ্টিং

এই ব্যবহারকারীটি অন্য ব্যবহারকারীকে কীভাবে এটি করতে হবে তার জন্য কিছু সহায়ক ভিবিএ স্ক্রিপ্ট এবং নির্দেশাবলী সরবরাহ করে তবে এটি সহজ নয় এবং আপনার প্রয়োজনীয়তার সাথে সামঞ্জস্য করার জন্য টুইচিংয়ের প্রয়োজন হবে।

নিম্নলিখিত কোডটি একটি মান মডিউলে রাখুন:

Public Sub CopyFormat(rng As Range)
On Error Resume Next
If rng.Value = "" Then Exit Sub
If Left(rng.Value, 1) = "#" Then
    Ref = Mid(rng.Value, 2, Len(rng.Value) - 1)
    Range(Ref).Copy
    rng.PasteSpecial Paste:=xlPasteAllUsingSourceTheme, Operation:=xlNone _
        , SkipBlanks:=False, Transpose:=False
    Application.CutCopyMode = False
    rng.Formula = "=" & Ref  'COMMENT OUT IF REFERRED CELL VALUE NOT REQUIRED
    'rng.Value = ""  'ACTIVATE IF REFERRED CELL VALUE NOT REQUIRED
End If
End Sub

প্রতিটি শীটের ওয়ার্কশিট_ চেঞ্জ ইভেন্ট রুটিনে নিম্নলিখিত কোডটি রাখুন:

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Cells.Count > 1 Then Exit Sub
CopyFormat Target
End Sub

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
With Worksheets("Hidden")
On Error Resume Next
Application.EnableEvents = False
    Range(.Range("Z1").Value).Copy
    Range(.Range("Z1").Value).Dependents.Select
Application.EnableEvents = True
If Err = 0 Then
    Selection.PasteSpecial Paste:=xlPasteFormats, Operation:=xlNone, _
        SkipBlanks:=False, Transpose:=False
End If
.Range("Z1") = Target.Address
End With
Application.CutCopyMode = False
End Sub

কলিং সেলটিতে সূত্রটি প্রবেশ করুন তবে "=" কে পাউন্ড সাইন "#" (উদ্ধৃতি ব্যতীত) দিয়ে প্রতিস্থাপন করুন:

A5 হচ্ছে = A1 এর সূত্রের পরিবর্তে এটি # A1 হবে শিট 2 কোষের A1 টি = শিট 1! এ 1 এর সূত্রের পরিবর্তে এটি হবে # শিট 1! এ 1

এটি একই শিটের উপর বা বিভিন্ন শিটের মধ্যে মান এবং ফর্ম্যাটিংটি ঘর থেকে ঘরে নিয়ে যেতে ব্যবহার করা যেতে পারে। এটি রেফারেল সেল থেকেও মন্তব্যটি বহন করবে। আপনি যদি মান ব্যতীত কেবল বিন্যাসটি অনুলিপি করতে চান তবে rng.formula = "=" পরিবর্তন করুন এবং Rng.value = "" এ উল্লেখ করুন