Объединение чисел и строк для генерации случайного вывода - PullRequest
1 голос
/ 13 апреля 2011

У меня есть следующий код, который генерирует случайное число от 1 до 36. На самом деле я хотел бы получить случайную строку из имен от btn1 до btn36. Есть ли способ сделать это?

Dim Low As Double
Dim High As Double
Low = 1
High = 36
R = Int((High - Low + 1) * Rnd() + Low)
Sheets("ITEMS DATA").Range("K21").Value = R

1 Ответ

2 голосов
/ 13 апреля 2011

Да.Будет работать простая конкатенация строк.Просто добавьте ваше случайное число к строковому префиксу "btn", например:

Sheets("ITEMS DATA").Range("K21").Value = "btn" & R
...