VBA для каждого цикла - PullRequest
Новая
       47

VBA для каждого цикла

0 голосов
/ 15 марта 2020

Привет, у меня проблема с каждым элементом в диапазоне. Я хотел бы использовать для каждого l oop и для каждого элемента этой коллекции должно быть выполнено определенное действие, означающее другую подпроцедуру, все работает до первого раза. Для второго элемента жизни макросов l oop не продолжается, что здесь не так. КАК ДОЛЖЕН ЭТО ИЗБЕГАТЬ?

Возможно, есть лучший способ выполнить некоторые задачи для каждого элемента в определенном диапазоне.

В моем случае у меня есть 8 таких диапазонов, каждый из которых состоит из 20 элементов.

ПРИМЕЧАНИЕ если я не звоню Hiding_and_Creating_Dump(Celly) внутри l oop все работает нормально.

ПОЖАЛУЙСТА, СОВЕТУЙТЕ 

For Each Items In ThisWorkbook.Sheets("BU_SELECTOR").Range("A47:H47")

    Debug.Print Items

    Select Case Items.Value
        Case Is = "ASCButton"
            If ASCButton = True Then
                For Each Celly In Workbooks(XLSname).Sheets("lookups").Range(Range_ASC)
                    Debug.Print Celly
                    CommSheetName = Celly.Value
                    Call Hiding_and_Creating_Dump(Celly)
                Next Celly
            End If

        Case Is = "ICOButton"

введите описание изображения здесь

...