CasaDoHardware
-
Posts
1.781 -
Cadastrado em
-
Última visita
Tópicos solucionados
-
-
O post de CasaDoHardware em Como criar um macro que fosse capaz de selecionar células não vazias e copiá-la? foi marcado como solução
Experimente este ajuste.
Sub Copiar()
Dim W As Worksheet
Dim WS As Worksheet
Dim lRow As Long
Set W = Sheets("APR-HO")
Set WS = Sheets("PPRA")
'Pula duas linhas a partir da ultima com dados.
lRow = WS.Range("B" & Rows.Count).End(xlUp).Offset(2, 0).Row
'Copia e cola os dados incluindo a formatação.
W.Range("B2:S23").Copy Destination:=WS.Range("B" & lRow)
End Sub
-
O post de CasaDoHardware em Fórmula para Vencimento de uma data foi marcado como solução
Se eu consegui entender
Planilha de Reservas 2019.rar
-
O post de CasaDoHardware em Colar em celulas visíveis apenas foi marcado como solução
O ideal seria que você tivesse postado tb a planilha.
Assim pode-se fazer testes
-
O post de CasaDoHardware em Macro com multi-função copiar, imprimir, salvar em pdf. foi marcado como solução
Se eu entendi isso atende sua necessidade
Sub IMPRESSAO_AUT()
Dim WB As Worksheet
Dim WP As Worksheet
Dim Caminho As String
Dim Nome As String
Dim WBLinha As Long
Set WB = Sheets("BASE")
Set WP = Sheets("PROPOSTA")
WBLinha = 2
Caminho = "Informe aqui o caminho do arquivo"
Nome = WP.Range("X7").Value
Do While WB.Cells(WBLinha, 1).Value <> ""
WP.Range("E7").Value = WB.Cells(WBLinha, 1).Value
WP.PrintOut COPIES:=2
ChDir Caminho
WP.ExportAsFixedFormat Type:=xlTypePDF, Filename:=Caminho & Nome & ".pdf"
WBLinha = WBLinha + 1
Loop
End Sub
-
O post de CasaDoHardware em Gravar textbox como moeda foi marcado como solução
Não encontrei na planilha o codigo que faz a gravação na planilha relatorio.
Entao ve se ajuda!!
PLANILHA IEVG 2.zip
-
O post de CasaDoHardware em ComboBox Encadeado com comboBox e textBox foi marcado como solução
Experimente!!!
Combobox.rar
-
O post de CasaDoHardware em EXCEL - Qual a data mais antiga? foi marcado como solução
Menor (A1:A5;1)
-
O post de CasaDoHardware em Lista Suspensa com dados de duas abas de uma mesma planilha foi marcado como solução
So criando uma uma lista unica.
-
O post de CasaDoHardware em Preenchimento Automático/Condicional de Célula foi marcado como solução
SE(A1<16;X;Y)
Se X e Y forem texto devem estar entre "aspas"
-
O post de CasaDoHardware em Imagem não preenche todo o PDF foi marcado como solução
Poste seu arquivo.
Nao entendi a que bordas você se refere.
-
O post de CasaDoHardware em VBA - Como gravar valor no formato 001/18E foi marcado como solução
Altere o inicio do seu codigo
Sub Contador()
Dim Contador As Long
Contador = Range("Z1").Value + 1 'Altere para uma celula que nao esteja sendo utilizada
Range("z1").Value = Contador
Range("E4").End(xlDown).Offset(1, 0).Select
ActiveCell.Offset(0, -1).Value = Format(Contador, "000") & "/18E"
End Sub
-
O post de CasaDoHardware em Como fazer uma macro salvar o arquivo com o nome correspondente ao de uma célula foi marcado como solução
Seria muito vbom disponibilizar a planilha com alguns dados e explicando o resultado esperado.
-
O post de CasaDoHardware em Formatação condicional com referência de outra coluna foi marcado como solução
Selecione o intervalo da sua lista de cnpj geral
A formula é
Insira a formula abaixo adequando a sua relidade
=CONT.SE(intervalo de cnpj importantes travado com $;primeiro cnpj da sua lista geral sem $)>0
Formate como desejar.
-
O post de CasaDoHardware em Excluir planilhas no excel foi marcado como solução
Troque esta linha!
If WS.Name <> "Matriz" Then ' Matriz é o nome da planilha principal que gera todas as outras.
Por esta!
If WS.Name <> "Matriz" _ And WS.Name <> "Dados" Then
-
O post de CasaDoHardware em Como colocar mais de uma condição no SOMA-SE no VBA foi marcado como solução
Disponibiliza uma parte do arquivo @LhoSanca .
Umas 20,30 linhas é suficiente.
Explique qual o objetivo e mostre o resultado esperado manualmente mesmo.
Pelo pouco de informação que você passou, um somarproduto ou uma tabela dinamica resolve facilmente.
-
O post de CasaDoHardware em como filtrar so os numeros debaixo de um determinado numero de maneir automati ? foi marcado como solução
Ve se pode ser assim:
como filtrar so os numeros debaixo de um determinado numero para a coluna ao lado .zip
-
O post de CasaDoHardware em Excel carregar dados de células em combobox foi marcado como solução
você precisa criar intervalos nomeados no excel e depois aplicar no codigo.
No arquivo que você enviou so tinha a combo veterinarios
Segue o arquivo
Preencher Hemograma V4.5beta.xlsm
-
O post de CasaDoHardware em Rodar macros em segundo plano foi marcado como solução
Insira no codigo
application.screenupdating = false no inicio
application.screenupdating = true no final
Vai impedir o pisca pisca
-
O post de CasaDoHardware em Abrir planilha com mais de 1 milhão de registros foi marcado como solução
Se nenhuma das duas opções funcionam pra você, desculpe mas nao tem solução.
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