how to loop till the drop down list is empty

[Summer7sun]

Hello world!


Please help me out with this
I have a work book which has 2 sheets named "Apple" And "Mango"
Sheet Apple cell A7 = Sheet Mango A1 example =Mango!A1
on Sheet Mango A1 it has a drop downlist and has many items


I have a macro to go to the next item in the list which is named as NextDropList


My code

Sub CallTest()




     Application.ScreenUpdating = False
    


        Sheets("List").Select
        Range("H1").Select
         
        Call Fixit
        Call Format
        Call NewTest


        Call NextDroplist


        Sheets("List").Select
        Range("H1").Select
        
      
    Application.ScreenUpdating = True
   
End Sub

I would like to Loop until the cell value in Mango A1 is blank or empty or has a value as "END of List"

 

[ranman256]

what is it to do?....so the code runs down the lenth of Mango!A1:N..
why? what is it to do at the end?
is it supposed to do something for each record?
is it to get the next item, put is somewhere, then do something?

 

[Summer7sun]

when a new value is in MangoA1 it runs a macro only when apple A7 has a value
call fixit runs code which I dont have permission to edit , so to work around I had to make some other macros... little complicated i know .. .. with the above code I am able to use it without issues and does the job. however I want the macro to loop ... after call fixit , call format and call newtest runs ... call nextdrop list puts a new value from the list .... I want the macro to run until it finds Mango A1 is blank then exit the sub. (I know that if its a range it would be the range list ... but here the list also changes thats the reason its in this dropdown "dropdown list changes") i dont know how to explain in other words... the above code works for me but i simply want it to loop and exit once MangoA1 value is blank.