Будет проблема в этой идее,
посмотрите по заведенному порядку определение, котор оно будет:
Sub магазин (var как предмет)
….
Закончите подводную лодку
Но когда вы попытаетесь получить имя var изнутри режима, котор вы не получите посланное переменное имя (MyVariable), вы получите имя перемеююого определенной в rotine: var…