Literais de seqüência de caracteres Unicode no VBA
Gostaria de declarar (em um módulo de classe VBA) algumas seqüências privadas constantes que contêm caracteres japoneses. Existe uma maneira de construirString
literais (ou combinando literais de uma maneira) que podem ser aceitos como inicializadores em umConst
declaração? ou seja, algo como:
Private Const MY_CONST = ...
ou
Private Const MY_CONST As String = ...
Eu uso o MS Excel v14.0.6112.5000 (MS Office Professional Plus 2010).
o quenão vai funcionar:
Colar os caracteres japoneses diretamente em uma string literal (por exemplo,... = "変数"
) porque o editor VBA mexerá com os caracteres;UsandoChrW()
ouChrW$()
(por exemplo.... = ChrW$(22793) & ChrW$(25968)
), porque chamadas de função não são permitidas emConst
inicializadores.o queEu não gostaria:
Fingindo oConst
criandoPrivate Property Get
retornando a string, porque a string será recriada toda vez que eu acessar a propriedade (além disso, é confusa e feia ... mas, tudo bem, as duas últimas coisas são uma questão de gosto).