Hallo Gemeinde,
ich bin neu hier. Ich bin Anfänger und arbeite mich gerade in C#Sharp ein. ich bekomme die oben genante Felerhmeldung und weiß nichts damit anzufangen. Wer kann mir helfen?
Gruß
Michael
Ausschnitt aus dem Prog
ich bin neu hier. Ich bin Anfänger und arbeite mich gerade in C#Sharp ein. ich bekomme die oben genante Felerhmeldung und weiß nichts damit anzufangen. Wer kann mir helfen?
Gruß
Michael
Ausschnitt aus dem Prog
C#:
private void cmdGenerieren_Click(object sender, EventArgs e)
{
Microsoft.Office.Interop.Excel.Application xlsApp = new Microsoft.Office.Interop.Excel.Application();
Microsoft.Office.Interop.Excel.Workbook xlsMappe;
Microsoft.Office.Interop.Excel.Worksheet xlsBlatt;
Microsoft.Office.Interop.Excel.Range xlsZelle;
Page RMpage1 = new Page();
PagePropertyList RMpageprop = new PagePropertyList();
ProjectManager RMprojManager = new ProjectManager();
PageMacro RMpagemacro = new PageMacro();
Insert RMinsert = new Insert();
SelectionSet RMSelectionSet = new SelectionSet();
PlaceHolder RMplaceholder = new PlaceHolder();
PlaceHolderService RMphs = new PlaceHolderService();
Eplan.EplApi.Base.BaseException RMex = new Eplan.EplApi.Base.BaseException();
int a = 1;
string Makro;
string Wertesatz;
Project RMproject = null;
try
{
//xlsMappe = xlsApp.Workbooks.Open("C:\Program Files\EPLAN\Electric P8\1.8.5\BIN\KZE.xls")
xlsMappe = xlsApp.Workbooks.Open("C:\\EplanP8\\Issytec\\Schemata\\Issytec.xls");
//xlsBlatt = xlsMappe.Worksheets("Tabelle1");
//this.Cursor() = Cursors.WaitCursor;
for (a = 2; a <= 100; a++)
{
xlsZelle = xlsBlatt.Cells(a, 1); Hier tritt der Fehler auf************************
if (xlsZelle.Value)
{
xlsZelle = xlsBlatt.Cells(a, 2); Hier tritt der Fehler auf************************
Makro = xlsZelle.Value;
xlsZelle = xlsBlatt.Cells(a, 4); Hier tritt der Fehler auf************************
Wertesatz = xlsZelle.Value;
if (Makro != "")
{
if (RMproject == null)
{
this.txtVorlage.Text = "LEER";
}
else
{
//RMpagemacro.Open("C:\Program Files\EPLAN\Electric P8\Makros\KHS\KZEREF_MAKROS\" & Makro, RMproject)
//Dim RMstore As StorableObject() = RMinsert.PageMacro("C:\Program Files\EPLAN\Electric P8\Makros\KHS\KZEREF_MAKROS\" & Makro, Nothing, RMproject, True)
RMpagemacro.Open("C:\\EplanP8\\Issytec\\Makros\\" + Makro, RMproject);
StorableObject[] RMstore = RMinsert.PageMacro("C:\\EplanP8\\Issytec\\Makros\\" + Makro, null, RMproject, true);
foreach (Page RMpage in RMstore)
{
foreach (GraphicalPlacement RMPlacement in RMpage.AllGraphicalPlacements)
{
if (RMPlacement is PlaceHolder)
{
RMplaceholder = RMPlacement;
if (Wertesatz != "")
{
RMphs.ApplyRecord(RMplaceholder, Wertesatz);
}
}
}
}
}
}
}
}
Zuletzt bearbeitet von einem Moderator: