如题所述
使ç¨VBAç¼è¾ä¸æ®µå½æ°ä»£ç ï¼å¤å¶å¨å
¬ç¨æ¨¡åä¸ã
èåå¨excelè¡¨æ ¼çé¢å³å¯ç´æ¥å¼ç¨è¯¥å ¬å¼ã
ALT+F11
æå ¥æ¨¡å
è¾å ¥ä»£ç
åå°excelçé¢ä½¿ç¨å ¬å¼
ä¾å¦ï¼å¦ä¸ä»£ç å°è¿åæå¨åå æ ¼çRGBå¼ãå¯å¨åå æ ¼ä¸ä½¿ç¨=RGB(åå æ ¼å°å)è¿è¡è¯éªã
Function RGB(myRange As Range)Dim r, g, b
r = Int(myRange.Interior.Color / 65025)
g = Int((myRange.Interior.Color Mod 65025) / 255)
b = Int(myRange.Interior.Color Mod 255)
RGB = r & ", " & g & ", " & b
End Function
温馨提示:答案为网友推荐,仅供参考
第1个回答 2014-12-24
excel中的自定义函数,是有VBA代码在模块写的一种function过程
写完后,可以直接在工作表中使用
如:
function zh
zh="OK"
end function
那么在工作表中输入=zh
结果是OK本回答被提问者和网友采纳
写完后,可以直接在工作表中使用
如:
function zh
zh="OK"
end function
那么在工作表中输入=zh
结果是OK本回答被提问者和网友采纳
第2个回答 2014-12-24
和普通函数一样
=自定义函数名(参数1,参数2,.....)
=自定义函数名(参数1,参数2,.....)
第3个回答 2014-12-24
=自定义的函数名