Notifications
Clear all

Tabela com Campo de Observações

11 Posts
3 Usuários
0 Reactions
2,117 Visualizações
(@brunoafs)
Posts: 195
Reputable Member
Topic starter
 

Boa tarde,

Tenho uma planilha com várias linhas e várias colunas.

Porém, uma dessas colunas é o campo "Observação" no qual pode ser muito grande.

Como quero que a coluna e linha tenha o mesmo padrão de tamanho gostaria de saber como faço para quando clickar na célula aparecer a observação completa.

Uma possibilidade é inserir comentários.
Mas não queria utilizar essa possibilidade.

 
Postado : 16/10/2014 11:14 am
(@gtsalikis)
Posts: 2373
Noble Member
 

Por que vc simplesmente não lê a observação toda na barra de fórmulas? (Dá pra redimensionar a barra de fórmulas para o tamanho que achar conveniente).

Lembre-se de AGRADECER aos que te ajudaram, e de marcar o tópico como [Resolvido]
Gente que cuida de gente.

Gilmar

 
Postado : 16/10/2014 11:26 am
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Boa tarde!!

Desconsiderando comentários tu já tentou Quebra automatica de texto?

Só serve se for com recursos do excel?

Já tentou algo em VBA?

Att

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 16/10/2014 11:27 am
(@brunoafs)
Posts: 195
Reputable Member
Topic starter
 

Estou formulando uma planilha para análise do Diretor da empresa que sera usada em reuniões.

Então a planilha tem que ser bem elaborada. Além de esteticamente ser usuável.

Não tem como aumentar a barra de fórmulas, pois tem observações extensas demais.
E vai perder a estética da planilha.

alexandrevba, pode ser em VBA.
Mas não tenho muita noção de como fazer.

Teoricamente seria como uma "Validação de Dados" do qual quando selecionamos a celúla aparece uma mensagem de entrada.
Mas no caso seria para visualizar a mensagem dentro da célula por inteiro.

EDIT: No VBA pensei em algo como:

Ao clickar em qualquer célula da coluna "X" ela fosse redimensionada automaticamente e depois voltasse para um tamanho específico.

 
Postado : 16/10/2014 11:35 am
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Boa tarde!!

Se não for por Comentário e não for por Quebra de texto automático e também não poder ajustar manualmente, e não for por VBA, e não me lembro de uma forma como a solicitada, sem usar os recursos citados anteriormente.

Att

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 16/10/2014 11:40 am
(@gtsalikis)
Posts: 2373
Noble Member
 

Insira isso no código planilha:

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
MsgBox ActiveCell.Value2
End Sub

Assim, basta dar um duplo clique na célula que quiser, e vai aparecer uma janela com o texto na íntegra.

Abs

PS: Para inserir o código, clica com o bot~]ao direito na planilha (aquela aba escrito "Plan1" ou outra coisa, se vc renomeou), escolhe "exibir código", e cola o código.

Lembre-se de AGRADECER aos que te ajudaram, e de marcar o tópico como [Resolvido]
Gente que cuida de gente.

Gilmar

 
Postado : 16/10/2014 11:41 am
(@brunoafs)
Posts: 195
Reputable Member
Topic starter
 

Boa tarde!!

Se não for por Comentário e não for por Quebra de texto automático e também não poder ajustar manualmente, e não for por VBA, e não me lembro de uma forma como a solicitada, sem usar os recursos citados anteriormente.

Att

Pode ser VBA sim,

Como falei ali em cima no EDIT.

 
Postado : 16/10/2014 11:51 am
(@brunoafs)
Posts: 195
Reputable Member
Topic starter
 

Insira isso no código planilha:

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
MsgBox ActiveCell.Value2
End Sub

Assim, basta dar um duplo clique na célula que quiser, e vai aparecer uma janela com o texto na íntegra.

Abs

PS: Para inserir o código, clica com o bot~]ao direito na planilha (aquela aba escrito "Plan1" ou outra coisa, se vc renomeou), escolhe "exibir código", e cola o código.

Achei interessante.
Mas teria como especificar por apenas algumas colunas ?

Ai ficaria ideal.

 
Postado : 16/10/2014 11:53 am
(@gtsalikis)
Posts: 2373
Noble Member
 

Se vc disser quais são as colunas, e se elas nunca mudarem, daria. (Na verdade elas podem mudar, mas como vc não conhece VBA, é melhor não complicar).

Lembre-se de AGRADECER aos que te ajudaram, e de marcar o tópico como [Resolvido]
Gente que cuida de gente.

Gilmar

 
Postado : 16/10/2014 12:02 pm
(@brunoafs)
Posts: 195
Reputable Member
Topic starter
 

Se vc disser quais são as colunas, e se elas nunca mudarem, daria. (Na verdade elas podem mudar, mas como vc não conhece VBA, é melhor não complicar).

Tenho conhecimentos básico de VBA.
Não consigo criar do zero alguns códigos.

As colunas seriam K e W que são as que possuem textos longos.

 
Postado : 16/10/2014 12:08 pm
(@gtsalikis)
Posts: 2373
Noble Member
 

Poderia ser assim:

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)

Dim K As Long
Dim W As Long

K = 11
W = 23

If ActiveCell.Column = K Or ActiveCell.Column = W Then MsgBox ActiveCell.Value2
End Sub

Fiz uma forma que te permita alterar a coluna (pelo número dela, já que K é a coluna 11 e W a coluna 23).

Abs

Lembre-se de AGRADECER aos que te ajudaram, e de marcar o tópico como [Resolvido]
Gente que cuida de gente.

Gilmar

 
Postado : 16/10/2014 12:13 pm