Pesquisa resultou em 4269 ocorrências

Voltar à pesquisa avançada

Re: Inserir formula Cont.ses no VBA

Não entendi o que realmente espera/almeja. mas para incluir em uma celula uma formula, e necessário utilizar .Formula ou .FormulaLocal Seria algo +/- assim: 'Obter ultimalinha com valores ult_lin = Range("A3").End(xlDown).Row 'encontrar ultima linha da coluna A 'aqui esta segunda variável ...
por Reinaldo
Seg Mar 18, 2019 3:48 pm
 
Fórum: VBA & Macros
Tópico: Inserir formula Cont.ses no VBA
Respostas: 6
Exibições: 13

Re: Inserir Imagem tamanho da célula mesclada  [Resolvido]

Alem da sugestãodo colega Wagner, uma outra possibilidade: A rotina abaixo inclui imagens, conforme a descrição/nome nas colunas "E/I/M" (por exemplo) nas celulas mescladas ao lado Obs.:Neste exemplo as imagens devem estar no mesmo diretório da planilha. Obviamente as imagens nãoestão anex...
por Reinaldo
Qui Mar 14, 2019 11:11 am
 
Fórum: VBA & Macros
Tópico: Inserir Imagem tamanho da célula mesclada
Respostas: 8
Exibições: 54

Re: Alterar nome da planilha vinculada automaticamente em fó

Até onde sei, pode tentar utilizar em conjunto do as Formulas/Funções "Endereço" e "Indireto"; porem essas EXIGEM que a planilha alvo esteja aberta
por Reinaldo
Ter Mar 12, 2019 11:28 am
 
Fórum: Fórmulas & Funções Microsoft Excel
Tópico: Alterar nome da planilha vinculada automaticamente em fórmul
Respostas: 1
Exibições: 32

Re: 160 If precisa de 160 EndIf?  [Resolvido]

Concordo com o colega Wagner, assim o projeto fica complicado e o formulario muito populado, mas.. Segue uma opção sem utilização de if's Private Sub CommandButton5_Click() Dim ctrl As Control Dim x As Integer, y As Integer, z As Integer z = 10 y = 4 For x = 1 To 84 Step 4 If Controls("OptionBu...
por Reinaldo
Sex Mar 08, 2019 4:40 pm
 
Fórum: Formulários
Tópico: 160 If precisa de 160 EndIf?
Respostas: 5
Exibições: 60

Re: Lotofácil Pares x Ímpares  [Resolvido]

Desculpem- me, mas o 4shared encerrou e; provavelmente; deletou os arquivos que havia nessa conta. Assim não tenho mais essas planilhas.
por Reinaldo
Qui Mar 07, 2019 10:56 pm
 
Fórum: Excel - O básico
Tópico: Lotofácil Pares x Ímpares
Respostas: 14
Exibições: 1197

Re: Usar Range em planilha

Creio não haver entendido corretamente o que deseja, mas experimente algo +/- assim Sub Iniciar() For sh = 4 To Sheets.Count Sheets(sh).Select AppActivate "SIC" Espera Mapa = Range("E2") Inicio = Range("J2") Fim = Range("J3") For I = Inicio To Fim Vendedor = A...
por Reinaldo
Qui Mar 07, 2019 10:46 pm
 
Fórum: VBA & Macros
Tópico: Usar Range em planilha
Respostas: 3
Exibições: 44

Re: 160 If precisa de 160 EndIf?  [Resolvido]

Uma maneira de utilizar o If, sem necessidade do end if e utilizar assim: If OptionButton1.Value = True Then Sheets("Avaliação_Representantes").Range("J4").Value = 200 If OptionButton2.Value = True Then Sheets("Avaliação_Representantes").Range("J4").Value = 15...
por Reinaldo
Qui Mar 07, 2019 10:27 pm
 
Fórum: Formulários
Tópico: 160 If precisa de 160 EndIf?
Respostas: 5
Exibições: 60

Re: Slavar em xlsm e pdf não funciona

Aparentemente; como ja falado em outro post; a rotina apresentada não tem nada que justifique as inconsistências apontadas; exceto que o comando "on error..." mascará algum eventual erro sem alertar ao usuario. Pelo se exemplo, cabe alertar: Ao atribuir nome a algum arquivo é preciso levar...
por Reinaldo
Qua Mar 06, 2019 10:38 am
 
Fórum: VBA & Macros
Tópico: Slavar em xlsm e pdf não funciona
Respostas: 2
Exibições: 30

Re: erro ao tentar inicializar uma classe

Cedido está definido como Integer cujo limite e proximo de 36000, e esta tentando atribuir valores muito maiores. Experimente definir Cedico como Long ou Currency
por Reinaldo
Qui Fev 28, 2019 7:50 am
 
Fórum: VBA & Macros
Tópico: erro ao tentar inicializar uma classe
Respostas: 1
Exibições: 106

Re: Salva em xlsm e pdf

Aparentemente nada errado na rotina
por Reinaldo
Qua Fev 27, 2019 10:52 am
 
Fórum: VBA & Macros
Tópico: Salva em xlsm e pdf
Respostas: 2
Exibições: 98
Próximo

Voltar à pesquisa avançada