Excel VBA, как сцепить

Question

мне нужно сцепить в уже существующий код в VBA, так что выход его

«Ранг», «-», то данные, что эта формула находит

Вот оригинал кода, он находит данные и помещает таблицу данных в un-concatenated.

For innerLoop = 0 To addRowOffset - 1 
     Range("F" & maxRows + 1 - innerLoop).Value = _ 
     Sheets("Template").Range("B" & (6 + periodP * 2 + periodQ * 3 + innerLoop)).Value 
Next innerLoop 

Это моя неудачная попытка попытаться связать ее.

For innerLoop = 0 To addRowOffset - 1 
     Range("F" & maxRows + 1 - innerLoop).Value = _ 
     Concatenate("Rank", "-", Sheets("Template").Range("B" & (6 + periodP * 2 + periodQ * 3 + innerLoop)).Value) 
Next innerLoop 

Любая помощь будет очень признательна.

Answer 1

Вы можете использовать &, чтобы объединиться. И так как у вас есть две жестко закодированные строки подряд, их можно объединить в одну.

For innerLoop = 0 To addRowOffset - 1 
     Range("F" & maxRows + 1 - innerLoop).Value = _ 
     "Rank-" & Sheets("Template").Range("B" & (6 + periodP * 2 + periodQ * 3 + innerLoop)).Value 
Next innerLoop