将文本框添加到Excel工作表

时间:2013-09-12 13:07:29

标签: c# excel

我是stackoverflow的新手,这是我的第一篇文章。 我正在开发一个项目,我选择从Excel工作表中选择数据并将其粘贴到另一个包含模板的Excel中。所选数据存储在中间XML中,该XML存储在单独的excel表中。由于excel单元具有32767个字符的字符限制,因此XML被分成32767个字符的子字符串,然后每个子字符串存储在不同的单元格中。 问题是在阅读时所有字符串都被连接起来以获得完整的xml它被破坏了。所以我认为textbox是存储这个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();
  }

1 个答案:

答案 0 :(得分:1)

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