Скопируйте диапазон ячеек с определенными критериями. Вставьте правильные критерии как транспонированные

Question

Я работаю над проектом, где в столбце G есть оператор If:

=IF(AND(E2>0,E2<6),COUNTIF($E$2:$E$58,E2),"")

Я хочу иметь возможность использовать макрос, который будет циклически проходить через диапазон и копировать все значения с подсчетом в них. Однако я не хочу копировать столбец E, мне нужна информация из столбца A, которая соответствует количеству столбца E. Столбец А - это местоположение бункера. После этого я хотел бы иметь возможность перенести эти значения в B72.

Вот что я думаю логически, но я не слишком силен в VBA и мне нужна помощь.

If range.cell(Column E) <> " " then

'grab that cell and go over to column A value and copy. Next cell

'Store all the values(Column A) and transpose starting at B72

Answer 1

Просто чтобы уточнить, прежде чем я продолжу в своем ответе, вы в основном пытаетесь скопировать и транспонировать (вставить значения) в другое место в макросе? Если да, то каков классификатор из столбца E, который означает, что вы должны искать столбец A?

Я также работаю с Dinjo над этим проектом. Вот его примеры.