Hallo Forum,
ich habe folgenden Code:
fn = ThisWorkbook.Path & "\HKL_WBZ1_2005.xls"

Application.ScreenUpdating = False
Workbooks.Open fn
Set WBList = ActiveWorkbook
For Each Sh In WBList.Sheets
For zeile = 11 To 500
Select Case Sh.Cells(zeile, 9).Value
Case 1, 10, 11, 12
lz = ThisWorkbook.Sheets("temp").Range("A65536").End(xlUp).Row + 1
Sh.Cells(zeile, 1).EntireRow.Copy Destination:=ThisWorkbook.Sheets("temp").Cells(lz, 1)
End Select
Next zeile
Next Sh
WBList.Close False
dieser code wird aus einer Arbeitsmappe heraus ausgeführt. Das funzt alles besten, nur möchte ich unterbinden das das Workbook (HKL_WBZ1_2005.xls) welches über diesen Code
geöffnet wird sichtbar ist. Application.screenUpdating funktioniert leider
nicht.
Gibt es eine Möglichkeit dies zu Unterbinden, oder zumindest für den Benutzer
nicht sichtbar zu gestalten?
Vielen Dank im Vorraus
Carsten