-roTekuGeL-

*zustimm* am besten wäre jetzt ne Kawasaki Z1000 *sabber*

na lieber jünger als kleiner

*gute Laune wegnehm und davonrenn*

*auf Avatar schau* ich glaube das sind Phantomschmerzen

och armes Wölvchen... lass dich mal :e@sy

dich hab ich damit ja auch nicht gemeint... oder schläfst du etwa? jemand der so Böse wie du ist brauch doch keinen schlaf oder? *duck*

dummdideldummdei... Morgen ihr Schlafmützen!

sooooo Feierabend!!! schönen Tag noch :e@sy

ich würde sogar Monate behaupten...

Public oExl As Object Private Sub OpenExlWS(ByVal sWSName As String, ByVal sTabName As String) Dim A As Variant Dim Zeile As Long, Spalte As Integer Set oExl = CreateObject("excel.Application") ' 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: oExl.ActiveWorkbook.Sheets(sTabName).Select ' Zelle lesen A = oExl.ActiveSheet.Cells(1, 1).Value ' Zelle schreiben oExl.ActiveSheet.Cells(1, 1).Value = "Test" oExl.Quit Set oExl = Nothing End Sub Private Sub Form_Load() Call OpenExlWS("C:\TEST.xls", "Tabelle2") End Sub [/php] tested edit: die Zeile und Spalte kannst du dann noch Variabel machen... im Bsp. sind die fest (die variablen oben sind also unnötig...)

wenn du ein Objekt in einer Sub erstellst würde ich nicht darauf bauen dass du von einer anderen Sub aus darauf zugreifen kannst... leg doch die Variablen außerhalb (also als Globale Variablen) an also praktisch da wo du das Sheet1 deklariert hast...

... mh da werden erinnerungen wach... sowas ist mir auch mal passiert... das mittlere gelenk vom rechten mittelfinger war dann total dick... ansonsten hab ich immer gut auf meine fingerchen aufgepasst... solltest du auch mal machen

lol wie schafft man denn sowas? wir haben auch immer Handball gespielt, mit 3 Jahre älteren... die haben dann einen zwar ganz schön weggefegt mit ihrer übermacht an größe und gewicht, aber gebrochen hat sich eigentlich keiner was... lediglich ein paar abgebrochene Zähne

dann sei so gut und poste doch etwas mehr aus deinem Coding...

deshalb distanziere ich mich lieber von Extremsportarten... mein damalige große Leidenschaft hinter ausparkenden Autos rumzustehen hat mir beide Schlüsselbeine gebrochen...

/me auch noch nicht... die Verbände für die gebrochenen Knochen haben sie bis jetzt immer recht schnell hinbekommen soooo Mahlzeit!!!

dir ist aber klar dass man damit was in eine Zelle schreibt und nicht liest... schon mit msgbox Sheet1.Cells(1, 1) versucht?

MsgBox Excel.ActiveWorkbook.Path damit bekommst du den Pfad deines Aktuellen Workbooks... und da beide im selben ordner liegen...

... würde mal meinen dass es daran liegt... app gibts nur in VB, nicht in VBA

mh auch nicht unbedingt... kam gestern abend von zu Hause auch nicht mher drauf (mit Hosts eintrag)

lol das hab ich auch schon hinter mir... allerdings mit PHP... die Lehrerin hat gemeint Fehler wären uninteressant - Hauptsache ihr habts mal gesehn hab gerade erfahren das meine Projektgenehmigung hier schon 4 Wochen irgendwo beim Chef rumgammelt... und ich hab mir schon Sorgen gemacht... mh *grybl* schreib ich jetzt das Datum vom geplanten Projektzeitraum hin oder das Aktuelle :confused:

Moin @ll

Kleiner tipp, niemals mit ner EC karte und dem guten Glauben das noch Geld auf dem Konto ist Einkaufen gehn! Könnte sich herausstellen dass das der peinlichste Tag eures Lebens wird

mh ich glaub ich packs dann auch mal... sollte zwar noch 30 min. bleiben, hab aber keine lust mehr... bis denn dann und allen ein schönes WE!

na die Firma die das verbockt hat... aber war halt unglücklich gelufen, also nicht unbedingt dummheit von seitens der Arbeiter... wird halt nur bis Obtober dauern bis alles wieder fertig ist tschüss Crash T-1h :[