Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Excel mit VB öffnen
Autor: NOMO
Datum: 10.01.04 20:06
Hallo schönen guten Abend. Ich bin absoluter VB Neuling und habe mir hir den folgenden Code rauskopiert: http://www.vbarchiv.net/faq/vbvba_excel.php Private oExl As New Excel.Application Private Sub OpenExlWS(ByVal sWSName As String, ByVal sTabName As String) Dim A As Variant Dim Zeile As Long, Spalte As Integer ' Workbook öffnen On Error Resume Next oExl.WorkBooks.Open sWSName If Err > 0 Then Msgbox "Exceldatei konnte nicht gefunden oder geöffnet werden.", _ vbExclamation, "Dateifehler" Exit Sub End If On Error Goto 0 ' Tabelle selektieren: ActiveWorkBook.Sheets(sTabName).Select ' Zelle lesen A = ActiveSheet.Cells(Zeile, Spalte).Value ' Zelle schreiben ActiveSheet.Cells(Zeile, Spalte).Value = "Test" ' alles schließen ActiveWorkbook.Close SaveChanges:=True oExl.Quit Set oExl = Nothing End Sub soweit so gut nur leider bekomme ich es nicht hin, bei mir erscheint immer nur die MsgBox Frage warum wie kann ich denn nun eine Excel datei öffnen, was genau muss ich machen? gruß NOMO

Excel mit VB öffnen	502	NOMO	10.01.04 20:06
Re: Excel mit VB öffnen	335	Dieter	10.01.04 22:10
Re: Excel mit VB öffnen	336	NOMO	11.01.04 12:19
Re: Excel mit VB öffnen	330	Dieter	11.01.04 13:33
Re: Excel mit VB öffnen	333	NOMO	11.01.04 14:58

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