جب بھی آپ کو ضرورت ہو آپ ایک شیٹ سے دوسری شیٹ یا ورک بک میں رینج کاپی کر سکتے ہیں۔ کاپی اور پیسٹ کی مختلف اقسام ہیں۔ اس مضمون کے بعد، آپ کو Excel VBA کاپی رینج کو دوسری شیٹ میں استعمال کرنے کے مختلف طریقے معلوم ہوں گے۔

وضاحت کو جاندار بنانے کے لیے، میں ایک نمونہ ڈیٹا سیٹ استعمال کرنے جا رہا ہوں جو مخصوص افراد کی ذاتی معلومات کی نمائندگی کرتا ہے۔ . ڈیٹاسیٹ میں 4 کالم ہیں۔ یہ کالم ہیں فرسٹ نام، آخری نام، پورا نام، اور ای میل ۔

پریکٹس کے لیے ورک بک ڈاؤن لوڈ کریں

VBA رینج کو ایک اور شیٹ میں کاپی کریں فارمیٹ کے ساتھ ایک اور شیٹ میں

جب بھی آپ فارمیٹ کے ساتھ ایک شیٹ سے دوسری شیٹ میں رینج کاپی کرنا چاہیں تو آپ اسے آسانی سے <3 کا استعمال کرکے کرسکتے ہیں۔ 2>VBA .

یہاں، میں ڈیٹا سیٹ شیٹ سے WithFormat شیٹ

کی رینج کاپیکروں گا۔ 0>آئیے طریقہ کار شروع کرتے ہیں،

سب سے پہلے ڈیولپر ٹیب >> کو کھولیں۔ منتخب کریں Visual Basic

آپ VBA <کو کھولنے کے لیے ALT + F11 کی بورڈ بھی استعمال کرسکتے ہیں۔ 3>ایڈیٹر۔

اس کے بعد، یہ Microsoft Visual Basic for Applications کے نام سے ایک نئی ونڈو کھولے گا۔

وہاں سے، Insert <3 کھولیں>>> ماڈیول کو منتخب کریں۔

14>

A ماڈیول کھلے گا پھر کھلے میں درج ذیل کوڈ کو ٹائپ کریں >> منتخب کریں میکروز دیکھیں

➤ ایک ڈائیلاگ باکس پاپ اپ ہوگا۔

اب، میکرو نام سے Copy_Range_BelowLastCell_AnotherSheets کو منتخب کریں میکروز میں کے اندر بھی ورک بک منتخب کریں۔

آخر میں، چلائیں منتخب کردہ میکرو ۔

لہذا، یہ منتخب کردہ رینج کو کاپی کرے گا اور اسے کسی اور شیٹ کی آخری قطار سے پیسٹ کرے گا ۔ 3 شیٹ سے Sheet1 of Book2 لیکن پہلے غیر خالی سیل سے۔

طریقہ کار شروع کرنے کے لیے،

سب سے پہلے، ڈیولپر ٹیب >> کھولیں۔ منتخب کریں Visual Basic

آپ ALT + F11 کی بورڈ VBA ایڈیٹر کو کھولنے کے لیے بھی استعمال کر سکتے ہیں۔

اس کے بعد، یہ ایپلیکیشنز کے لیے Microsoft Visual Basic کی ایک نئی ونڈو کھولے گا۔

وہاں سے، کھولیں Insert >> Module کو منتخب کریں۔

A Module کھلے گا پھر کھولے ہوئے Module میں درج ذیل کوڈ کو ٹائپ کریں۔

9770

یہاں، میں نے ذیلی طریقہ کار Copy_Range_BelowLastCell_To_Another_Workbook جہاں wsCopy اور wsDestination <کا اعلان کیا 3> ہیں ورک شیٹ قسم، lCopyLastRow اور lDestLastRow لمبی قسم ہیں۔

سب سے پہلے، کاپی کرنے کے لیے شیٹ اور منزل کی شیٹ کے متغیرات کو سیٹ کرنے کے لیے سیٹ استعمال کیا جاتا ہے۔

اگلا، کاپی رینج میں کالم A کے ڈیٹا کی بنیاد پر آخری قطار تلاش کرنے کے لیے قطار طریقہ استعمال کیا۔

دوبارہ، قطار طریقہ استعمال کیا۔ منزل کی حد میں کالم A کے ڈیٹا کی بنیاد پر پہلی خالی قطار تلاش کرنے کے لیے بھی آفسیٹ ایک پراپرٹی کو نیچے منتقل کرنے کے لیے استعمال کیا جاتا ہے۔

