title image


Smiley Re: Poste mal bitte Deinen Code ____ o.T.
Private Sub CommandButton3_Click()



'Variablendimensionierung für Jahr, Monat und Pfad

Dim j As String

Dim m As String

Dim p As String



'Variablen auslesen

j = Workbook("V-dos.xls").Sheets("Tabelle2").Range("D10").Value





Dim objWb As Excel.Workbook

On Error GoTo ErrHandler

Set objWb = Workbooks.Open("C:test\test.xls")

objWb.Sheets("Tabelle100").Activate

ErrExit:

On Error Resume Next

Set objWb = Nothing

Exit Sub



ErrHandler:

MsgBox ("Des gibts net")

Resume ErrExit

End Sub



geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: