Exemplo n.º 1
0
 private void Button_Export_Click(object sender, EventArgs e)
 {
     try
     {
         Microsoft.Office.Interop.Excel.Application Exl = new Microsoft.Office.Interop.Excel.Application();
         Microsoft.Office.Interop.Excel.Workbook    wb;
         XlReferenceStyle RefStyle = Exl.ReferenceStyle;
         Exl.Visible = false;
         wb          = Exl.Workbooks.Add(Type.Missing);
         Worksheet ws = wb.Worksheets.get_Item(1) as Worksheet;
         for (int j = 0; j < dataGrid_Glossary.Columns.Count; ++j)
         {
             for (int i = 0; i < dataGrid_Glossary.Rows.Count; ++i)
             {
                 object Val = dataGrid_Glossary.Rows[i].Cells[j].Value;
                 if (Val != null)
                 {
                     (ws.Cells[i + 2, j + 1] as Range).Value2 = Val.ToString();
                 }
             }
         }
         ws.Columns.EntireColumn.AutoFit();
         Exl.ReferenceStyle = RefStyle;
         Exl.Application.ActiveWorkbook.SaveAs("glossary.xlsx", Type.Missing, Type.Missing, Type.Missing, Type.Missing, Type.Missing, Excel.XlSaveAsAccessMode.xlNoChange, Type.Missing, Type.Missing, Type.Missing, Type.Missing, Type.Missing);
         Exl.Quit();
     }
     catch (ExternalException a)
     {
         Debug.WriteLine(a.Message);
     }
 }
Exemplo n.º 2
0
        private void button1_Click(object sender, EventArgs e)
        {
            Microsoft.Office.Interop.Excel.Application Exl = new Microsoft.Office.Interop.Excel.Application();
            Microsoft.Office.Interop.Excel.Workbook    wb;

            XlReferenceStyle RefStyle = Exl.ReferenceStyle;

            Exl.Visible = true;

            String TemplatePath = System.Windows.Forms.Application.StartupPath + @"\os2.xls";

            try
            {
                wb = Exl.Workbooks.Add(TemplatePath); // !!!
            }
            catch (System.Exception ex)
            {
                throw new Exception("Не удалось загрузить шаблон для экспорта " + TemplatePath + "\n" + ex.Message);
            }
            Worksheet ws1  = wb.Worksheets.get_Item(1) as Worksheet;
            string    data = Convert.ToString(DateTime.Today);
            string    naim = Form2.cur;

            (ws1.Cells[7, 1] as Range).Value   = "Межрайонная инспекция  Федеральной налоговой службы №2 по г. Чите ";
            (ws1.Cells[16, 69] as Range).Value = data.Substring(0, 10);
            (ws1.Cells[16, 57] as Range).Value = nomerBox.Text;
            (ws1.Cells[24, 58] as Range).Value = invn;
            (ws1.Cells[24, 70] as Range).Value = 1;
            (ws1.Cells[24, 1] as Range).Value  = 1;
            (ws1.Cells[24, 80] as Range).Value = deviceTableAdapter.GetStoim(invn);
            (ws1.Cells[24, 90] as Range).Value = deviceTableAdapter.GetStoim(invn);
            (ws1.Cells[24, 48] as Range).Value = deviceTableAdapter.GetIzgot(invn);
            (ws1.Cells[24, 5] as Range).Value  = naim;
            (ws1.Cells[9, 7] as Range).Value   = Form2.otd;
            (ws1.Cells[11, 9] as Range).Value  = label1.Text;

            Exl.ReferenceStyle = RefStyle;
        }
Exemplo n.º 3
0
 public string get_AddressLocal(object RowAbsolute, object ColumnAbsolute, XlReferenceStyle ReferenceStyle, object External, object RelativeTo)
 {
     throw new NotImplementedException();
 }
Exemplo n.º 4
0
 public object ConvertFormula(object Formula, XlReferenceStyle FromReferenceStyle, object ToReferenceStyle,
                              object ToAbsolute,
                              object RelativeTo)
 {
     throw new NotImplementedException();
 }
 public object ConvertFormula(object Formula, XlReferenceStyle FromReferenceStyle, object ToReferenceStyle,
     object ToAbsolute,
     object RelativeTo)
 {
     throw new NotImplementedException();
 }
