VBA cykly, inkrementace u písmen

Zdravím,

mám cyklus třeba

dim pismeno as string
pismeno = "A"
for pomocna = 0 to 50
pismeno = pismeno + 1
next pomocna

a já bych potřeboval, aby se při každé smyčce cyklu hodnota v proměnné pismeno zvedla o jedno, resp přeskočila na další písmeno. Vím, že v Céčku s tim celkem problém nebyl (via la ascii), ale tady jsem na to nějak nemohl přijít...
Jestli by někoho napadlo nějaké spásné řešení - to co jsem vymyslel já je sešito horkou jehlou a nedejbože jestli budu někdy muset v tom zdrojáku něco měnit

S přáním příjemného úterý,
LP