آخر میں، کاپی کا ڈیٹا Dataset2 شیٹ سے Excel VBA کاپی رینج ایک اور Sheet.xlsm ورک بک کو منزل تک Sheet1 ورک بک Book2.xlsx ۔

اب، کوڈ محفوظ کریں اور ورک شیٹ پر واپس جائیں۔

اس کے بعد، کھولیں دیکھیں ٹیب >> سے میکرو >> منتخب کریں میکروز دیکھیں

➤ ایک ڈائیلاگ باکس پاپ اپ ہوگا۔

اب، میکرو نام سے منتخب کریں Copy_Range_BelowLastCell_To_Another_Workbook میکروز میں کے اندر بھی ورک بک منتخب کریں۔

آخر میں، چلائیں منتخب کردہ میکرو ۔

لہذا، یہ موجودہ شیٹ سے منتخب کردہ رینج کو کاپی کسی اور ورک بک کی آخری قطار میں لے جائے گا۔

<0

پریکٹس سیکشن

میں نے ایکسل VBA کاپی رینج کے ان وضاحت شدہ طریقوں پر عمل کرنے کے لیے ورک بک میں ایک پریکٹس شیٹ فراہم کی ہے۔ ایک اور شیٹ میں۔

نتیجہ

اس مضمون میں، میں نے 8 مختلف اقسام کے آسان اور فوری طریقے بتائے ہیں۔ایکسل VBA رینج کو کسی اور شیٹ میں کاپی کریں۔ یہ مختلف طریقے آپ کو ایک شیٹ سے دوسری اور ایک شیٹ سے دوسری ورک بک میں رینج کاپی کرنے میں مدد کریں گے۔ آخری لیکن کم از کم، اگر آپ کے پاس کسی قسم کی تجاویز، خیالات، اور تاثرات ہیں تو براہ کرم نیچے تبصرہ کرنے میں آزاد محسوس کریں۔

2 میں نے موجودہ شیٹ سے شیٹ کے نام WithFormatپر کاپی کرنے کے لیے رینج B1:E10لی ہے۔

یہاں، میں نے کاپی کا استعمال کیا ہے۔ منتخب کردہ رینج کو کاپی کرنے کا طریقہ، کاپی طریقہ کسی بھی رینج کو فارمیٹ کے ساتھ کاپی کرتا ہے۔

آخر میں، محفوظ کریں کوڈ اور ورک شیٹ پر واپس جائیں۔

اس کے بعد، دیکھیں ٹیب >> کھولیں۔ سے میکرو >> منتخب کریں میکروز دیکھیں

➤ ایک ڈائیلاگ باکس پاپ اپ ہوگا۔

اب، میکرو نام سے منتخب کریں Copy_Range_withFormat_ToAnother_Sheet کے اندر موجود ورک بک کو بھی منتخب کریں میکروز میں ۔

آخر میں، چلائیں منتخب کردہ میکرو ۔

لہذا، یہ میری منتخب کردہ نئی شیٹ میں فارمیٹ کے ساتھ منتخب کردہ رینج کو کاپی کرے گا ( WithFormat) .

2. VBA بغیر فارمیٹ کے ایک رینج کو کسی اور شیٹ میں کاپی کریں

یہ بھی ہے VBA کا استعمال کرکے فارمیٹ بغیر کسی رینج کو کسی اور شیٹ میں کاپی ممکن ہے۔

یہاں، میں کاپی <3 کروں گا۔ ڈیٹا سیٹ شیٹ سے بغیر فارمیٹ شیٹ تک کی ایک رینج۔

آئیے طریقہ کار شروع کریں،

اب، ڈیولپر کو کھولیں۔ ٹیب >> منتخب کریں Visual Basic ( استعمال کریں ALT + F11)

اس کے بعد، یہ کھل جائے گا Microsoft Visual Basic for Applications.

پھر، کھولیں Insert >> Module کو منتخب کریں۔

A Module کھلے گا پھر کھولے ہوئے Module میں درج ذیل کوڈ کو ٹائپ کریں۔

6207

یہاں، میں نے ذیلی طریقہ کار Copy_Range_WithoutFormat_Toanother_Sheet

میں نے رینج حاصل کر لی ہے B1:E10 موجودہ شیٹ سے شیٹ کے نام بغیر فارمیٹ میں کاپی کرنے کے لیے۔

یہاں، میں نے منتخب رینج کو کاپی کرنے کے لیے کاپی طریقہ استعمال کیا بلکہ ذکر کیا گیا Paste:=xlPasteValues ​​ PasteSpecial طریقہ میں تاکہ یہ منتخب کردہ رینج کی صرف Values پیسٹ کرے، فارمیٹ کو نہیں۔

