Помогите, похалуйста, с созданием переменной...

[ahuni14]

Всем привет!

Подскажите, пожалуйста, можно ли как-нибудь реализовать следующий код:

Sub Primer ()
Dim MojPrimer As Single, B As String

MojPrimer=1,25
B="Primer"

MsgBox Moj & A
End Sub

Те в MsgBox объеденив оба выражения в итоге на экране появится слово "MojPrimer", а мне нужно, чтобы в MsgBox каким-то образом при таком расскладе выдавал значение переменной MojPrimeр = 1,25. Т.е. превратить выдаваемое слово "MojPrimer" в переменную с таким же именем.

Реально ли сделать такое?

Заранее всем благодарен за помощь

[ger_kar]

Если честно сути вопроса я нихера не понял.
Объявляются переменные Dim MojPrimer As Single, B As String, далее присвоение тоже идет этим двум переменным
MojPrimer=1,25
B="Primer"
А в MsgBoxиспользуются совершенно другие нигде не объявленные Moj и A

Почему бы не использовать MsgBox "MojPrimer=" & MojPrimer или MsgBox "Moj" & B & MojPrimer.

[ahuni14]

в общем суть вопроса в том, чтобы программа поняла сочетание "Moj & A", как переменную MojPrimer и выдала мне число 1,25. Так, как это предлагаете вы меня не устраивает. Мне нужно получить то, что я попытался описать

[ger_kar]

Мне нужно получить то, что я попытался описать

Это какая то абсолютная бессмыслица.

чтобы программа поняла сочетание "Moj & A"

Что есть сочетание "Moj & A"? Строка или две переменных Moj и A? Тогда почему они не объявляются?
Лучше напиши задачу без всяких переменных и кода, в стиле дано то то и то то, нужно получить такой то результат.

[ahuni14]

прошу прощения, наверное, я ошибся: MsgBox "Moj" & A...Te "Moj" это строка...

[iGrok]

Ну, что хочет ТС я понял - он хочет возможность получить значение переменной по имени переменной, без прямой ссылки.

А вот можно ли это как-то сделать, и как именно - этого я не знаю.

Но в любом случае, не думаю, что в этом есть реальная необходимость. ahuni14, объясни, чего ты хочешь этим добиться. Потому что скорее всего цель у тебя - не просто получение значения переменной по её имени, а что-то большее, и вот это что-то, возможно, можно сделать более разумным способом.

[ahuni14]

iGrok, спасибо, ты все абсолютно правильно понял!

Такая необходимость есть. Попробую объяснить: У меня объявлены 4 переменные по зарплате: LohnImya1, LohnImya2, LohnImya3 i LohnImya4 As Single...Под Imya1-4 подразумеваются реальные имена сотрудников. В конце месяца эти имена сортируются в соответстветствии со своими данными. Мне нужно собрать с помощью цикла (например For) все эти имена (их всего 4) просуммировать все данные по ним (сколько за месяц смен, умножить колличество смен на некий коэффициент и получить зарплату каждого сотрудника итд). Удобно было бы, если бы я в цикле сделал так: "Lohn" & ImyaX и эта комбинация была бы равна переменной LohnImyaX, объявленной, как Single. Просто если имен 4 - все легко, а если имен / сотрудников будет 20, то писать для каждого сотрудника свой фрагмент программы - немного перебор. Хотелось бы создать один универсальных кусок программы для всех имен

[ger_kar]

Ну вообще все вверх ногами.
Если нужно сделать расчет зарплаты на 1... n количество человек, то самое оптимальное сделать класс с полями-свойствами в которые заносится необходимая информация для конкретного субъекта и коллекцию для хранения объектов-экземпляров этого класса. Для расчетов достаточно будет обойти коллекцию и все. Хоть 1 человек, хоть тысяча разницы нет. На крайний случай можно вместо класса использовать структуру и массив, но это уже будет гораздо хуже.