macro de cor de celula do Excel?

Eu tenho uma macro que retorna o calue RGB de uma célula, porém quero que consulta a uma célula em outra planilha. como fazer mod isso?
exemplo: se eu queria retornar o valor de Sheet2!A1 se a saída será em sheet1?

na célula que você deseja exibir valores RGB, digite a fórmula

= RGB("A" & ROW())

e copie e cole essas funções em um módulo

Função RGB (CellRef como variante)
RGB = ToHex(Range(CellRef).Interior.Color)
End Function

Função ToHex (ByVal N As Long) As String
strH = ""
Para i = 1 A 6
d = N Mod 16
strH = Chr (48 + (d Mod 9) + 16 (d \ 9)) & strH
N = N \ 16
Seguinte eu
ToHex = strH
End Function

Resposta

Adicione o nome de planilha para os argumentos da função:

Função RGB (SheetName como String, CellRef como variante)

RGB = ToHex(Worksheets(SheetName).Range(cellref).Interior.Color)

End Function

Na planilha, a fórmula muda para

= RGB("Sheet1","A" & ROW())

Inscrever - receber um email se alguém adiciona novas respostas/comentários

Comentários

Xavier na 4 Jun 2023

Olá! Parece que você está tentando usar uma macro para retornar o valor RGB de uma célula em uma planilha diferente. Para fazer isso, você precisará ajustar a macro para que ela consulte a célula na outra planilha. Uma maneira de fazer isso é referenciar diretamente a célula na fórmula da macro. Por exemplo, se você quiser retornar o valor de Sheet2!A1 na Sheet1, você pode tentar algo como =RGB("Sheet2!A1"). Além disso, certifique-se de que as funções RGB e ToHex estejam definidas corretamente no módulo da sua planilha. Espero que isso ajude! Boa sorte!

Responder

O seu comentário

Acho que a resposta não está correta ou que você gostaria de acrescentar mais
alguma informação? Envie o seu comentário abaixo..