آخر میں , محفوظ کریں کوڈ اور ورک شیٹ پر واپس جائیں۔

اس کے بعد، کھولیں دیکھیں ٹیب >> سے میکرو >> منتخب کریں میکروز دیکھیں

➤ ایک ڈائیلاگ باکس پاپ اپ ہوگا۔

>

اب، میکرو نام سے Copy_Range_WithoutFormat_Toanother_Sheet کو منتخب کریں اور میکروز میں کے اندر ورک بک بھی منتخب کریں۔

آخر میں، منتخب کردہ میکرو کو چلائیں۔

اس طرح، یہ صرف اقدار نہیں فارمیٹ<3 کے ساتھ منتخب کردہ رینج کو کاپی چلائے گا۔>.

3. فارمیٹ اور کالم چوڑائی کے ساتھ ایک رینج کو کسی اور شیٹ میں کاپی کریں

کبھی کبھی آپ کاپی کسی بھی منتخب رینج کو جیسا کہ یہ ہے، اس کے لیے آپ فارمیٹ اور کالم کی چوڑائی کے ساتھ رینج کاپی کرسکتے ہیں۔

یہاں، میں ڈیٹا سیٹ شیٹ سے فارمیٹ & کالم کی چوڑائی شیٹ۔

VBA ،

کا استعمال کرتے ہوئے کام کرنے کا طریقہ کار دیکھنے کے لیے، سب سے پہلے ڈیولپر ٹیب >> کھولیں۔ منتخب کریں Visual Basic

آپ ALT + F11 کی بورڈ VBA ایڈیٹر کو کھولنے کے لیے بھی استعمال کر سکتے ہیں۔ <1

اس کے بعد، یہ ایپلیکیشنز کے لیے Microsoft Visual Basic کی ایک نئی ونڈو کھولے گا۔

وہاں، کھولیں Insert >> Module کو منتخب کریں۔

A Module کھلے گا پھر کھولے ہوئے Module میں درج ذیل کوڈ کو ٹائپ کریں۔

8584

یہاں، میں نے ذیلی طریقہ کار Copy_Range_to_Another_Sheet_with_FormatAndColumnWidth

میں نے رینج لے لی ہے B1:E10 موجودہ شیٹ سے مقصود شیٹ کے نام پر کاپی کرنے کے لیے فارمیٹ اور amp; کالم کی چوڑائی ۔

یہاں، میں نے منتخب رینج کو کاپی کرنے کے لیے کاپی طریقہ استعمال کیا۔ میں نے PasteSpecial طریقہ بھی استعمال کیا جہاں میں نے Paste:=xlPasteColumnWidths کا ذکر کیا تاکہ یہ منتخب کردہ رینج کو فارمیٹ اور کالم چوڑائی کے ساتھ چسپاں کر دے۔ .

آخر میں، کوڈ کو محفوظ کریں اور ورک شیٹ پر واپس جائیں۔

اس کے بعد، کھولیں دیکھیں ٹیب >> سے میکرو >> منتخب کریں میکروز دیکھیں

➤ ایک ڈائیلاگ باکس پاپ اپ ہوگا۔

>

اب، میکرو نام سے منتخب کریں Copy_Range_to_Another_Sheet_with_FormatAndColumnWidth اور Macros in کے اندر موجود ورک بک کو بھی منتخب کریں۔

آخر میں، چلائیں منتخب کردہ میکرو ۔

نتیجتاً، یہ منتخب کردہ رینج کو فارمیٹ اور کالم کی چوڑائی کے ساتھ کاپی کرے گا۔<1

4. VBA فارمولہ کے ساتھ ایک رینج کو کسی اور شیٹ میں کاپی کریں

اگر آپ کے ڈیٹاسیٹ میں کوئی فارمولا ہے تو آپ کاپی کرنا چاہتے ہیں۔ کوئی غم نہیں! آپ فارمولے کو برقرار رکھتے ہوئے کسی اور شیٹ میں فارمولہ پر مشتمل رینج کاپی کرسکتے ہیں۔

یہاں، میں ڈیٹا سیٹ شیٹ سے ایک رینج کاپی کروں گا۔ Formula شیٹ

کے ساتھ عمل شروع کریں،

شروع کرنے کے لیے، ڈیولپر ٹیب >> کھولیں۔ بصری بنیادی کو منتخب کریں ( آپ ALT + F11 کی بورڈ)

11>

اس کے بعد، یہ بھی استعمال کرسکتے ہیں۔ ایپلیکیشنز کے لیے Microsoft Visual Basic کھولے گا۔

