Pagtangtang sa mga walay sulod nga mga cell gikan sa usa ka range

Pagporma sa problema

Kami adunay usa ka lainlaing mga cell nga adunay mga datos nga adunay mga walay sulod nga mga cell:

 

Ang tahas mao ang pagtangtang sa mga walay sulod nga mga selula, nagbilin lamang sa mga selula nga adunay impormasyon.

Pamaagi 1. Gahi ug paspas

  1. Pagpili sa orihinal nga range
  2. Pilia ang yawi F5, sunod nga buton Ipasiugda (Espesyal). Sa bintana nga nagbukas, pilia Walay sulod nga mga selula(Blanko) ug i-klik OK.

    Pagtangtang sa mga walay sulod nga mga cell gikan sa usa ka range

    Ang tanan nga walay sulod nga mga selula sa range gipili.

  3. Naghatag kami usa ka mando sa menu aron mapapas ang pinili nga mga selyula: pag-right-click- Pagtangtang sa mga selyula (Pagtangtang sa mga Cell) uban sa pataas nga pagbalhin.

Pamaagi 2: Array Formula

Para mapasayon, hinganlan nato ang atong working range gamit Pangalan sa Tigdumala (Ngalan Manager) tab pormula (Mga pormula) o, sa Excel 2003 ug mas tigulang, ang menu Insert – Ngalan – I-assign (Sal-ot — Ngalan — Define)

 

Ngalan ang range B3:B10 Hawaw, range D3:D10 – Walay Kuwang. Ang mga han-ay kinahanglan nga parehas nga gidak-on, ug mahimong mahimutang bisan asa nga may kalabotan sa usag usa.

Karon pilia ang unang cell sa ikaduhang range (D3) ug isulod kining makahahadlok nga pormula niini:

=IF(ROW() -ROW(NoEmpty)+1>NOTROWS(YesEmpty)-COUNTBLANK(YesEmpty);"";INDIRECT(ADDRESS(LOWEST((IF(Empty<>"",ROW(Empty);ROW())) + ROWS(Adunay Hawt))); LINE()-ROW(Walay Hawa)+1); COLUMN(Adunay Hapty); 4)))

Sa English nga bersyon kini mahimong:

=IF(ROW()-ROW(NoEmpty)+1>ROWS(Empty)-COUNTBLANK(Empty),"",INDIRECT(ADDRESS(GAMAY((K(Walay<>"",ROW(Empty),ROW())) +ROWS(HaveEmpty))),ROW()-ROW(NoEmpty)+1),COLUMN(HaveEmpty),4)))

Dugang pa, kini kinahanglan nga ibutang ingon nga usa ka array formula, ie press human sa pag-paste Pagsulod (sama sa naandan) ug Ctrl + Shift + Enter. Karon ang pormula mahimong kopyahon gamit ang autocomplete (i-drag ang itom nga krus sa ubos nga tuo nga suok sa cell) - ug makuha namon ang orihinal nga range, apan wala’y sulod nga mga cell:

 

Pamaagi 3. Custom function sa VBA

Kung adunay usa ka pagduda nga kanunay nimo kinahanglan nga balikon ang pamaagi sa pagtangtang sa mga walay sulod nga mga selyula gikan sa mga han-ay, nan mas maayo nga idugang ang imong kaugalingon nga function alang sa pagtangtang sa mga walay sulod nga mga selyula sa sumbanan nga gitakda kausa, ug gamiton kini sa tanan nga sunod nga mga kaso.

Aron mahimo kini, ablihi ang Visual Basic Editor (ALT + F11), pagsal-ot og bag-ong walay sulod nga module (menu Isulod – Module) ug kopyaha ang teksto niini nga function didto:

Function NoBlanks(DataRange As Range) Ingon nga Variant() Dim N Sama sa Dugay Dim N2 Ingon sa Long Dim Rng Ingon sa Range Dim MaxCells Ingon Long Dim Resulta() Ingon Variant Dim R Ingon Long Dim C Ingon sa Long MaxCells = Application.WorksheetFunction.Max( _ Application.Caller.Cells.Count, DataRange.Cells.Count) ReDim Resulta(1 To MaxCells, 1 To 1) Para sa Matag Rng Sa DataRange.Cells Kung Rng.Value <> vbNullString Unya N = N + 1 Resulta(N, 1 ) = Rng.Value Katapusan Kon Sunod Rng Para sa N2 = N + 1 Sa MaxCells Resulta(N2, 1) = vbNullString Sunod N2 Kon Application.Caller.Rows.Count = 1 Unya NoBlanks = Application.Transpose(Resulta) Lain NoBlanks = Resulta Katapusan Kung Katapusan ang Function

Ayaw kalimti nga i-save ang file ug ibalhin gikan sa Visual Basic Editor ngadto sa Excel. Aron magamit kini nga function sa among pananglitan:

  1. Pagpili og igo nga hanay sa walay sulod nga mga selula, pananglitan F3:F10.
  2. Pag-adto sa menu Insert – Function (Sal-ot — Function)o i-klik ang buton Isulod ang function (Isuksok ang Function) tab pormula (Mga pormula) sa mas bag-ong mga bersyon sa Excel. Sa kategorya Gipunting nga Gipili sa Gumagamit (Gipasabot sa Gumagamit) pilia ang among function Walay Blanks.
  3. Ipiho ang source range nga adunay voids (B3:B10) isip function argument ug press Ctrl + Shift + Enteraron makasulod sa function isip array formula.

:

  • Pagtangtang sa tanan nga walay sulod nga mga laray sa usa ka lamesa sa usa ka higayon gamit ang usa ka yano nga macro
  • Pagtangtang sa tanang walay sulod nga mga laray sa usa ka worksheet sa makausa gamit ang PLEX add-on
  • Pun-a dayon ang tanang walay sulod nga mga selyula
  • Unsa ang mga macros, kung asa ibutang ang macro code sa VBA

 

Leave sa usa ka Reply