Digamos que temos o valor 20 na célula C1 , mas formatamos C1 para exibir 20 pacotes :
Primeiro,coloqueaseguintefunçãodefinidapelousuárioemummódulopadrão:
PublicFunctiontxet(rngAsRange)AsStringtxet=rng.TextEndFunction
EmD1,digite:
=txet(C1)
FunçõesDefinidaspeloUsuário(UDFs)sãomuitofáceisdeinstalareusar:
- ALT-F11exibeajaneladoVBE
- ALT-IALT-Mabreumnovomódulo
- coleomaterialefecheajaneladoVBE
Sevocêsalvarapastadetrabalho,aUDFserásalvacomela.SevocêestiverusandoumaversãodoExcelposteriora2003,deverásalvaroarquivocomo.xlsmemvezde.xlsx
PararemoveroUDF:
- abrirajaneladoVBEcomoacima
- limpeocódigo
- fecheajaneladoVBE
ParausaroUDFdoExcel:
=txet(A1)
Parasabermaissobremacrosemgeral,consulte:
e
e para detalhes sobre UDFs, consulte:
As macros devem estar ativadas para que isso funcione!