وہاں سے، کھولیں Insert >> Module کو منتخب کریں۔

A Module کھلے گا پھر کھولے ہوئے Module میں درج ذیل کوڈ کو ٹائپ کریں۔

5363

یہاں، میں نے ذیلی طریقہ کار Copy_Range_withFormula_ToAnother_Sheet

میں نے رینج لے لی ہے B1:E10 موجودہ شیٹ سے منزل شیٹ کے نام WithFormula پر کاپی کرنے کے لیے۔

یہاں، میں نے منتخب رینج کو کاپی کرنے کے لیے کاپی طریقہ استعمال کیا۔ میں نے PasteSpecial طریقہ بھی استعمال کیا جہاں میں نے Paste:=xlPasteFormulas کا ذکر کیا ہے تاکہ یہ منتخب کردہ رینج کے ساتھ فارمولز کو بھی لے جائے۔

آخر میں کوڈ کو محفوظ کریں اور ورک شیٹ پر واپس جائیں۔

پھر، دیکھیں کھولیں ٹیب >> سے میکرو >> منتخب کریں میکروز دیکھیں

➤ ایک ڈائیلاگ باکس پاپ اپ ہوگا۔

اب، میکرو نام سے منتخب کریں Copy_Range_withFormula_ToAnother_Sheet Macros in کے اندر موجود ورک بک کو بھی منتخب کریں۔

آخر میں، چلائیں منتخب کردہ میکرو ۔

اس طرح، یہ کاپی تمام منتخب سیل رینجز کو فارمولوں کے ساتھ بنائے گا۔

اسی طرح کی ریڈنگز:

• 2>ایکسل میں رینج میں ہر سیل کے لیے VBA (3 طریقے)
• ایکسل میں VBA کے رینج آبجیکٹ کو کیسے استعمال کریں (5 پراپرٹیز)

5. AutoFit کے ساتھ ایک رینج کو دوسری شیٹ میں کاپی کریں

جب کسی رینج کو کسی دوسری شیٹ میں کاپی کرتے ہوئے آپ AutoFit طریقہ بھی استعمال کر سکتے ہیں۔ نئی شیٹ میں VBA سے AutoFit کاپی شدہ رینج میں۔

یہاں، میں ڈیٹا سیٹ سے ایک رینج کاپی کروں گا شیٹ ٹو آٹو فٹ شیٹ

آئیے طریقہ کار شروع کریں،

سب سے پہلے، ڈیولپر ٹیب کو کھولیں >> منتخب کریں Visual Basic

آپ ALT + F11 کی بورڈ VBA ایڈیٹر کو کھولنے کے لیے بھی استعمال کر سکتے ہیں۔ <1

اس کے بعد، یہ ایپلیکیشنز کے لیے Microsoft Visual Basic کی ایک ونڈو کھولے گا۔

پھر، کھولیں Insert > ;> ماڈیول کو منتخب کریں۔

14>

A ماڈیول کھلے گا پھر کھلے میں درج ذیل کوڈ کو ٹائپ کریں ماڈیول ۔

4604

یہاں، میں نے اعلان کیا ذیلی طریقہ کار Copy_Range_withFormat_AutoFit

سب سے پہلے، میں نے ورک شیٹ ڈیٹا سیٹ کو منتخب کیا۔ پھر موجودہ شیٹ سے AutoFit نامی منزل کی شیٹ پر کاپی کرنے کے لیے B1:E10 کی حد لی۔

یہاں، میں نے کاپی کا استعمال کیا۔ منتخب کردہ رینج کو کاپی کرنے کا طریقہ اور AutoFit طریقہ دیے گئے کالموں کو آٹو فٹ کرے گا B:E ۔

آخر میں، محفوظ کریں کوڈ اور جائیں ورک شیٹ پر واپس جائیں۔

اگلا، کھولیں دیکھیں ٹیب >> سے میکرو >> منتخب کریں میکروز دیکھیں

➤ ایک ڈائیلاگ باکس پاپ اپ ہوگا۔

اب، میکرو نام سے منتخب کریں Copy_Range_withFormat_AutoFit کے اندر موجود ورک بک کو بھی منتخب کریں میکروز میں ۔

آخر میں، چلائیں منتخب کردہ میکرو ۔

لہذا، یہ کاپی منتخب رینج کو ایک نئی شیٹ میں اور آٹو فٹ کالموں کو بھی

6. VBA ایک رینج کو دوسری ورک بک میں کاپی کریں

اگر آپ چاہیں تو آپ ایک شیٹ سے دوسری شیٹ میں رینج کاپی بھی کرسکتے ہیں۔ ایک مختلف ورک بک کا۔

