Thanks again buddy,
this version is working perfectly.!

Two questions
1) is it possible to format the tables to clear the gaps after hiding? For example, when a table is half in one page and half in another. Is there any function that I could explore to fix that?

2) instead of typing a word, I want to type a date like 08/05/2017 and if the person type another word instead of a date, it get a message of an error like "Please type a valid date"

I tried to substitute "sText as String" to "sText as Date" and it seems to work. I just need to get the error message working. I'm searching about the MsgBox now.