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