Hide specific Rows in Sheet1 + hide 5 more in Sheet2

hi,

i need your help please. I have a macro in which i can enter the rows i want to hide.

If i want to hide "position 32" i have to enter the number 8 of the row.
This works fine. But now if i want to hide the "position 32" from Sheet1
it also should hide the rows 4-8 from Sheet2 [Data with 32].

Or if i hide "position 34" in Sheet1 [row 10] it also should hide the rows 14-18 in Sheet2.

How is this possible?
Thank you

File is in the attachement
Book1.xlsm

try adding this for all your respective rows.

Range("A" & row1 * 4 - 3 & ": A" & row1 * 4).Select
Selection.EntireRow.Hidden = True

hi Poorcloud.

This doesn't work. Sorry

the select of the Position in Sheet1 is already working fine.

But i need a solution for the Sheet2. if i choose 32 on Sheet1 it also should hide all rows with 32.* in Sheet2

Hi Patel45,

But so i need two button ?
I will only press one button and select the position "32" and position "34" for example in Sheet1.
The macro should automatic search Sheet2 for all position "32" data [32.1,32.2,....] and "34" data [34.1,....].
These rows should be hide automatic.

Is this possible?

sometimes there is a name instead of the number [ "test" (Sheet1) and "test.1" (Sheet2) instead of "32" (Sheet1) and "32.1" (Sheet2)for example]

Do you know what i mean?

Hy Patel,

but i allready have the Code for the Sheet1 in the file?
With the inputbox. This is really fine and the way how it should work.
But if I Enter for example row 5 [Sheet1] it also should hide the Rows in Sheet2 with the same numerber.

Sheet1 = 32
Sheet2 = 31.1, 32.2, ......

Do you konow what i mean?

Thank you for your help

My goal is to Select specific rows via InputBox.
This code is in the file and working fine. But it Only works in Sheet1.

I enter row number "33" and row 9 is hide.
For Example in row 9 is some data with the name "33".

But if i don't need the information from position "33", i also dont need the additional information from position "33" on Sheet2.
In Sheet2 are more information about position "33" from Sheet1. For example "33.1", "33.2", .... And thezy should also hide when i
hide "33" from Sheet1.

You know what i mean?

@Patel: do you need more Information?

or any other one a solution for me?

ok, my mistake.

of course i will enter the value an than hide the row in which the value is.
This is ok. But if i Start your Macro it will Stop after enter the number. It hide the row (with the number i select) but it dont hide the number+.1, number+.2 in Sheet2.

Now it is clear?

Hi Patel,

i have changed your code a little bit. Now it works like i need it.
But there is one mistake in the code. If i don't enter a position in TextBox1 for example all rows hide.

Do anyone have an answer why?

Thank you

HideRowSheet1Sheet2.xlsm

Thank you

Everything works fine

since your last change it doesn't work anymore