VB - Fehler in einer Funktion

VB - Fehler in einer Funktion (4 Beiträge, 90 Mal gelesen)

Du bist nicht angemeldet. [ Login/Registrieren ]

das ist die Funktion..
zur erklärung.. ich habe ein Objekt xlAppli as Excel.Application
und xlWorkB(0 to 2) as Excel.Workbooks...

Grundsätzlich funktioniert die Funktion, jedoch nur wenn das Workbook im Excel als oberstes Workbook gezeigt wird.. also wenns das gerade aktive Workbook ist!

Public Sub deleteRow(iX As Integer, zeileX As Integer, Optional SheetX As String = "Tabelle1")
    Dim wantedSheet As Worksheet
    Set wantedSheet = xLAppli.Workbooks(xLWorkB(iX).Name).Sheets(SheetX)
    If zeileX <> 0 Then
        xLAppli.Sheets(SheetX).Select
        wantedSheet.Rows(Trim(zeileX) & ":" & Trim(zeileX)).Select
        xLAppli.Selection.Delete Shift:=xlUp
    End If
    Set wantedSheet = Nothing
End Sub

irgendeine idee?
das komische ist, daß ich mich damit schon einmal gespielt hab, und ich habs hinbekommen... nur gehz jetzt auf einmal nicht mehr!

sad to see your sorrow sad to see you

Re: VB - Fehler in einer Funktion (Thing am 23.02.2005, 22:28:43)

Re(2): VB - Fehler in einer Funktion (Entity am 24.02.2005, 11:31:50)

Dieses Forum ist eine frei zugängliche Diskussionsplattform.
Der Betreiber übernimmt keine Verantwortung für den Inhalt der Beiträge und behält sich das Recht vor, Beiträge mit rechtswidrigem oder anstößigem Inhalt zu löschen.
Datenschutzerklärung