350 lines
12 KiB
C#
350 lines
12 KiB
C#
using System;
|
|
using System.Collections.Generic;
|
|
using System.ComponentModel;
|
|
using System.Data;
|
|
using System.Drawing;
|
|
using System.IO;
|
|
using System.Linq;
|
|
using System.Diagnostics;
|
|
using System.Reflection;
|
|
using System.Text;
|
|
using System.Threading.Tasks;
|
|
using System.Windows.Forms;
|
|
using Microsoft.Office.Interop.Excel; // zusätzlich ist der Projektverweis auf COM -> Microsoft Excel xx-Objectlibrary
|
|
|
|
|
|
namespace Test_ExcelReadColumn
|
|
{
|
|
public partial class Form1 : Form
|
|
{
|
|
#region Version und Copyright
|
|
// Version und Copyright
|
|
string programName = Path.GetFileNameWithoutExtension(System.Reflection.Assembly.GetExecutingAssembly().GetName().CodeBase); //Den Programmnamen auslesen
|
|
string programVersion = System.Reflection.Assembly.GetExecutingAssembly().GetName().Version.ToString();
|
|
static object[] attributes = Assembly.GetExecutingAssembly().GetCustomAttributes(typeof(AssemblyCopyrightAttribute), false);
|
|
string copyright = ((AssemblyCopyrightAttribute)attributes[0]).Copyright;
|
|
string icon = System.Windows.Forms.Application.StartupPath + "\\Info.bmp";
|
|
//Assembly Datum und Zeit
|
|
static DateTime value = AssemblyDateTime();
|
|
string date = value.ToShortDateString();
|
|
string time = value.ToLongTimeString();
|
|
private static DateTime AssemblyDateTime()
|
|
{
|
|
var version = System.Reflection.Assembly.GetExecutingAssembly().GetName().Version;
|
|
var buildDateTime = new DateTime(2000, 1, 1).Add(new TimeSpan(TimeSpan.TicksPerDay * version.Build + TimeSpan.TicksPerSecond * 2 * version.Revision));
|
|
//Tage seit dem 1. Januar 2000 und Sekunden seit Mitternacht, (multiplizier mit 2 ergibt das Original)
|
|
return buildDateTime;
|
|
}
|
|
#endregion
|
|
|
|
#region Programm-Info
|
|
/// <summary>
|
|
/// Contains the name of the program file
|
|
/// </summary>
|
|
public static string ProgramName { set; get; }
|
|
|
|
/// <summary>
|
|
/// Contains the version of the program file
|
|
/// </summary>
|
|
public static string ProgramVersion { set; get; }
|
|
|
|
/// <summary>
|
|
/// Contains the copyright notice
|
|
/// </summary>
|
|
public static string Copyright { set; get; }
|
|
|
|
private void SetProgramInfo()
|
|
{
|
|
//Name, Version und Copyright setzen
|
|
ProgramName = programName;
|
|
ProgramVersion = programVersion;
|
|
Copyright = copyright;
|
|
}
|
|
#endregion
|
|
|
|
const string colObject = "Objekt";
|
|
const string colVStatus = "VStat";
|
|
const string colItemNumber = "ItemNumber";
|
|
const string colStatus = "Status";
|
|
int colomnStatus = 0;
|
|
|
|
Range oRangeSap;
|
|
Range oRangeReuse;
|
|
|
|
//oExcelApp benötigt den kompletten Namensraum, da andernfalls der Compiler den Unterschied zwischen
|
|
//"Microsoft.Office.Interop.Excel.Application" und "System.Windows.Forms.Application" nicht erkennen kann
|
|
private Microsoft.Office.Interop.Excel.Application oExcelApp = new Microsoft.Office.Interop.Excel.Application();
|
|
private Workbook oWorkbook = null;
|
|
private Worksheet oWorksheet = null;
|
|
|
|
|
|
public Form1()
|
|
{
|
|
SetProgramInfo(); //Name, Version und Copyright setzen
|
|
InitializeComponent();
|
|
}
|
|
|
|
private void Form1_Load(object sender, EventArgs e)
|
|
{
|
|
this.MaximumSize = new Size(808, Screen.PrimaryScreen.Bounds.Height - 30); //Um 30 kleiner, weil sonst der untere Rand hinter der Start-Leiste verschwindet
|
|
}
|
|
|
|
private void Form1_FormClosing(object sender, FormClosingEventArgs e)
|
|
{
|
|
//Beim Schließen des Fensters, Dokument schließen
|
|
try
|
|
{
|
|
if (oWorkbook != null)
|
|
{
|
|
oWorkbook.Close(); //Workbook schliessen
|
|
}
|
|
}
|
|
catch (Exception)
|
|
{
|
|
//Wurde das Workbook schon vorher geschlossen, dann landen wir hier.
|
|
//Nichts machen, nur den Fehler abfangen
|
|
}
|
|
finally
|
|
{
|
|
oExcelApp.Quit(); //Excel schliessen
|
|
}
|
|
|
|
}
|
|
|
|
private void buttonReadSapColumn_Click(object sender, EventArgs e)
|
|
{
|
|
if (openFileDialogExcelSAP.ShowDialog() == System.Windows.Forms.DialogResult.OK)
|
|
{
|
|
buttonReadSapColumn.Enabled = false;
|
|
|
|
ReadSapColumnValues();
|
|
|
|
buttonReadReuseColumns.Enabled = true;
|
|
}
|
|
else //Bei Abbruch, Fenster schließen
|
|
{
|
|
Close();
|
|
}
|
|
}
|
|
|
|
private void buttonReadReuseColumns_Click(object sender, EventArgs e)
|
|
{
|
|
if (openFileDialogExcelReuse.ShowDialog() == System.Windows.Forms.DialogResult.OK)
|
|
{
|
|
buttonReadReuseColumns.Enabled = false;
|
|
|
|
ReadReuseColumnValues();
|
|
|
|
buttonSaveChanges.Enabled = true;
|
|
}
|
|
else //Bei Abbruch, Fenster schließen
|
|
{
|
|
Close();
|
|
}
|
|
|
|
MatchValues();
|
|
}
|
|
|
|
private void buttonSaveChanges_Click(object sender, EventArgs e)
|
|
{
|
|
//Save Columns
|
|
int range;
|
|
|
|
range = dataGridViewExcelReuse.Rows.Count;
|
|
|
|
for (int i = 1; i < range; i++)
|
|
{
|
|
if (dataGridViewExcelReuse.Rows[i].Cells[3].Value != null)
|
|
{
|
|
if ((bool)dataGridViewExcelReuse.Rows[i].Cells[3].Value == true)
|
|
{
|
|
(oWorksheet.Cells[i + 2, colomnStatus] as Range).Value = dataGridViewExcelReuse.Rows[i].Cells[2].Value.ToString();
|
|
(oWorksheet.Cells[i + 2, colomnStatus + 1] as Range).Value = "Yes";
|
|
}
|
|
}
|
|
}
|
|
|
|
oWorkbook.Save();
|
|
|
|
if (oWorkbook != null)
|
|
{
|
|
oWorkbook.Close();
|
|
}
|
|
|
|
buttonSaveChanges.Enabled = false;
|
|
buttonReadSapColumn.Enabled = true;
|
|
}
|
|
|
|
private void ReadSapColumnValues()
|
|
{
|
|
object oValue;
|
|
|
|
// Datei öffnen und aktives Blatt und benutzten Bereich auswählen
|
|
oWorkbook = oExcelApp.Workbooks.Open(openFileDialogExcelSAP.FileName);
|
|
oWorksheet = (Worksheet)oWorkbook.ActiveSheet;
|
|
oRangeSap = oWorksheet.UsedRange;
|
|
|
|
//Spaltennummern von Spalte 'Objekt' und 'VStat' ermitteln
|
|
int colomnObject = SapColumnNo(colObject);
|
|
int colomnVstatus = SapColumnNo(colVStatus);
|
|
|
|
for (int j = 2; j < oRangeSap.Rows.Count + 1; j++)
|
|
{
|
|
dataGridViewExcelSAP.Rows.Add();
|
|
}
|
|
|
|
for (int j = 2; j < oRangeSap.Rows.Count + 1; j++)
|
|
{
|
|
oValue = (oRangeSap.Cells[j, colomnObject] as Range).Value;
|
|
if (oValue != null)
|
|
{
|
|
dataGridViewExcelSAP.Rows[j - 2].Cells[0].Value = oValue.ToString();
|
|
}
|
|
|
|
oValue = (oRangeSap.Cells[j, colomnVstatus] as Range).Value;
|
|
if (oValue != null)
|
|
{
|
|
dataGridViewExcelSAP.Rows[j - 2].Cells[1].Value = oValue.ToString();
|
|
dataGridViewExcelSAP.Rows[j - 2].Cells[2].Value = oValue.ToString().Remove(oValue.ToString().LastIndexOf(")")).Remove(0, oValue.ToString().IndexOf("(") + 1);
|
|
}
|
|
}
|
|
}
|
|
|
|
private int SapColumnNo(string value)
|
|
{
|
|
Range oRange;
|
|
|
|
// Datei öffnen und aktives Blatt und benutzten Bereich auswählen
|
|
oWorkbook = oExcelApp.Workbooks.Open(openFileDialogExcelSAP.FileName);
|
|
oWorksheet = (Worksheet)oWorkbook.ActiveSheet;
|
|
oRange = oWorksheet.UsedRange;
|
|
|
|
int colomnNo = -1;
|
|
|
|
for (int i = 1; i < oRange.Columns.Count; i++)
|
|
{
|
|
if (oWorksheet.Cells[1, i].Value.ToString().ToLower() == value.ToLower())
|
|
{
|
|
colomnNo = i;
|
|
}
|
|
}
|
|
|
|
return colomnNo; //-1 wenn Spalte nicht gefunden wurde
|
|
}
|
|
|
|
private void ReadReuseColumnValues()
|
|
{
|
|
object oValue;
|
|
|
|
// Datei öffnen und aktives Blatt und benutzten Bereich auswählen
|
|
oWorkbook = oExcelApp.Workbooks.Open(openFileDialogExcelReuse.FileName);
|
|
oWorksheet = (Worksheet)oWorkbook.ActiveSheet;
|
|
oRangeReuse = oWorksheet.UsedRange;
|
|
|
|
//Spaltennummern von Spalte 'Objekt' und 'VStat' ermitteln
|
|
int colomnItem = ReuseColumnNo(colItemNumber);
|
|
colomnStatus = ReuseColumnNo(colStatus);
|
|
|
|
for (int j = 2; j < oRangeReuse.Rows.Count + 1; j++)
|
|
{
|
|
dataGridViewExcelReuse.Rows.Add();
|
|
}
|
|
|
|
for (int j = 2; j < oRangeReuse.Rows.Count + 1; j++)
|
|
{
|
|
oValue = (oRangeReuse.Cells[j, colomnItem] as Range).Value;
|
|
if (oValue != null)
|
|
{
|
|
dataGridViewExcelReuse.Rows[j - 2].Cells[0].Value = oValue.ToString();
|
|
}
|
|
|
|
oValue = (oRangeReuse.Cells[j, colomnStatus] as Range).Value;
|
|
if (oValue != null)
|
|
{
|
|
dataGridViewExcelReuse.Rows[j - 2].Cells[1].Value = oValue.ToString();
|
|
}
|
|
}
|
|
}
|
|
|
|
private int ReuseColumnNo(string value)
|
|
{
|
|
Range oRange;
|
|
|
|
// Datei öffnen und aktives Blatt und benutzten Bereich auswählen
|
|
oWorkbook = oExcelApp.Workbooks.Open(openFileDialogExcelReuse.FileName);
|
|
oWorksheet = (Worksheet)oWorkbook.ActiveSheet;
|
|
oRange = oWorksheet.UsedRange;
|
|
|
|
int colomnNo = -1;
|
|
|
|
for (int i = 1; i < oRange.Columns.Count; i++)
|
|
{
|
|
if (oWorksheet.Cells[1, i].Value != null)
|
|
{
|
|
if (oWorksheet.Cells[1, i].Value.ToString().ToLower() == value.ToLower())
|
|
{
|
|
colomnNo = i;
|
|
}
|
|
}
|
|
}
|
|
|
|
return colomnNo; //-1 wenn Spalte nicht gefunden wurde
|
|
}
|
|
|
|
private void MatchValues()
|
|
{
|
|
string value = "";
|
|
|
|
for (int i = 0; i < oRangeReuse.Rows.Count; i++)
|
|
{
|
|
//Zeilenweise die Spalte 1 einlesen. Wenn der Wert nicht '<Kein Wert>' ist, dann in der SAP Liste Spalte 1 durchsuchen ob der Wert existiert. Existiert der Wert, dann den Wert aus Spalte 3 in die Reuse Liste Spalte 3 schreiben und Spalte 4 setzen.
|
|
if (dataGridViewExcelReuse.Rows[i].Cells[0].Value != null)
|
|
{
|
|
if (dataGridViewExcelReuse.Rows[i].Cells[0].Value.ToString() != "<Kein Wert>")
|
|
{
|
|
value = DetermineValue(dataGridViewExcelReuse.Rows[i].Cells[0].Value.ToString());
|
|
|
|
if (dataGridViewExcelReuse.Rows[i].Cells[1].Value.ToString() != value)
|
|
{
|
|
if (value != "")
|
|
{
|
|
dataGridViewExcelReuse.Rows[i].Cells[2].Value = value;
|
|
dataGridViewExcelReuse.Rows[i].Cells[3].Value = true;
|
|
}
|
|
else
|
|
{
|
|
dataGridViewExcelReuse.Rows[i].Cells[2].Value = dataGridViewExcelReuse.Rows[i].Cells[1].Value;
|
|
}
|
|
|
|
}
|
|
else
|
|
{
|
|
dataGridViewExcelReuse.Rows[i].Cells[2].Value = dataGridViewExcelReuse.Rows[i].Cells[1].Value;
|
|
}
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
private string DetermineValue(string value)
|
|
{
|
|
string newValue = "";
|
|
|
|
for (int j = 0; j < oRangeSap.Rows.Count; j++)
|
|
{
|
|
if (dataGridViewExcelSAP.Rows[j].Cells[0].Value != null)
|
|
{
|
|
if (dataGridViewExcelSAP.Rows[j].Cells[0].Value.ToString() == value)
|
|
{
|
|
newValue = dataGridViewExcelSAP.Rows[j].Cells[2].Value.ToString();
|
|
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
|
|
return newValue;
|
|
}
|
|
}
|
|
}
|