.net导出Excel设置颜色font.ColorIndex 各颜色编号

最新推荐文章于 2024-12-19 07:00:46 发布
原创 最新推荐文章于 2024-12-19 07:00:46 发布 · 1w 阅读 · 8 ·
CC 4.0 BY-SA版权
版权声明：本文为博主原创文章，遵循 CC 4.0 BY-SA 版权协议，转载请附上原文出处链接和本声明。
文章标签：

#excel #.net

本文详细列举了各种颜色的编码标准，包括基本颜色如红、绿、蓝等，以及更复杂的色调如橄榄色、天蓝色等。这些编码对于统一颜色使用标准具有重要意义。

无色 = -4142,
   自动 = -4105,
   黑色 = 1,

   白色 = 2

   红色 = 3,
   鲜绿 = 4,  

   蓝色 = 5,

 黄色 = 6,
   粉红 = 7,
   青绿 = 8,

   深红 = 9,
  绿色 = 10,

   深蓝 = 11,
 深黄 = 12,

   紫罗兰 = 13,
   青色 = 14,

  灰色25 = 15,

  褐色 = 53,
   橄榄 = 52,
   深绿 = 51,
   深青 = 49,
   靛蓝 = 55,
   灰色80 = 56,
   橙色 = 46,
     蓝灰 = 47,
   灰色50 = 16,
   浅橙色 = 45,
   酸橙色 = 43,
   海绿 = 50,
   水绿色 = 42,
   浅蓝 = 41,   
   灰色40 = 48,
   金色 = 44,

   天蓝 = 33,
   梅红 = 54,
    玫瑰红 = 38,
   茶色 = 40,
   浅黄 = 36,
   浅绿 = 35,
   浅青绿 = 34,
   淡蓝 = 37,
   淡紫 = 39,

VB.net导出花式Excel
等待着雨水,茁壮成长--李建敏
05-15 4868
第一接触导出Excel表格是在第一次做机房收费系统的时候，能够顺利导出以满足：         现在已经很简单了这个逻辑，其实就是通过代码将Excel表格画出来： '导出整段代码唯一不好理解的便是myExcel.Cell(i,j)这是从第i行第j列开始填充数据 Private Sub btnExport_Click(sender As Object, e As EventAr
Excel中 ColorIndex 属性值和颜色对照表
热门推荐
【孟子E章】
09-21 4万+
 Excel中 ColorIndex 属性值和颜色对照表   资料参考http://msdn.microsoft.com/en-us/library/cc296089.aspxhttp://www.mvps.org/dmcritchie/excel/colors.htm
Excel VBA中ColorIndex值与实际颜色对照表
07-17
用于Excel VBA宏开发中的各种颜色设置.
vba 字体颜色_「Excel VBA」ColorIndex索引值与颜色的对照表生成
weixin_39905500的博客
12-11 1万+
在Excel VBA中，我们经常会用到ColorIndex来设置单元格的背景色或者单元格字体的颜色： ◆Range.Interior.ColorIndex --设置单元格的背景填充色◆Font.ColorIndex --设置单元格的字体颜色ColorIndex索引值与颜色的对照表但如何快速知道ColorIndex的索引值及其所对应的颜色呢。今天涂涂给大家分享下利用VBA代码来生成ColorInde...
VB.NET_Excel.rar_Excel vb.net_VB.NET excel_excel 2007_vb.net e
09-20
10. **自动化Excel工作流**：VB.NET结合Excel Interop库，可以创建复杂的Excel自动化工作流程，如数据导入导出、数据分析、报表生成等，极大地提高了工作效率。 通过"VB.NET_Excel.rar"中的"VB.NET Excel操作过程....
C#学习之用Microsoft.office.interop.excel.dll导出excel
slamzwl的专栏
03-18 5294
在导出excel前，需要做好的准备工作就是添加引用，添加Microsoft.office.interof.excel动态库，然后才能进行接下来的操作。 在这里，我们从最简单的导出操作开始，首先需要认识的是excel动态库中的Application类，自认为这个类主要指的就是excel应用本身，使用excel动态库导出excel时，每次都会伴随着Application类的创建，基于这样的操作，才能
vb.net 将sqlsever数据导入excel
qq_41957460的博客
03-01 682
Imports excel = Microsoft.Office.Interop.Excel Public Class Form1 Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load 'TODO: 这行代码将数据加载到表“FTMESDataSet1.tab1”中。您可以根据需要移动或删除它。 Me.Tab1TableAdapter.Fill(Me.FTMESD.
C#中ColorIndex实际颜色对照表
Camio007---（Not Null，Unique）
10-04 3583
         前一段时间用C#做一个数据的导入模块，需要将有错误的Excel模板单元格给加上颜色，为了找个比较合适的颜色，在挑颜色的时候挑了半天，后来索性用程序将各个索引值的颜色生成到一个Excel中去，作为参考，现在贴出来，希望能够对大家有一点点用处！