یہاں، میں Dataset شیٹ سے Book1 کی Sheet1 کی رینج کاپی کروں گا۔ ورک بک۔

آئیے طریقہ کار شروع کریں،

سب سے پہلے، ڈیولپر ٹیب >> کھولیں۔ Visual Basic کو منتخب کریں (y آپ ALT + F11 کی بورڈ)

11>

پھر، یہ Microsoft Visual کھولے گا۔ایپلیکیشنز کے لیے بنیادی۔

اگلا، کھولیں Insert >> Module کو منتخب کریں۔

A Module کھلے گا پھر کھولے ہوئے Module میں درج ذیل کوڈ کو ٹائپ کریں۔

1138

یہاں، میں نے ذیلی طریقہ کار Copy_Range_WithFormat_Toanother_WorkBook

میں نے رینج لے لی ہے B3:E10 شیٹ کے نام سے ڈیٹا سیٹ موجودہ شیٹ سے نئی ورک بک کے نام Book1 اور شیٹ کا نام Sheet1 .

یہاں، میں نے منتخب رینج کو نئی ورک بک میں کاپی کرنے کے لیے کاپی طریقہ استعمال کیا۔

آخر میں، محفوظ کریں کوڈ اور ورک شیٹ پر واپس جائیں۔

اگلا، کھولیں دیکھیں ٹیب >> سے میکرو >> منتخب کریں میکروز دیکھیں

➤ ایک ڈائیلاگ باکس پاپ اپ ہوگا۔

اب، میکرو نام سے منتخب کریں Copy_Range_WithFormat_Toanother_WorkBook بھی Macros in کے اندر موجود ورک بک کو منتخب کریں۔

آخر میں، چلائیں منتخب کردہ میکرو ۔

اب، یہ منتخب کردہ رینج کو ڈیٹا سیٹ شیٹ سے کسی اور ورک بک میں کاپی کرے گا۔

7. ایک رینج کو دوسری شیٹ کی آخری قطار میں کاپی کریں

کسی بھی صورت میں، اگر آپ کسی رینج کو کسی اور شیٹ میں کاپی کرنا چاہتے ہیں کسی خاص سیل یا آخری سیل سے آپ اسے VBA کا استعمال کرتے ہوئے کر سکتے ہیں۔

طریقہ کار میں داخل ہونے سے پہلے، میں آپ کو بتانا چاہتا ہوں کہ، میں نے دو نئی شیٹس لی ہیں جن پر مشتمل ہے پورا نام، ای میل، اور پتہ ۔

آئیے پہلے ڈیٹا سیٹ2 شیٹ کا مشاہدہ کریں۔

یہ ہے آخری سیل کے نیچے شیٹ۔

یہاں، میں کاپی سے ایک رینج کروں گا۔ 2>ڈیٹا سیٹ2 شیٹ کو آخری سیل کے نیچے لیکن پہلے غیر خالی سیل سے۔

شروع کرنے کے لیے، ڈیولپر ٹیب >> کھولیں۔ منتخب کریں Visual Basic

اس کے بعد، یہ کھلے گا Microsoft Visual Basic for Applications.

پھر کھولیں داخل کریں >> Module کو منتخب کریں۔

A Module کھلے گا پھر کھولے ہوئے Module میں درج ذیل کوڈ کو ٹائپ کریں۔

8814

یہاں، میں نے ذیلی طریقہ کار Copy_Range_BelowLastCell_AnotherSheets

سب سے پہلے، میں نے شیٹ کو منتخب کیا ڈیٹا سیٹ2 اور پھر آخری قطار کو گننے کے لیے قطار طریقہ استعمال کیا اور گنتی ہوئی قطار کو lr میں رکھا۔

پھر لیا گیا۔ رینج A2:C & lr موجودہ شیٹ سے منزل کے شیٹ کے نام پر کاپی کرنے کے لیے آخری سیل کے نیچے ۔

دوبارہ، آخری کو شمار کرنے کے لیے قطار طریقہ استعمال کریں۔ ایک اور شیٹ کی قطار جس کا نام آخری سیل کے نیچے ہے اور گنتی ہوئی قطار کو lrAnotherSheet میں رکھا۔

یہاں، میں نے کاپی طریقہ استعمال کیا۔ منتخب کردہ رینج کو کاپی کرنے کے لیے اور AutoFit طریقہ دیے گئے کالموں کو آٹو فٹ کرے گا A:C ۔

آخر میں، محفوظ کریں کوڈ اور واپس جائیں ورک شیٹ پر۔

اگلا، کھولیں دیکھیں ٹیب >> میکروز سے