Cabral, além das excelentes dicas do Patropi e do Edson, você pode digitar o sinal de igual em uma célula vazia e em seguida digitar "tam", ...

Ricardo, veja se entendi corretamente. Rode o código a partir da planilha "Registros". Há divergência entre o seu resultado esperado e o res...

Oi Osvaldo... Sim já tentei, mas também da erro. É estranho, deveria funcionar. Lembrando que o gráfico deve estar selecionado ao rodar aquele comand...

Experimentou substituir o ponto e vírgula pela vírgula? ... A1:B1;'Dados ... ... A1:B1,'Dados ...

Sub ArranjaDadosV2() Dim a As Long, k As Long, m As Long, x As Long, rng(), LR As Long, LC As Long LR = ActiveSheet.UsedRange.Find(what...

Experimente substituir estas linhas Dim Linha As Integer Linha = Sheets("LOGIN").Range("A" & Rows.Count).End(xl...

Experimente o código abaixo no seu segundo arquivo. O resultado será colocado a partir da quinta linha vazia abaixo da tabela existente. Sub CadaUsu...

Verdade. Vacilo meu substitua estas linhas Columns(1).Interior.ColorIndex = 4 Rows(1).Interior.ColorIndex = 4 por estas Range...

... eu gostaria que ao clicar em qualquer célula realçasse também as datas e os horários ... Na versão abaixo somente as células onde a FC estiver at...

Veja este simplificado. A diferença de funcionamento para o anterior é que o anterior mantinha pintada a seleção anterior ao selecionar uma célula das...

No post anterior sairam 2 códigos, o segundo está comentado, não use. O que vale é este abaixo. Private Sub Worksheet_SelectionChange(ByVal Target As...

Teste este: Private Sub Worksheet_SelectionChange(ByVal Target As Range) Dim RngRow As Range Dim RngCol As Range Dim...

Veja se melhorou: Private Sub Worksheet_SelectionChange(ByVal Target As Range) Dim RngRow As Range Dim RngCol As Range ...

Experimente: Sub TransferirValores() Workbooks.Open ("C:UsersUserDesktopDados.xlsx") Cells(Rows.Count,...

Gostaria que a formatação das colunas A e B, e a linha 1, fossem manual (sem a interferência desse código)!! substitua estas linhas Set RngRow = Ran...