tam olarak istediğinizi anlayamadım ancak anladığım kadarıyla;
döngü dışına bir adet

dim anaid

yazın. döngü içinde de

redim anaid(ak)
anaid(ak)="kategorininidsi"

şeklinde tanım yapın. daha sonra dilediğiniz yerde anaid(1) anaid(2) gibi kullanabilirsiniz.