Ugrás a tartalomra

Hogyan illesszen be értékeket csak látható / szűrt cellákba csak az Excel programban?

Az Excelben, ha adatokat szűrt vagy elrejtett néhány cellát, és amikor értékeket illeszt be a szűrt vagy rejtett tartományba, a rejtett cellák is kitöltődnek beillesztett értékekkel. Itt elmondok néhány trükköt, hogy az értékeket csak az Excelbe illessze be a látható cellákba.

Az értékeket beillesztheti a látható cellákba a VBA segítségével

Illessze be az értékeket a látható cellákba a Paste to Visible Range of Kutools for Excel segítségével jó ötlet3


Az értékeket beillesztheti a látható cellákba a VBA segítségével

Az Excelben a VBA-n kívül nincs más megoldás a probléma megoldására.

1. nyomja meg Alt + F11 gombok egyszerre, és a Microsoft Visual Basic for Applications az ablak felpattan.

2. kettyenés betétlap > Modulok, majd illessze be a VBA kód alá a felbukkanó Modul ablakba.

VBA: Az értékeket csak a látható cellákba illessze be.

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. kettyenés F5 vagy a futás gombra, akkor megjelenik egy párbeszédpanel, ahol kiválaszthatja a másolandó értékeket. Lásd a képernyőképet:
doc-paste-to-látható-cell-1

4. Az értékek kiválasztása után kattintson a gombra OK, majd egy újabb párbeszédpanel jelenik meg, hogy kiválasszon egy tartományt a kiválasztott adatok beillesztéséhez. Lásd a képernyőképet:
doc-paste-to-látható-cell-2

5. kettyenés OK. Láthatja, hogy csak a látható cellák vannak beillesztve a kiválasztott értékekkel.


Illessze be az értékeket a látható cellákba a Paste to Visible Range of Kutools for Excel segítségével

Tulajdonképpen, ha használja Beillesztés a látható tartományba hasznossága Kutools az Excel számára - praktikus Excel eszköz, gyorsan és egyszerűen megoldhatja az értékek látható tartományba történő beillesztésének problémáját.
doc beillesztheti a látható cellát 6

Kutools az Excel számára, Több mint 300 a praktikus funkciók megkönnyítik a munkáját. 

Telepítése után Kutools for Excel, kérjük, tegye a következőket:(Töltse le ingyen a Kutools for Excel programot most!)

1. Válassza ki a másolni és beilleszteni kívánt értéktartományt, majd kattintson a gombra Kutools > Választék > Beillesztés a látható tartományba > Minden termék or Csak az értékek beillesztése. Lásd a képernyőképet:
doc beillesztheti a látható cellát 7

2. Ezután a Beillesztés a látható tartományba megjelenik a párbeszédpanel, és válassza ki az értékeket beilleszteni kívánt tartományt. Lásd a képernyőképet:
doc beillesztheti a látható cellát 8

3. kettyenés OK. A kiválasztott értékek csak a látható tartományba vannak beillesztve.

Csak az értékeket illessze be a látható cellákba Illessze be az összeset látható cellákba
doc beillesztheti a látható cellát 9 doc beillesztheti a látható cellát 10


Jegyzet:
Ez a segédprogram rejtett és szűrt sorokon vagy oszlopokon egyaránt működik

Kattintson ide a Paste to Visible Range segédprogramról.

  Beillesztés csak látható cellákba

A legjobb irodai hatékonyságnövelő eszközök

Népszerű szolgáltatások: Ismétlődések keresése, kiemelése vagy azonosítása   |  Üres sorok törlése   |  Oszlopok vagy cellák kombinálása adatvesztés nélkül   |   Kerek Formula nélkül ...
Szuper keresés: Több kritérium VLookup    Többértékű VLookup  |   VLookup több munkalapon   |   Fuzzy Lookup ....
Speciális legördülő lista: Gyors legördülő lista létrehozása   |  Függő legördülő lista   |  Többszörösen válassza ki a legördülő listát ....
Oszlopkezelő: Adjon meg egy adott számú oszlopot  |  Oszlopok mozgatása  |  Kapcsolja be a Rejtett oszlopok láthatósági állapotát  |  Tartományok és oszlopok összehasonlítása ...
Kiemelt funkciók: Rács fókusz   |  Design nézet   |   Nagy Formula bár    Munkafüzet és lapkezelő   |  Erőforrás-könyvtár (Auto szöveg)   |  Dátumválasztó   |  Kombinálja a munkalapokat   |  Cellák titkosítása/dekódolása    E-mailek küldése listánként   |  Szuper szűrő   |   Speciális szűrő (félkövér/dőlt/áthúzott szűrés...) ...
A 15 legjobb eszközkészlet12 szöveg Eszközök (Szöveg hozzáadása, Karakterek eltávolítása,...)   |   50 + Táblázatos Típusai (Gantt-diagram,...)   |   40+ Praktikus képletek (Számolja ki az életkort a születésnap alapján,...)   |   19 beszúrás Eszközök (Helyezze be a QR-kódot, Kép beszúrása az útvonalból,...)   |   12 Átalakítás Eszközök (Számok szavakig, Valuta átváltás,...)   |   7 Egyesítés és felosztás Eszközök (Haladó kombinált sorok, Hasított sejtek,...)   |   ... és több

Töltsd fel Excel-készségeidet a Kutools for Excel segítségével, és tapasztald meg a még soha nem látott hatékonyságot. A Kutools for Excel több mint 300 speciális funkciót kínál a termelékenység fokozásához és az időmegtakarításhoz.  Kattintson ide, hogy megszerezze a leginkább szükséges funkciót...

kte lap 201905


Az Office lap füles felületet hoz az Office-ba, és sokkal könnyebbé teszi a munkáját

  • Füles szerkesztés és olvasás engedélyezése Wordben, Excelben és PowerPointban, Publisher, Access, Visio és Project.
  • Több dokumentum megnyitása és létrehozása ugyanazon ablak új lapjain, mint új ablakokban.
  • 50% -kal növeli a termelékenységet, és naponta több száz kattintással csökkenti az egér kattintását!
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