انتقل إلى المحتوى الرئيسي

كيفية لصق القيم على الخلايا المرئية / المصفاة فقط في إكسيل؟

في Excel ، إذا قمت بتصفية البيانات أو إخفاء بعض الخلايا ، وعند لصق القيم في النطاق المصفاة أو المخفي ، ستتم تعبئة الخلايا المخفية أيضًا بالقيم الملصقة. سأخبرك هنا ببعض الحيل للصق القيم في الخلايا المرئية فقط في Excel.

قم بلصق القيم في الخلايا المرئية باستخدام VBA

قم بلصق القيم على الخلايا المرئية باستخدام Paste to Visible Range of Kutools for Excel فكرة جيدة 3


قم بلصق القيم في الخلايا المرئية باستخدام VBA

في Excel ، لا توجد طرق أخرى لحل هذه المشكلة باستثناء VBA.

1. صحافة ALT + F11 مفاتيح في وقت واحد ، و ميكروسوفت فيسوال باسيك للتطبيقات نافذة الملوثات العضوية الثابتة.

2. انقر إدراج > وحدة، ثم الصق كود فبا أدناه في نافذة الوحدة النمطية.

فبا: لصق القيم على الخلايا المرئية فقط.

Sub CopyFilteredCells()
	'Updateby20150203
	Dim rng1 As Range
	Dim rng2 As Range
	Dim InputRng As Range
	Dim OutRng As Range
	xTitleId     = "KutoolsforExcel"
	Set InputRng = Application.Selection
	Set InputRng = Application.InputBox("Copy Range :", xTitleId, InputRng.Address, Type: = 8)
	Set OutRng   = Application.InputBox("Paste Range:", xTitleId, Type: = 8)
	For Each rng1 In InputRng
		rng1.Copy
		For Each rng2 In OutRng
			If rng2.EntireRow.RowHeight > 0 Then
				rng2.PasteSpecial
				Set OutRng = rng2.Offset(1).Resize(OutRng.Rows.Count)
				Exit For
			End If
		Next
	Next
	Application.CutCopyMode = False
End Sub

3. انقر F5 مفتاح أو يجري ، ثم يظهر لك مربع حوار لتحديد القيم المراد نسخها. انظر لقطة الشاشة:
doc-لصق-إلى-مرئية-الخلية -1

4. بعد تحديد القيم ، انقر فوق OK، ثم يظهر مربع حوار آخر لتحديد نطاق للصق البيانات المحددة. انظر لقطة الشاشة:
doc-لصق-إلى-مرئية-الخلية -2

5. انقر OK. يمكنك رؤية الخلايا المرئية فقط يتم لصقها بالقيم المحددة.


قم بلصق القيم على الخلايا المرئية باستخدام Paste to Visible Range of Kutools for Excel

في الواقع ، إذا كنت تستخدم لصق إلى النطاق المرئي فائدة كوتولس ل إكسيل - أداة Excel مفيدة ، يمكنك بسرعة وسهولة حل مشكلة لصق القيم على النطاق المرئي.
doc ، لصق الخلية المرئية 6

كوتولس ل إكسيل, مع أكثر من 300 وظائف يدوية ، تجعل مهامك أكثر سهولة. 

بعد تثبيت Kutools for Excel ، يرجى القيام بما يلي:(تنزيل مجاني Kutools for Excel الآن!)

1. حدد مجموعة من القيم التي تريد نسخها ولصقها ، ثم انقر فوق كوتولس > الفترة (من ... إلى) > لصق إلى النطاق المرئي > الكل or فقط لصق القيم. انظر لقطة الشاشة:
doc ، لصق الخلية المرئية 7

2. ثم أ لصق إلى النطاق المرئي يظهر مربع الحوار ، وحدد النطاق الذي تريد لصق القيم فيه. انظر لقطة الشاشة:
doc ، لصق الخلية المرئية 8

3. انقر OK. الآن يتم لصق القيم المحددة في النطاق المرئي فقط.

لصق القيم فقط على الخلايا المرئية لصق الكل في الخلايا المرئية
doc ، لصق الخلية المرئية 9 doc ، لصق الخلية المرئية 10


ملحوظة:
تعمل هذه الأداة المساعدة على الصفوف أو الأعمدة المخفية والمفلترة

انقر هنا للحصول على مزيد من المعلومات التفصيلية حول الأداة Paste to Visible Range.

  لصق في الخلايا المرئية فقط

أفضل أدوات إنتاجية المكتب

