0

我是stackoverflow的新手,这是我的第一篇文章。我正在做一个项目,我选择从 Excel 工作表中选择数据并将其粘贴到另一个包含模板的 Excel 中。选择的数据存储在一个中间 XML 中,该中间 XML 存储在单独的 Excel 表中。由于 excel 单元格有 32767 个字符的字符限制,因此 XML 被拆分为 32767 个字符的子字符串,然后每个子字符串存储在不同的单元格中。问题是在阅读所有字符串以获取完整的 xml 时,它正在被损坏。所以我想用文本框代替存储这个xml。因为文本框有相当大的字符限制。所以我想在 Excel 工作表中添加一个文本框控件。我正在使用 C#。这个怎么做?提前致谢。

这是正在使用的现有代码。

  private XmlDocument GetXml()
  {
      Excel.Workbook WB = Globals.ThisAddIn.Application.ActiveWorkbook;
      Excel.Worksheet ws = null;
      XmlDocument xmlDoc = new XmlDocument();
      string strXml = string.Empty;
      int XmlColumn = 1;
      try
      {
          ws = WB.Sheets["XML"];
          while (ws.Cells[XmlColumn, 1].Value != null)
          {
              strXml = strXml + ws.Cells[XmlColumn, 1].Value.ToString();
              XmlColumn++;
          }
          if (strXml != "")
              xmlDoc.LoadXml(strXml);
          else
          {
              XmlNode RootNode = xmlDoc.CreateElement("R");
              XmlNode TaggingXmlDocNode = xmlDoc.CreateXmlDeclaration("1.0", "UTF-8", null);
              xmlDoc.AppendChild(TaggingXmlDocNode);

              XmlNode RawExcel = xmlDoc.CreateElement("RawExcel");
              RawExcel.InnerText = Globals.ThisAddIn.Application.ActiveWorkbook.Name;
              RootNode.AppendChild(RawExcel);
              xmlDoc.AppendChild(RootNode);

              ws.Cells[1, 1] = xmlDoc.OuterXml;
          }

      }
      catch
      {
          xmlDoc = null;
      }
      return xmlDoc;
  }

  private void SaveXml(XmlDocument xmlDoc)
  {
      Excel.Workbook WB = Globals.ThisAddIn.Application.ActiveWorkbook;
      Excel.Worksheet ws = null;
      string strXml = string.Empty;
      if (xmlDoc != null)
      {
          strXml = xmlDoc.OuterXml;
          ws = WB.Sheets["XML"];
          int XmlColumn = 1;
          string Temp = strXml;
          for (int Len = 0; Len < strXml.Length; Len = Len + 32700, XmlColumn++)
          {
              if (Temp.Length >= 32700)
              {
                  string s = Temp.Substring(0, 32699);
                  ws.Cells[XmlColumn, 1] = s.Substring(0, s.LastIndexOf('>') + 1);
                  int EndPoint = s.LastIndexOf('>');
                  Temp = Temp.Substring(EndPoint + 1);
              }
              else
              {
                  ws.Cells[XmlColumn, 1] = Temp;
              }
          }
      }
      else
      {
          xmlDoc = new XmlDocument();
          XmlNode RootNode = xmlDoc.CreateElement("R");
          XmlNode TaggingXmlDocNode = xmlDoc.CreateXmlDeclaration("1.0", "UTF-8", null);
          xmlDoc.AppendChild(TaggingXmlDocNode);

          XmlNode RawExcel = xmlDoc.CreateElement("RawExcel");
          RawExcel.InnerText = Globals.ThisAddIn.Application.ActiveWorkbook.Name;
          RootNode.AppendChild(RawExcel);
          xmlDoc.AppendChild(RootNode);

          ws = (Excel.Worksheet)WB.Sheets.Add(After: WB.Sheets[WB.Sheets.Count]);
          ws.Name = "XML";
          ws.Cells[1, 1] = xmlDoc.OuterXml;
          //ws.Visible = Excel.XlSheetVisibility.xlSheetVeryHidden;              
      }
      WB.Save();
  }
4

1 回答 1

1

我尝试在工作表中添加一个文本框并将数据写入其中。但这无济于事,因为 excel 工作表上的文本框有 32767 个字符的字符限制,类似于 excel 单元格的字符限制。

于 2013-09-13T09:24:06.247 回答