Boa tarde!! Use uma célula para receber um valor Sub Amarelo() Dim shp1 As Shape Set shp1 = ActiveSheet.Shapes("Rectangle 1") ...

me diga uma coisa, Digo, rs esse metodo serve para qualquer situação em que se queira compartilhar valores de variaveis ?Sim. Vale para todas as sit...

se as células tem numeros: Rows(range("A7").value & ":" & range("A7").value).Hidden = True

schneiderx, tentou dar um Alt + Enter, após o nome do cliente, na tabela utilizada como base para o gráfico ?

*Reabri o tópico para vcs finalizarem adequadamente.

Tente assim: Rows("7:9").Hidden = True ou assim: Range("A7:A9").EntireRow.Hidden = True

Patrick seja bem vindo. Aproveite para ler as regras do forum, vc acabou de quebrar uma: Regras do forum: • Upload Devido a ultrapassagem da marca d...

Bom dia!! Eu espero que esse código lhe dê uma ideia Sub Macro1() ' ' Macro1 Macro ' Dim LastRow As Long LastRow = Range("A1"...

With Range("H1").End(xlDown).Offset(1, 0) .FormulaR1C1 = "=SUM(R2C:R[-1]C)" .Font....

- Selecione A1 - Vá em formatação condicional / Nova Regra - Usar uma fórmula para determinar quais células devem ser formatadas - Em Formatar valores...

vc está usando os recursos nativos do Excel para buscar dados parametrizados, ou seja executar alguma consulta específica numa base mysql... certo? E...

Laennder Alves, obrigado pela ajuda amigo. Marquei o tópico como resolvido, mas depois de testar percebi um detalhe que tinha passado despercebido. A ...

Bom dia, Veja se atende: Sub Gerar() Dim Vetor Dim i As Long Dim a1 As Integer Dim a2 As Integer Dim a3 As Integer Dim a4 As...

Fernando, obrigado pela resposta, rápida e funcional, nas próximas mensagens mandarei os anexos zipados. Esse fórum é um dos melhores se não o melhor ...