我在c#中编写了一个应用程序,它将一些数据(字符串)写入excel文档。我需要在一个单元格中写几个字符串。在此之后,我尝试着色这些字符串。在我的示例中,有四个不同的字符串需要在一个单元格中颜色不同。第一个应该是蓝色,第二个应该是绿色,第三个应该是黑色,最后一个应该是红色。当我在示例中尝试它时,总是第一个和最后一个是正确的,但所有其他都是错误的。对于这个项目,我使用的是Windows 7 Professional,Microsoft Excel 2010和Visual Studio 2012 Ultimate。 我该如何修复我的来源?
这是我的来源:
using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Data;
using System.Drawing;
using System.Linq;
using System.Text;
using System.Threading.Tasks;
using System.Windows.Forms;
using System.IO;
using System.Reflection;
using System.Windows;
using System.Runtime.InteropServices;
using Microsoft.Office.Interop.Excel;
namespace WindowsFormsApplication2
{
public partial class Form1 : Form
{
private Microsoft.Office.Interop.Excel.Application excel = null;
private Microsoft.Office.Interop.Excel.Workbook workbook = null;
public Microsoft.Office.Interop.Excel.Worksheet _sheet = null;
public Form1()
{
myMethod();
}
private void myMethod()
{
excel = new Microsoft.Office.Interop.Excel.ApplicationClass();
object missing = Missing.Value;
excel.Workbooks.Add(missing);
workbook = excel.ActiveWorkbook;
workbook.Worksheets.Add(missing, missing, missing);
_sheet =
(Microsoft.Office.Interop.Excel.Worksheet)workbook.Worksheets[1];
_sheet.Name = "Sheet";
string[] part = { "exampleBluee", "exampleGreen", "exampleBlack", "exampleReddd" };
string[] faults = { "f1", "f2", "f3", "f4" };
_sheet.Columns.WrapText = true;
Microsoft.Office.Interop.Excel.Range position = _sheet.get_Range("A1");
position.VerticalAlignment = Microsoft.Office.Interop.Excel.Constants.xlCenter;
for (int i = 0; i < 4; i++)
{
position.Value2 += part[i] + " ";
int fehler = i;
// default color
var myColor = System.Drawing.ColorTranslator.ToOle(System.Drawing.Color.Pink);
if (faults[fehler] == "f1")
{
myColor = System.Drawing.ColorTranslator.ToOle(System.Drawing.Color.RoyalBlue);
}
else if (faults[fehler] == "f2")
{
myColor = System.Drawing.ColorTranslator.ToOle(System.Drawing.Color.Green);
}
else if (faults[fehler] == "f3")
{
myColor = System.Drawing.ColorTranslator.ToOle(System.Drawing.Color.Black);
}
else if (faults[fehler] == "f4")
{
myColor = System.Drawing.ColorTranslator.ToOle(System.Drawing.Color.Red);
}
var nLenTotal = position.Value2.ToString().Length;
int lenTxt = part[i].Length;
// expected colorized text. (multicolor text in one cell)
position.Characters[nLenTotal - lenTxt, lenTxt].Font.Color = myColor;
}
((Microsoft.Office.Interop.Excel.Range)_sheet.Columns[1]).EntireRow.ColumnWidth = 15;
saveExcel();
}
public void saveExcel()
{
string appPath = System.IO.Path.GetDirectoryName(
Assembly.GetEntryAssembly().Location);
string filename = Path.Combine(appPath, "MyDocument.xlsx");
try
{
workbook.SaveAs(filename);
workbook.Close();
}
catch (Exception)
{
workbook.Close();
}
}
}
}
答案 0 :(得分:0)
您的代码可以正确地为每个循环着色正确的文本。但是,当您附加文本的下一部分时,第一种颜色会增长,以消耗插入点之前的所有文本。为了避免这种情况,请将文字添加到着色中。
for (int i = 0; i < 4; i++)
{//Add all the text to the cell
position.Value += part[i] + " ";
}
for (int i = 0; i < 4; i++)
{//Loop through and color the text sections
int fehler = i;
// default color
var myColor = System.Drawing.ColorTranslator.ToOle(System.Drawing.Color.Pink);
/* Code removed for ease of display */
}