colores en excel

Article View: chile.comp.programacion

Article #2501

Back to chile.comp.programacion Previous Next

#2501

From: g A b R i E L
Date: Tue, 29 Nov 2005 03:33

24 lines
1755 bytes

Estimad@s

Programando con VBA para excel, conozco la funcion RGB, pero no 
encuentro un equivalente para obtener el RGB de un "color excel", en 
otras palabras, en excel el color rojo es "3", en RGB es (255, 0, 0), 
pero no se obtener el RGG de cualqiuer otro color con que me encuentre 
en excel.

Por ejemplo: intColor = ActiveSheet.Range('A1').Font.Color

Instancia el valor 3 la variable intColor, si excel esta con la paleta 
de colores predefinida, y la celda 'A1' tiene color de fuente 
establecido en Rojo.

?Alguien conoce alguna funcion, truco y/o forma de obtener el color RGB 
conociendo el valor de color excel, por ejemplo de la fuente de una celda.

(Por ahi, en la ayuda encontre la funcion QBColor, pero arroja error, no 
funciona!)

Gracias

-- 
:: g A b R i E L ::

Technical Details

Message-ID: <438BCC16.8090208@nspam.org>

Path: arc1-ca.pugleaf.net!g2news1.google.com!news3.google.com!news.glorb.com!news.kjsl.com!news.nivel5.cl!not-for-mail

Show Full Headers

Complete Article Headers

X-Google-Thread: 1593cb,a7b26ec6d678c323,start
X-Google-Attributes: gid1593cb,public
X-Google-Language: SPANISH,ASCII-7-bit
Path: arc1-ca.pugleaf.net!g2news1.google.com!news3.google.com!news.glorb.com!news.kjsl.com!news.nivel5.cl!not-for-mail
From: :: g A b R i E L :: <nospam@nspam.org>
Newsgroups: chile.comp.programacion
Subject: colores en excel
Date: Mon, 28 Nov 2005 23:33:42 -0400
Organization: Varios
Lines: 25
Message-ID: <438BCC16.8090208@nspam.org>
NNTP-Posting-Host: pc-200-73-251-229.pvaldivia3.pc.metropolis-inter.com
Mime-Version: 1.0
Content-Type: text/plain; charset=us-ascii; format=flowed
Content-Transfer-Encoding: 7bit
X-Trace: news.nivel5.cl 1133231597 21875 200.73.251.229 (29 Nov 2005 02:33:17 GMT)
X-Complaints-To: news@news.nivel5.cl
NNTP-Posting-Date: Tue, 29 Nov 2005 02:33:17 +0000 (UTC)
User-Agent: Mozilla/5.0 (Windows; U; Windows NT 5.1; es-ES; rv:1.0.1) Gecko/20020823 Netscape/7.0
X-Accept-Language: es-es, es