Exemplo n.º 6
0
        private void оС6ToolStripMenuItem_Click(object sender, EventArgs e)
        {
            Microsoft.Office.Interop.Excel.Application Exl = new Microsoft.Office.Interop.Excel.Application();
            Microsoft.Office.Interop.Excel.Workbook    wb;

            XlReferenceStyle RefStyle = Exl.ReferenceStyle;

            Exl.Visible = true;

            String TemplatePath = System.Windows.Forms.Application.StartupPath + @"\os6.xls";

            try
            {
                wb = Exl.Workbooks.Add(TemplatePath); // !!!
            }
            catch (System.Exception ex)
            {
                throw new Exception("Не удалось загрузить шаблон для экспорта " + TemplatePath + "\n" + ex.Message);
            }
            string    data  = Convert.ToString(DateTime.Today);
            string    data2 = deviceTableAdapter.ScalarQuery1(curint).ToString();
            string    ac    = data2.Substring(0, 10) + " №" + deviceTableAdapter.ScalarQuery(curint).ToString();
            Worksheet ws1   = wb.Worksheets.get_Item(1) as Worksheet;

            (ws1.Cells[5, 2] as Range).Value   = "Межрайонная инспекция  Федеральной налоговой службы России №2 по г. Чите ";
            (ws1.Cells[6, 3] as Range).Value   = "Отдел информационных технологий ";
            (ws1.Cells[23, 1] as Range).Value  = "Паспорт";
            (ws1.Cells[13, 17] as Range).Value = "КРБ 1 101 34 000";
            (ws1.Cells[4, 18] as Range).Value  = data.Substring(0, 10);
            (ws1.Cells[13, 3] as Range).Value  = curint;
            (ws1.Cells[7, 4] as Range).Value   = cur;
            (ws1.Cells[8, 2] as Range).Value   = deviceTableAdapter.GetNazn(curint);
            (ws1.Cells[13, 10] as Range).Value = deviceTableAdapter.GetNomerGr(curint);
            (ws1.Cells[13, 14] as Range).Value = Convert.ToString(deviceTableAdapter.GetSrok(curint)) + " года";
            (ws1.Cells[9, 3] as Range).Value   = dataGridView1.CurrentRow.Cells[1].Value;
            (ws1.Cells[10, 3] as Range).Value  = dataGridView1.CurrentRow.Cells[6].Value;
            (ws1.Cells[11, 4] as Range).Value  = dataGridView1.CurrentRow.Cells[8].Value;
            (ws1.Cells[23, 2] as Range).Value  = dataGridView1.CurrentRow.Cells[4].Value;
            (ws1.Cells[23, 6] as Range).Value  = deviceTableAdapter.GetIzgot(curint);
            (ws1.Cells[23, 10] as Range).Value = deviceTableAdapter.GetStoim(curint);
            (ws1.Cells[23, 8] as Range).Value  = ac;

            Form8 form = new Form8();

            form.Show();
            //form.dataGridView1


            Worksheet ws = wb.Worksheets.get_Item(2) as Worksheet;

            (ws.Cells[8, 1] as Range).Value = deviceTableAdapter.ScalarQuery1(curint).ToString().Substring(0, 10);

            for (int i = 0; i < form.dataGridView1.Rows.Count; ++i)
            {
                object Val = form.dataGridView1.Rows[i].Cells[1].Value;
                if (Val != null)
                {
                    (ws.Cells[8 + i, 4] as Range).Value2 = Val.ToString();
                }
            }

            for (int i = 0; i < form.dataGridView1.Rows.Count; ++i)
            {
                object Val = form.dataGridView1.Rows[i].Cells[2].Value;
                if (Val != null)
                {
                    (ws.Cells[8 + i, 3] as Range).Value2 = Val.ToString().Substring(0, 10);
                }
            }

            for (int i = 0; i < form.dataGridView1.Rows.Count; ++i)
            {
                object Val = form.dataGridView1.Rows[i].Cells[3].Value;
                if (Val != null)
                {
                    (ws.Cells[8 + i, 10] as Range).Value2 = Val.ToString();
                }
            }

            for (int i = 0; i < form.dataGridView1.Rows.Count; ++i)
            {
                object Val = form.dataGridView1.Rows[i].Cells[4].Value;
                if (Val != null)
                {
                    (ws.Cells[8 + i, 8] as Range).Value2 = Val.ToString();
                }
            }

            /* for (int j = 1; j < form.dataGridView1.Columns.Count; ++j)
             * {
             *   //(ws.Cells[1, j + 1] as Range).Value2 = dataGridView1.Columns[j].HeaderText;
             *   for (int i = 0; i < form.dataGridView1.Rows.Count; ++i)
             *   {
             *       object Val = form.dataGridView1.Rows[i].Cells[j].Value;
             *       if (Val != null)
             *           (ws.Cells[8 + i, j + 3] as Range).Value2 = Val.ToString();
             *   }
             * }*/
            form.Hide();
            //ws.Columns.EntireColumn.AutoFit();
            //Exl.ReferenceStyle = RefStyle;
        }