🤖 مساعد Kutools AI: إحداث ثورة في تحليل البيانات على أساس: التنفيذ الذكي   |  إنشاء التعليمات البرمجية  |  إنشاء صيغ مخصصة  |  تحليل البيانات وإنشاء الرسوم البيانية  |  استدعاء وظائف Kutools...
الميزات الشعبية: البحث عن التكرارات أو تمييزها أو تحديدها   |  حذف الصفوف الفارغة   |  دمج الأعمدة أو الخلايا دون فقدان البيانات   |   جولة بدون صيغة 
سوبر بحث: معايير متعددة VLookup    VLookup ذات القيمة المتعددة  |   VLookup عبر أوراق متعددة   |   بحث غامض ....
قائمة منسدلة متقدمة: إنشاء القائمة المنسدلة بسرعة   |  القائمة المنسدلة التابعة   |  قائمة منسدلة متعددة التحديد ....
مدير العمود: إضافة عدد محدد من الأعمدة  |  نقل الأعمدة  |  تبديل حالة رؤية الأعمدة المخفية  |  مقارنة النطاقات والأعمدة 
الميزات المميزة: التركيز على الشبكة   |  عرض تصميم   |   شريط الفورمولا الكبير    مدير المصنفات والأوراق   |  مكتبة الموارد (النص السيارات)   |  منتقي التاريخ   |  اجمع أوراق العمل   |  تشفير/فك تشفير الخلايا    إرسال رسائل البريد الإلكتروني عن طريق القائمة   |  سوبر تصفية   |   مرشح خاص (تصفية غامق / مائل / يتوسطه خط ...) ...
أفضل 15 مجموعة أدوات12 نص الأدوات (إضافة نص, إزالة الأحرف، ...)   |   +50 رسم الأنواع (مخطط جانت، ...)   |   40+ عملي الصيغ (احسب العمر على أساس تاريخ الميلاد، ...)   |   19 إدخال الأدوات (أدخل رمز الاستجابة السريعة, إدراج صورة من المسار، ...)   |   12 تحويل الأدوات (أرقام إلى كلمات, نتيجة تحويل عملة، ...)   |   7 دمج وتقسيم الأدوات (الجمع بين الصفوف المتقدمة, تقسيم الخلايا، ...)   |   ... و اكثر

عزز مهاراتك في Excel باستخدام Kutools for Excel، واختبر كفاءة لم يسبق لها مثيل. يقدم Kutools for Excel أكثر من 300 ميزة متقدمة لتعزيز الإنتاجية وتوفير الوقت.  انقر هنا للحصول على الميزة التي تحتاجها أكثر...

الوصف


يجلب Office Tab الواجهة المبوبة إلى Office ، ويجعل عملك أسهل بكثير

  • تمكين التحرير والقراءة المبوبة في Word و Excel و PowerPointوالناشر والوصول و Visio والمشروع.
  • فتح وإنشاء مستندات متعددة في علامات تبويب جديدة من نفس النافذة ، بدلاً من النوافذ الجديدة.
  • يزيد من إنتاجيتك بنسبة 50٪ ، ويقلل مئات النقرات بالماوس كل يوم!
Comments (22)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Thank you very much hundred times
This comment was minimized by the moderator on the site
After going absolutely crazy trying to find a solution, this worked - specifically, the macro for pasting INTO visible only cells. Note that I was copying only from unfiltered cells. However, the people complaining that it doesn't do both (which I'm not sure is true) should be quiet because it's pretty easy to copy FROM only visible/filtered cells into an unfiltered area. You don't need a macro for that (and if you're trying to do both, just do the copying of filtered cells in Excel first, then use this macro). Again, what Excel is fully unable to do on its own without a macro is to paste to visible cells only. This macro saved my bum. Thanks!
This comment was minimized by the moderator on the site
Thanks for your recognition.
This comment was minimized by the moderator on the site
This worked perfectly, thanks!
This comment was minimized by the moderator on the site
You can also easily do this without a plugin....
CTRL+C the cells you want to paste
Highlight the filtered/partially hidden range you're pasting to
CTRL+G
Select "Special"
Select "Visible Cells Only" & hit OK
CTRL+V
This comment was minimized by the moderator on the site
Thansk for you reply, but it does not work. With your method, it paste all cells including hidden ones with the copied values.
This comment was minimized by the moderator on the site
VBA method did not work! It copied the invisible cells into the visible cells. Now, I realize that the title doesn't say "How to paste values FROM VISIBLE/FILTERED CELLS to visible/filtered cells only in Excel?" but if my workbook is filtered, it's highly possible that this is what is needed. If this is what you want - copy from one section to another (or to simply paste values from certain cells right back to the same cells, so to remove the fomulas) you first need to copy/paste values to an unfiltered workbook/worksheet. THEN you can use the macro...or at least I hope you can. I didn't save my data and UNDO does not work....
This comment was minimized by the moderator on the site
I am sorry for that.
This comment was minimized by the moderator on the site
So is there any update version for this situation?
This comment was minimized by the moderator on the site
It is even more flexible and functional if the inner loop is constructed with Do While loop.
This comment was minimized by the moderator on the site
This was very helpful. Many thanks.
This comment was minimized by the moderator on the site
i am currently developing a macro. In that i need to do filter for a particular column for Eg: Column D and need to paste some values Eg: Valid in column B. only i need to paste the value for the filtered cells. And also i want to know the coding for multiple filters at a time. EG: filtering in one column and checking the value and again do filter in another column without making false for the previous filter. help me on this.
This comment was minimized by the moderator on the site
This works great up to record 1163 of 23,000 and then it stops. Why would it stop?
This comment was minimized by the moderator on the site
You rock! I've had this issue multiple times in the past but it became a back-breaker for the recent project. And you've helped me to fix it beautifully. THANK YOU!
There are no comments posted here yet
Load More
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations