|
Hallo zusammen,
ich bin noch relativ unerfahren mit VBA und habe da mal eine Frage an Euch!
Bevor ich anfange allerdings noch ein paar Hintergrundinfos:
Ich habe den Code nicht selbst geschrieben sondern so zum "Debuggen" bekommen.
Im Grunde genommen geht es darum, dass gewisse Werte aus Excel in ein Word Dokument übertragen werden sollen. Wenn ich das Ganze auf meiner lokalen Maschine starte, funktioniert alles prime und es wird genau das gemacht, was gemacht werden soll! Soweit so gut...
Lasse ich das Programm auf einem Windows Server2008 R2 Standard laufen, kommt folgender Fehler:
System.Runtime.InteropServices.COMException (0x800A1200): Value out of range
at Microsoft.VisualBasic.CompilerServices.LateBinding.InternalLateSet(Object o, Type& objType, String name, Object[] args, String[] paramnames, Boolean OptimisticSet, CallType UseCallType)
at Microsoft.VisualBasic.CompilerServices.NewLateBinding.LateSet(Object Instance, Type Type, String MemberName, Object[] Arguments, String[] ArgumentNames, Type[] TypeArguments, Boolean OptimisticSet, Boolean RValueBase, CallType CallType)
at Rebilac.Prog.Tabellenformat(Object mTabelle, Single b1, Single b2, Single b3, Single b4, Int16 a1, Int16 a2, Boolean first)
at Rebilac.frmData.WORDInput(CultureInfo& cix, Int16 anz, Boolean rie)
at Rebilac.Prog.Eingabebericht(Int16 anz, Boolean pp)
at Rebilac.Prog.Reportbericht(Boolean[] report)
at Rebilac.frmReport.cmdok_Click(Object sender, EventArgs e)
at System.Windows.Forms.Control.OnClick(EventArgs e)
at System.Windows.Forms.Button.OnClick(EventArgs e)
at System.Windows.Forms.Button.OnMouseUp(MouseEventArgs mevent)
at System.Windows.Forms.Control.WmMouseUp(Message& m, MouseButtons button, Int32 clicks)
at System.Windows.Forms.Control.WndProc(Message& m)
at System.Windows.Forms.ButtonBase.WndProc(Message& m)
at System.Windows.Forms.Button.WndProc(Message& m)
at System.Windows.Forms.Control.ControlNativeWindow.OnMessage(Message& m)
at System.Windows.Forms.Control.ControlNativeWindow.WndProc(Message& m)
at System.Windows.Forms.NativeWindow.Callback(IntPtr hWnd, Int32 msg, IntPtr wparam, IntPtr lparam)
Hat jemand eventuell eine Ahnung was das sein könnte?
Ich glaube nicht das es was mit dem Code zu tun hat, da er lokal funktioniert...
Vielen Dank für Eure Hilfe vorab
0815 |