Pesquisa resultou em 4118 ocorrências

Voltar à pesquisa avançada

Re: Ao deletar pula seleção para direita  [Resolvido]

Eu nao tenho código, visto que não utilizo e nem sei seu objetivo; mas para se deslocar para celula ao lada da que pretende efetuar algum evento, e necessário que essa primeira celula seja a celula ativa Poderia ser Algo +/- assim Range("A1").Select If Selection.Value <> "" Then ...
por Reinaldo
Qua Abr 25, 2018 4:29 pm
 
Fórum: VBA & Macros
Tópico: Ao deletar pula seleção para direita
Respostas: 5
Exibições: 14

Re: Ao deletar pula seleção para direita  [Resolvido]

sua segunda linha move a seleção da celula atual, para uma celula na coluna seguinte; assim se quiser ir de A para B, a tem que ser a celula ativa
por Reinaldo
Qua Abr 25, 2018 2:47 pm
 
Fórum: VBA & Macros
Tópico: Ao deletar pula seleção para direita
Respostas: 5
Exibições: 14

Re: Regra com INDIRETO não atualiza referência  [Resolvido]

A função indireto tem a "habilidade" de receber um texto e "transforma-lo" em uma referencia de range e/ou formula; devido a isso os dados dessa string não são atualizados pelo copiar/colar/arrastar do excel. Uma alternativa seria (talvez) utilizar referencia a linha e/ou coluna ...
por Reinaldo
Qua Abr 25, 2018 1:13 pm
 
Fórum: Formatação Condicional
Tópico: Regra com INDIRETO não atualiza referência
Respostas: 2
Exibições: 9

Re: Planilha com vínculos  [Resolvido]

A demora para ler e atualizar os vinculos, seja antes ou depois da planilha carregada; tende a ser a mesma. Para não atualizar na abertura, va em Dados (menu superior); selecione editar links e na janela que se abre clique em "prompt de inicializaçao"; escolha alternativa que deseja. (prov...
por Reinaldo
Qua Abr 25, 2018 1:08 pm
 
Fórum: VBA & Macros
Tópico: Planilha com vínculos
Respostas: 2
Exibições: 18

Re: case

Experimente: Case 31 To 60 Do help Excel Obrigatória se aparecer Case. Lista delimitada de uma ou mais das seguintes formas: expression, expression To expression, Is comparisonoperator expression. A palavra-chave To especifica um intervalo de valores . Se você usar a palavra-chave To, o valor menor ...
por Reinaldo
Ter Abr 24, 2018 4:29 pm
 
Fórum: VBA & Macros
Tópico: case
Respostas: 2
Exibições: 13

Re: Excluir Imagens e Formas agrupadas determinada linha par  [Resolvido]

Uma possibilidade Sub RemoverImg() Dim ws As Worksheet Dim Planilha1 As Worksheet Dim img As Shape With ThisWorkbook For Each ws In .Worksheets If ws.Name <> "Planilha1" Then With ws For Each img In .Shapes If Not Application.Intersect(img.TopLeftCell, .Range("A8:q1000")) Is Noth...
por Reinaldo
Ter Abr 24, 2018 10:05 am
 
Fórum: VBA & Macros
Tópico: Excluir Imagens e Formas agrupadas determinada linha para fi
Respostas: 2
Exibições: 15

Re: Importação de txt, excel insere sinal = e gera erro #NOM  [Resolvido]

Minha opinião e de sempre procurar eliminar erros na fonte. Em TextFileColumnDataTypes tipo 1 corresponde a formatação geral do Excel. O erro ocorre pois o Excel tenta adequar o valor recebido a uma forma/formato existente; assim -... e confundido com uma formula/numero negativo Pode-se experimentar...
por Reinaldo
Qui Abr 19, 2018 7:08 pm
 
Fórum: VBA & Macros
Tópico: Importação de txt, excel insere sinal = e gera erro #NOME?
Respostas: 2
Exibições: 17

Re: CONCATENAR - HORA MAIOR QUE 24

Experimente assim<> =CONCATENAR("Declaro que possuo ";TEXTO(A1;"[H]-MM-SS");" horas disponíveis.")
por Reinaldo
Qua Abr 18, 2018 6:53 pm
 
Fórum: Fórmulas & Funções Microsoft Excel
Tópico: CONCATENAR - HORA MAIOR QUE 24
Respostas: 4
Exibições: 24

Re: EXCEL converte automaticamente ponto em separador decima  [Resolvido]

Talvez assim Sub txt() Dim Ficheiro As String Dim Dpto As String Ficheiro = "C:\Users\" & VBA.Environ$("USERNAME") & "\Desktop\A.txt" Dim rg As Range Set rg = Range("A1") Open Ficheiro For Input As #1 Dim S As String, N As Integer, C As Integer, X As V...
por Reinaldo
Ter Abr 17, 2018 3:25 pm
 
Fórum: VBA & Macros
Tópico: EXCEL converte automaticamente ponto em separador decimal.
Respostas: 1
Exibições: 20

Re: Adaptar macro para importar vários arquivos TXT  [Resolvido]

Algo assim (talvez) Sub Teste_Importa_Le() Dim L As Long, Cont As Long Dim Texto As String 'Caminho Const strPath As String = "C:\teste\" Dim strExtension As String Application.ScreenUpdating = False ChDir strPath L = 2 'Linha inicial 'extensão strExtension = Dir(strPath & "*.txt&...
por Reinaldo
Ter Abr 17, 2018 11:37 am
 
Fórum: VBA & Macros
Tópico: Adaptar macro para importar vários arquivos TXT
Respostas: 2
Exibições: 18
Próximo

Voltar à pesquisa avançada