[Anónimo]

como ter palavras em negrito e outras sem formatação numa mesma célula usando o concatenar?

ex.: na célula tem o seguinte conteúdo:

o “email do utilizador” e “utilizador@xxxx.xx”

então;

=concatenar(f10;” “;g10)

resultado:

utlilizador email

o que pretendia é que a palavra do utilizador ficasse a negrito

É possível?

obrigado

[jorgerod]

talvez através de código, por exemplo:

sub mbold()
dim r1 as range, r2 as range, r3 as range
dim l1 as integer, l2 as integer
on error resume next
set r1 = application.inputbox("clicar na 1ª célula", type:=8)
set r2 = application.inputbox("clicar na 2ª célula", type:=8)
set r3 = application.inputbox("clicar na célula de destino", type:=8)
on error goto 0
if r1 is nothing or r2 is nothing or r3 is nothing then exit sub
r3.value = r1.value & " " & r2.value
l1 = len(r1.value)
l2 = len(r2.value)
r3.characters(start:=l1 + 1, length:=l2).font.bold = true
end sub

[Anónimo]

obrigado pela rapidez na resposta, mas o que pretendo não é bem isso, então o que eu precisava era o seguinte.

eu coloco numa folha1 os tópicos principais tipo:
data:
conta:
valor:
nib:

na folha2, por exemplo ficaria o texto:

=se(portal!c5<"nomes…";concatenar("favor transferir na data ";texto(+portal!c8;"aaaa-mm-dd");", da conta nº. xxxxxxxxx, o montante de € ";texto(portal!c7;"#.##0,00");", ";+portal!c18;" com o nib:xxxxxxxxxxxxxxx, ";+portal!c20;"

a ideia é que a data, o montante e o nib sai-se a negrito automaticamente na função concatenar.

ou então

que copiasse os dados introduzidos com a respectiva formatação, assim colocava os dados a negrito e assim passava para o cancatenar…

agradeço desde já a vossa ajuda.

david

[jorgerod]

da maneira como queres e com a função concatenar, julgo que não é possível, nem tãopouco com alguma udf. a célula, para poder fazer o que pretendes, tem que conter texto, mas mesmo texto, nada vindo de concatenações.

[Autor]

Artigos