Exemplo n.º 7
0
        private void иНВ1ToolStripMenuItem_Click(object sender, EventArgs e)
        {
            Microsoft.Office.Interop.Excel.Application Exl = new Microsoft.Office.Interop.Excel.Application();
            Microsoft.Office.Interop.Excel.Workbook    wb;

            XlReferenceStyle RefStyle = Exl.ReferenceStyle;

            Exl.Visible = true;

            String TemplatePath = System.Windows.Forms.Application.StartupPath + @"\inv1.xls";

            try
            {
                wb = Exl.Workbooks.Add(TemplatePath); // !!!
            }
            catch (System.Exception ex)
            {
                throw new Exception("Не удалось загрузить шаблон для экспорта " + TemplatePath + "\n" + ex.Message);
            }
            string    data = Convert.ToString(DateTime.Today);
            Worksheet ws1  = wb.Worksheets.get_Item(1) as Worksheet;

            (ws1.Cells[6, 1] as Range).Value   = "Межрайонная инспекция  Федеральной налоговой службы России №2 по г. Чите ";
            (ws1.Cells[8, 1] as Range).Value   = "Отдел информационных технологий ";
            (ws1.Cells[18, 81] as Range).Value = data.Substring(0, 10);;

            Worksheet ws = wb.Worksheets.get_Item(2) as Worksheet;

            for (int i = 0; i < dataGridView1.Rows.Count; ++i)
            {
                (ws.Cells[10 + i, 72] as Range).Value2 = 1;
                (ws.Cells[10 + i, 86] as Range).Value2 = 1;
            }

            for (int i = 0; i < dataGridView1.Rows.Count; ++i)
            {
                (ws.Cells[10 + i, 1] as Range).Value2 = i + 1;
            }

            for (int i = 0; i < dataGridView1.Rows.Count; ++i)
            {
                object Val = dataGridView1.Rows[i].Cells[3].Value;
                if (Val != null)
                {
                    (ws.Cells[10 + i, 51] as Range).Value2 = Val.ToString();
                }
            }

            for (int i = 0; i < dataGridView1.Rows.Count; ++i)
            {
                object Val = dataGridView1.Rows[i].Cells[4].Value;
                if (Val != null)
                {
                    (ws.Cells[10 + i, 58] as Range).Value2 = Val.ToString();
                }
            }

            for (int i = 0; i < dataGridView1.Rows.Count; ++i)
            {
                object Val = dataGridView1.Rows[i].Cells[9].Value;
                if (Val != null)
                {
                    (ws.Cells[10 + i, 79] as Range).Value2 = Val.ToString();
                    (ws.Cells[10 + i, 93] as Range).Value2 = Val.ToString();
                }
            }

            for (int i = 0; i < dataGridView1.Rows.Count; ++i)
            {
                object Val  = dataGridView1.Rows[i].Cells[0].Value;
                object Val1 = dataGridView1.Rows[i].Cells[1].Value;
                object Val2 = dataGridView1.Rows[i].Cells[2].Value;
                object Val3 = dataGridView1.Rows[i].Cells[10].Value;
                (ws.Cells[10 + i, 6] as Range).Value2 = Val.ToString() + " " + Val1.ToString() + " " + Val2.ToString() + " " + Val3.ToString();
            }
        }
 /// <summary>在 A1 和 R1C1 引用样式之间转换、在相对和绝对引用之间转换公式中的单元格引用,或者同时进行这两种转换。Variant 类型。
 /// </summary>
 /// <param name="Formula">包含要转换的公式的字符串。必须为有效的公式,并且必须以等号开头。</param>
 /// <param name="FromReferenceStyle">公式的引用样式。</param>
 /// <param name="ToReferenceStyle">指定要返回的引用样式的 XlReferenceStyle 常量。如果省略此参数,则引用样式不变;公式样式保持 FromReferenceStyle 参数指定的样式。</param>
 /// <param name="ToAbsolute">指定转换引用类型的 XlReferenceStyle 常量。如果省略该参数,则引用类型不变。</param>
 /// <param name="RelativeTo">包含一个单元格的 Range 对象。相对引用与此单元格相对。</param>
 /// <returns></returns>
 public dynamic ConvertFormula(string Formula, XlReferenceStyle FromReferenceStyle, XlReferenceStyle? ToReferenceStyle = null, XlReferenceStyle? ToAbsolute = null, Range RelativeTo = null)
 {
     _objaParameters = new object[5] {
         Formula ,
         FromReferenceStyle ,
         ToReferenceStyle == null ? System.Type.Missing : ToReferenceStyle,
         ToAbsolute == null ? System.Type.Missing : ToAbsolute,
         RelativeTo == null ? System.Type.Missing : RelativeTo._objRange
     };
     return _objApplication.GetType().InvokeMember("CheckSpelling", BindingFlags.InvokeMethod, null, _objApplication, _objaParameters);
 }