Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

werte in excel sheet
Autor: matze
Datum: 03.05.02 15:38
Hallo Forum, im Rahmen meiner dipl. arbeit, möchte ich Werte aus einem Datenblatt (textboxen) in ein excel sheet schreiben. Mein Problem ist das sich excel nicht komplett schliesst (im task manager als prozess bleibt es vorhanden ), sondern erst wenn das ganze Programm beendet wird. wenn ich das programm nicht beende, sondern die sub nochmal starte schmiert mir das programm ab. (Fehlermeldung: Laufzeitfehler 91: objektvariable oder with-blockvariable nicht festgelegt. fuer jede hilfe wäre ich dankbar mfg der ewige student wollte folgenden code verwenden (sollte nur ein Versuch sein, noch nicht endgültig): Sub WertinExcel() Dim intzeile As integer Dim intspalte As integer Dim dblWert As Double Dim strSheetname As String Dim Excel As New Excel.Application intzeile = 1 intspalte = 1 dblWert=200 strSheetname = App.Path & ("Ergebnisdruck.xls") Excel.Workbooks.Open FileName:=strSheetname ActiveWorkbook.Sheets("Tabelle1").Select ' Zelle schreiben ActiveSheet.Cells(intzeile, intspalte).Value = dblWert 'speichern ActiveWorkbook.Save 'Excel.ActiveWorkbook.PrintOut Copies:=1, Collate:=True Excel.ActiveWorkbook.Close Excel.Application.Quit Set Excel = Nothing End Sub

werte in excel sheet

47

matze

03.05.02 15:38

Sie sind nicht angemeldet! Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden. Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  Gesamtübersicht

Suchen