C#导出EXCEL合并 字体颜色居中
08-25
导出EXCEL合并问题。EXCEL样式设置等
IndexedColor颜色对照表
sinat_38560284的博客
09-01 4378
【VBA】ColorIndex参照表
weixin_43957681的博客
01-17 1959
在VBA编程中，当使用 ColorIndex 设置单元格或范围的颜色时，不知道各个ColorIndex对应的颜色时，可根据这个表格进行参照，找到想要的颜色。
.net中字体颜色事件
angrykun的专栏
10-21 772
在设置字体和颜色时，分别使用FontDialog和ColorDialog类对他们进行封装。显示对话框只要调用类的ShowDialog()方法。下面是在文本框中的右击事件: private void 字体ToolStripMenuItem_Click_1(object sender, EventArgs e) { FontDialog font1 = new
设值Execl单元格颜色，以及字体颜色
bluelilyabc的专栏
12-22 821
VBA设值单元格颜色和字体颜色
ExcelVBA编程输出ColorIndex对照色谱、RGB、16进制
fsyuheduo的博客
12-19 1381
==标题==ExcelVBA编程输出ColorIndex对照色谱、RGB、16进制==正文==解决问题ExcelVBA编程输出ColorIndex对照色谱新增：RGB（R,G，B)、16进制#解决思路#1.先确定要输出的形式，标题行，标题为Array("Color Index", "Name", "Color", "R", "G", "B", "16进制")如果标题增加，数据输出自动增加#2.Co...
PowerShell枚举Excel中Font.ColorIndex的值
fdc2017的博客
12-21 520
先New一个Excel对象 $excel=New-Object -ComObject excel.application excel默认添加工作表为3，将它调整为1 $excel.SheetsInNewWorkbook=1 添加工作薄 $workbook=$excel.Workbooks.Add() 将A1与H1单元格合并，将这一行当作标题行 $excel.Range('a1:h1').merge() 准备枚举56个值 $items=1..56 将字体颜色改为需要的...
C#：Excel美化(字体颜色/单元格边框&颜色/单元格合并)
m0_57164983的博客
01-19 1980
2. 单元格边框设置（针对Cells）3. 单元格填充颜色（针对Range）5. 单元格合并（针对Range）1. 字体设置（针对Range）4. 字体颜色（针对Cells）
显示这行代码报错：.Hyperlinks.Parent.Font.ColorIndex = xlAutomatic
最新发布
08-28
<think>嗯，用户提到代码中的`.Hyperlinks.Parent.Font.ColorIndex = xlAutomatic`这一行报错。我需要先理解这个问题的原因。首先，用户在使用VBA处理Excel中的超链接，想要在返回Sheet1时高亮最后点击的超链接。代码中的这一行应该是用来重置所有超链接的字体颜色，但出现了错误。 首先，我应该检查`.Hyperlinks.Parent`的用法是否正确。在Excel VBA中，`Hyperlinks`集合的`Parent`属性返回的是工作表对象，也就是`Worksheet`。所以，`.Hyperlinks.Parent.Font.ColorIndex`实际上是在尝试访问工作表的字体属性，而工作表本身并没有`Font`属性，这会导致运行时错误“438”对象不支持该属性或方法。 接下来，用户的需求是重置所有超链接的字体颜色，而不是整个工作表的字体。正确的做法应该是遍历每个超链接，单独设置其字体颜色。原来的代码试图一次性设置所有超链接的父对象（即工作表）的字体，这是错误的，因为工作表没有字体属性，而超链接所在的单元格才有字体属性。 因此，解决方案应该是将`.Hyperlinks.Parent.Font.ColorIndex = xlAutomatic`替换为遍历每个超链接并重置其显示格式。例如，使用循环遍历`Hyperlinks`集合，然后对每个超链接的`Range`属性（即超链接所在的单元格）设置字体颜色和加粗属性为默认值。 另外，用户可能对VBA的对象模型不太熟悉，特别是`Hyperlinks`集合和其父对象的关系。需要解释清楚为什么原来的代码会报错，以及如何正确访问单元格的格式属性。同时，用户可能希望代码简洁高效，所以提供一个修改后的代码示例，并说明改动的原因，这样用户更容易理解和应用。 此外，用户可能在调试过程中遇到了其他问题，比如事件未正确触发，或者存储位置的单元格被占用。需要确保用户将代码放在正确的位置（Sheet1和ThisWorkbook模块），并且存储位置（如Z1单元格）没有被其他数据使用。如果用户仍然遇到问题，可能需要进一步检查代码的其他部分，或者提供更多的错误信息以便进一步排查。 最后，用户可能还想知道如何扩展功能，比如修改高亮颜色、记录点击时间等，但当前首要任务是解决报错问题。确保提供的解决方案直接针对错误行，并解释清楚修改后的代码如何工作，这样用户能够顺利实现需求。</think>出现该错误的原因是`.Hyperlinks.Parent`返回的是工作表对象，而工作表本身没有`Font`属性。应改为遍历超链接并单独设置格式。以下是修复后的代码： ```vba ' 在Sheet1的代码模块中 Private Sub Worksheet_FollowHyperlink(ByVal Target As Hyperlink) Me.Range("Z1").Value = Target.Range.Address ' 重置所有超链接格式 Dim h As Hyperlink For Each h In Me.Hyperlinks h.Range.Font.ColorIndex = xlAutomatic h.Range.Font.Bold = False Next ' 高亮当前超链接 Target.Range.Font.Color = RGB(255, 0, 0) Target.Range.Font.Bold = True End Sub ' 在ThisWorkbook的代码模块中 Private Sub Workbook_SheetActivate(ByVal Sh As Object) If Sh.Name = "Sheet1" Then With Sheets("Sheet1") Dim lastClick As Range If Not IsEmpty(.Range("Z1").Value) Then On Error Resume Next Set lastClick = .Range(.Range("Z1").Value) If Not lastClick Is Nothing Then ' 清除所有超链接格式 Dim h As Hyperlink For Each h In .Hyperlinks h.Range.Font.ColorIndex = xlAutomatic h.Range.Font.Bold = False Next ' 重新高亮目标 lastClick.Font.Color = RGB(255, 0, 0) lastClick.Font.Bold = True End If .Range("Z1").ClearContents End If End With End If End Sub ```
评论 2
成就一亿技术人!
拼手气红包6.0元
还能输入1000个字符
 
红包 添加红包
表情包 插入表情
表情包 代码片
 条评论被折叠 查看
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。

余额充值