সাধারণত, ট্রান্সপোজ ফাংশন প্রায়ই সারি কলামে রূপান্তর করতে ব্যবহার করা যেতে পারে। যাইহোক, নির্দিষ্ট মানদণ্ডের উপর নির্ভর করে ফলাফল, যেমন অনন্য মান, ফেরত দেওয়া হবে না। এই টিউটোরিয়ালে, আমরা আপনাকে দেখাব কিভাবে এক্সেলের মানদণ্ডের উপর ভিত্তি করে সারিগুলিকে কলামে স্থানান্তর করতে হয়৷
এক্সেলের মানদণ্ডের উপর ভিত্তি করে কলামে সারি স্থানান্তর করার জন্য 2 সহজ পদ্ধতি
আমরা নীচের চিত্রে বেশ কয়েকটি পণ্য এবং তাদের পরিমাণের একটি ডেটা সেট অন্তর্ভুক্ত করেছি। সারিগুলি তারপর কলামে স্থানান্তরিত হবে৷৷ আমরা মাপদণ্ডের ভিত্তিতে সারিগুলিকে কলামে স্থানান্তর করব অনন্য মানগুলির কারণ একটি পৃথক কক্ষে কিছু সদৃশ এন্ট্রি রয়েছে৷ প্রথমে, আমরা INDEX ব্যবহার করব , ম্যাচ , COUNTIF , IF , এবং IFERROR সূত্র তৈরির ফাংশন। আমরা একটি VBA ও চালাব একই জিনিস সম্পাদন করার জন্য কোড।
1. এক্সেলের মানদণ্ডের উপর ভিত্তি করে কলামে সারি স্থানান্তর করতে INDEX, MATCH এবং COUNTIF ফাংশন সহ সূত্র প্রয়োগ করুন
শুরুতে, আমরা INDEX-এর সূত্র প্রয়োগ করব , ম্যাচ , COUNTIF , IF , এবং IFERROR অ্যারে সহ ফাংশন।
পদক্ষেপ 1:INDEX, MATCH, এবং COUNTIF ফাংশন সন্নিবেশ করুন
- সেলে E5 , অনন্য পণ্য পেতে নিম্নলিখিত সূত্র টাইপ করুন।
=INDEX($B$5:$B$12, MATCH(0, COUNTIF($E$4:$E4, $B$5:$B$12), 0))
ধাপ 2:অ্যারে প্রয়োগ করুন
- একটি অ্যারের সাথে সূত্র প্রয়োগ করতে, Ctrl টিপুন + শিফট + লিখুন
- অতএব, আপনি প্রথম অনন্য ফলাফল পাবেন।
পদক্ষেপ 3:স্বয়ংক্রিয়-পূর্ণ কক্ষগুলি৷
- সমস্ত অনন্য মান পেতে, অটোফিল ব্যবহার করুন কলাম স্বয়ংক্রিয়ভাবে পূরণ করতে হ্যান্ডেল টুল।
পদক্ষেপ 4:IFERROR ফাংশন লিখুন
- পরিমাণগুলির সারি মানকে কলামে স্থানান্তর করতে, নিম্নলিখিত সূত্রটি লিখুন৷
=IFERROR(INDEX($C$5:$C$12, MATCH(0, COUNTIF($E5:E5, $C$5:$C$12) + IF($B$5:$B$12<>$E5,1,0),0)),0)
ধাপ 5:অ্যারে প্রয়োগ করুন
- একটি অ্যারে সন্নিবেশ করতে, Ctrl টিপুন + শিফট + এন্টার করুন .
- ফলে, সেল F5 নীচের চিত্রের মতো প্রথম স্থানান্তরিত মান দেখাবে৷
- অটোফিল হ্যান্ডেল টুল দিয়ে নিচে টেনে আনুন কলাম স্বয়ংক্রিয়ভাবে পূরণ করতে।
- অবশেষে, অটোফিল হ্যান্ডেল টুল দিয়ে সারিগুলি স্বয়ংক্রিয়ভাবে পূরণ করুন .
- অতএব, সমস্ত স্থানান্তরিত সারি নীচের চিত্রের মতো কলামে রূপান্তরিত হবে।
আরো পড়ুন:গ্রুপে একাধিক সারি এক্সেলের কলামে স্থানান্তর করুন
একই রকম পড়া
- এক্সেলের কলামে ডুপ্লিকেট সারিগুলি কীভাবে স্থানান্তর করা যায় (4 উপায়)
- Excel VBA:গ্রুপে একাধিক সারি কলামে স্থানান্তর করুন
- এক্সেলের এক কলামে একাধিক কলাম স্থানান্তর করুন (3টি সহজ পদ্ধতি)
- এক্সেলে কিভাবে রিভার্স ট্রান্সপোজ করবেন (৩টি সহজ পদ্ধতি)
2. এক্সেলের মানদণ্ডের উপর ভিত্তি করে কলামে সারি স্থানান্তর করতে একটি VBA কোড চালান
পদক্ষেপ 1:একটি মডিউল তৈরি করুন
- প্রথমে, Alt টিপুন + F11 VBA ম্যাক্রো শুরু করতে .
- ঢোকান-এ ক্লিক করুন .
- একটি মডিউল তৈরি করতে , মডিউল নির্বাচন করুন বিকল্প।
ধাপ 2:VBA কোড টাইপ করুন
- নিম্নলিখিত VBA আটকান
Sub TransposeRows()
'Define Variables
Dim RowsNumber As Long
Dim p As Long
Dim xColCr As String
Dim xColumn As New Collection
Dim InputRng As Range
Dim OutputRng As Range
Dim RngText As String
Dim CountRow As Long
Dim xRowRg As Range
On Error Resume Next
'Set values and Input Box fot Input Range
RngText = ActiveWindow.RangeSelection.Address
Set InputRng = Application.InputBox("Select Your Input Range for 2 columns:", "ExcelDemy", RngText, , , , , 8)
Set InputRng = Application.Intersect(InputRng, InputRng.Worksheet.UsedRange)
'Apply Condition to count only 2 columns and to show msg box for alerting to select only two columns
If InputRng Is Nothing Then Exit Sub
If (InputRng.Columns.Count <> 2) Or _
(InputRng.Areas.Count > 1) Then
MsgBox "The specified range is only area for 2 columns ", , "ExcelDemy"
Exit Sub
End If
'Set values and Input Box fot Input Range
Set OutputRng = Application.InputBox("Select Your Output Range (one cell):", "ExcelDemy", RngText, , , , , 8)
If OutputRng Is Nothing Then Exit Sub
Set OutputRng = OutputRng.Range(1)
'Count Rows
RowsNumber = InputRng.Rows.Count
'Apply For loop
For p = 2 To RowsNumber
xColumn.Add InputRng.Cells(p, 1).Value, InputRng.Cells(p, 1).Value
Next
Application.ScreenUpdating = False
For p = 1 To xColumn.Count
xColCr = xColumn.Item(p)
OutputRng.Offset(p, 0) = xColCr
InputRng.AutoFilter Field:=1, Criteria1:=xColCr
Set xRowRg = InputRng.Range("B2:B" & RowsNumber).SpecialCells(xlCellTypeVisible)
If xRowRg.Count > CountRow Then CountRow = xRowRg.Count
'Copy and paste with transpose
InputRng.Range("B2:B" & RowsNumber).SpecialCells(xlCellTypeVisible).Copy
OutputRng.Offset(p, 1).PasteSpecial Paste:=xlPasteAll, Operation:=xlNone, SkipBlanks:=False, Transpose:=True
Application.CutCopyMode = False
Next
OutputRng = InputRng.Cells(1, 1)
OutputRng.Offset(0, 1).Resize(1, CountRow) = InputRng.Cells(1, 2)
InputRng.Rows(1).Copy
OutputRng.Resize(1, CountRow + 1).PasteSpecial Paste:=xlPasteFormats
InputRng.AutoFilter
Application.ScreenUpdating = True
End Sub
পদক্ষেপ 3:প্রোগ্রাম চালান
- প্রথমে, সংরক্ষণ করুন এবং F5 টিপুন প্রোগ্রাম চালানোর জন্য।
- হেডার সহ আপনার ডেটা সেট নির্বাচন করুন।
- ঠিক আছে এ ক্লিক করুন .
- আউটপুট পেতে একটি ঘর নির্বাচন করুন
- তারপর, ঠিক আছে এ ক্লিক করুন .
- ফলে, আপনি ফলাফল পাবেন যেগুলি সারিগুলিকে কলামে স্থানান্তরিত করা হয়েছে, যেমনটি নীচের ছবিতে দেখানো হয়েছে৷
আরো পড়ুন:কিভাবে এক্সেল VBA ব্যবহার করে কলামে সারি স্থানান্তর করা যায় (4টি আদর্শ উদাহরণ)
উপসংহার
আমি আশা করি এই নিবন্ধটি আপনাকে কিভাবে এক্সেলের মানদণ্ডের উপর ভিত্তি করে কলামে সারি স্থানান্তর করতে হয় সে সম্পর্কে একটি টিউটোরিয়াল দিয়েছে। . এই সমস্ত পদ্ধতি শিখে নেওয়া উচিত এবং আপনার ডেটাসেটে প্রয়োগ করা উচিত। অনুশীলন ওয়ার্কবুকটি দেখুন এবং এই দক্ষতাগুলি পরীক্ষা করুন। আপনার মূল্যবান সমর্থনের কারণে আমরা এই ধরনের টিউটোরিয়াল তৈরি করতে অনুপ্রাণিত।
যদি আপনার কোন প্রশ্ন থাকে - আমাদের জিজ্ঞাসা করুন নির্দ্বিধায়. এছাড়াও, নীচের বিভাগে মন্তব্য করতে নির্দ্বিধায়৷
আমরা, এক্সেলডেমি দল, সবসময় আপনার প্রশ্নের উত্তর দেয়।
আমাদের সাথে থাকুন এবং শিখতে থাকুন।
সম্পর্কিত প্রবন্ধ
- পাওয়ার কোয়েরি ব্যবহার করে এক্সেলের সারিগুলিতে কলামগুলি রূপান্তর করুন
- সেলের মানের উপর ভিত্তি করে এক্সেলের সারিগুলিতে কলামগুলি কীভাবে রূপান্তর করবেন
- এক্সেলের সারিগুলিতে একাধিক কলাম স্থানান্তর করতে VBA (2 পদ্ধতি)
- একক উদ্ধৃতি দিয়ে কলামকে কমা থেকে আলাদা করা তালিকায় কীভাবে রূপান্তর করবেন
- এক্সেল পেস্ট ট্রান্সপোজ শর্টকাট:ব্যবহার করার 4টি সহজ উপায়
- রেফারেন্স পরিবর্তন না করেই এক্সেল ট্রান্সপোজ সূত্র (4টি সহজ উপায়)
- এক্সেল ভিবিএতে কীভাবে স্থানান্তর করা যায় (৩টি পদ্ধতি)