Lilia
-
Posts
6 -
Cadastrado em
-
Última visita
Tipo de conteúdo
Artigos
Selos
Fabricantes
Livros
Cursos
Análises
Fórum
posts postados por Lilia
-
-
Não. Vou ver agora, tinha perdido o acesso total ao meu post. Muito Obrigada pela atenção!
-
Osvaldo,
É verdade, porém não há má fé na ação. Eu sou membro recente e perdi o acesso a esta postagem antiga. Inclusive enviei e-mail para o Clube do Hardware pedindo orientações e não obtive resposta.
Pode me orientar como procedo para excluir este post antigo e deixar somente o recente e conseguir o apoio de que tanto necessito?
Muito Obrigada!
Lilia
-
Pessoal,
Estou montando um diagnóstico e preciso que o usuário da planilha consiga escolher entre 4 opções de resposta. Tenho uma planilha base que é meu modelo (GI Serviços old.xls), mas não estou conseguindo interpretá-la.
Em síntese preciso criar um botão que selecionado mude de cor e jogue um valor pré-definido em outra célula da planilha.
O que não estou conseguindo entender na planilha modelo (GI Serviços old.xls), é se foi usada botão ou importada uma imagem e atribuída uma macro ou um código. E como atribuo este código a este botão.
O código é:
Rem Item 1
Private Sub CommandButton1_Click()
Sheets("Bloco II").Range("N15") = 5
CommandButton3.BackColor = RGB(23, 55, 93)
CommandButton2.BackColor = RGB(23, 55, 93)
CommandButton1.BackColor = RGB(95, 95, 95)
End SubPrivate Sub CommandButton2_Click()
Sheets("Bloco II").Range("N15") = 3
CommandButton3.BackColor = RGB(23, 55, 93)
CommandButton2.BackColor = RGB(95, 95, 95)
CommandButton1.BackColor = RGB(23, 55, 93)
End SubPrivate Sub CommandButton3_Click()
Sheets("Bloco II").Range("N15") = 1
CommandButton3.BackColor = RGB(95, 95, 95)
CommandButton2.BackColor = RGB(23, 55, 93)
CommandButton1.BackColor = RGB(23, 55, 93)
End SubA planilha que estou elaborando é a Diagnóstico Empresarial MASTER Soluções Empresariais.
Alguém consegue me ajudar?
Lilia
-
Prezados,
Estou com uma tarefa de difícil resolução. Criei um diagnóstico empresarial onde cada pergunta tem quatro opções de resposta que valem, respectivamente, da melhor resposta para a pior, 5; 3,75; 2,50 e 1,25. Preciso agora da lógica para que a pessoa que preencher este diagnóstico possa marcar apenas uma opção.
Dúvidas:
- Como crio estes botões de seleção da resposta única de cada pergunta, sendo que quero que o botão da opção selecionado fique diferente (mude de cor) para sinalizar a opção escolhida?
- Como faço este botão retornar com o valor numérico que aquela resposta vale?
Para elucidar melhor o que quero, envio anexo a minha planilha Diagnóstico Empresarial Master Sol..... e a planilha "Modelo que quero copiar" de onde tirei a ideia.
Desde já muito obrigada!
-
Prezados,
Tenho a seguinte fórmula =SE(K4=1,25;$J$1*0,25;SE(K4=2,5;$J$1*0,5;$J$1)) e preciso acrescentar mais dois argumentos que são:
K4=3.75;$J$1*0,75
K4=5;$J$1*1
Já tentei várias formas, mas não estou obtendo sucesso. Primeiro o excel informou que estava colocando argumentos demais...ai pesquisei na internet o uso do SE (E, mas mesmo assim não estou conseguindo validar a fórmula. Como devo montá-la?
Muito Obrigada!
Sobre o Clube do Hardware
No ar desde 1996, o Clube do Hardware é uma das maiores, mais antigas e mais respeitadas comunidades sobre tecnologia do Brasil. Leia mais
Direitos autorais
Não permitimos a cópia ou reprodução do conteúdo do nosso site, fórum, newsletters e redes sociais, mesmo citando-se a fonte. Leia mais
Criar botão que quando selecionado muda de cor e retorne com valor numérico pré-estabelecido
em Microsoft Office e similares
Postado
Obrigada @Patropi
@osvaldomp
Vi teu arquivo, fantástico, mas ainda não consigo replicar para as planilhas seguintes.
Se for possível, poderia me passar o passo a passo de como faz para que os botões troquem de cor e enviem o valor correspondente para outra célula.
Quero entender como faz. Como você fez para isto acontecer? Tipo seleciona a coluna C e vai em macro ou em Visual Basic e cola o código
Option Explicit
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim n As Long, k As Double, m As Long
If Target.Column <> 3 Or Target.Interior.ColorIndex = 2 Then Exit Sub
n = Cells(Target.Row, 1).End(xlUp).Row
Select Case Target.Row - n
Case 3: k = 1.25
Case 5: k = 2.5
Case 7: k = 3.75
Case 9: k = 5
End Select
m = [A75:A80].Find(Cells(n, 1)).Row
Cells(m, 4) = k
Set r = Union(Cells(n + 3, 3), Cells(n + 5, 3), Cells(n + 7, 3), Cells(n + 9, 3))
Macro2 r
Macro3 ActiveCell
End Sub
Estou tentando selecionar só as células que devem trocar de cor, já selecionei toda a coluna C e fui lá colar o código e nada acontece...
Como selecionou a segunda cor que aparece nos botões de opções?
Muito Obrigada!