Thank you for your explanation. This is very valuable for me. I learnt a lot.
What is meanning of the Sce shortcut in "SceHeaders" variable name?

I read this:
CurrentRegion
"Returns a Range object that represents the current region. The current region is a range bounded by any combination of blank rows and blank columns. Read-only."

With real hospital data which I want to process, every WorkSheet contains two lines of information (A1 and A2), 3rd row is empty. The table starts on row 4 .. Is it possible to skip first three rows?

So far I finished before the Loops, and I will continue to learn the rest later.