Pravidelné restartování Excelu Vyřešeno

[Branscombe]

Nazdárek všichni. Nevím jestli mi s tímto někdo pomůže, ale mám excelovský soubor s ovládacími prvky a pokaždé když kliknu do ovládacího prvku "Listbox" a zascrolluju kolečkem myši nahoru nebo dolů tak se mi excel restartuje. Nevíte někdo čím by to mohlo být ?? Díky moc předem za jakoukoliv radu.

ve VBA mám k napsáno následující :
LIST1
Private Sub worksheet_change(ByVal target As Range)
With target
If .Column = 9 Then
With List1.Line_Leader.List = .Range("E2", .Cells(.Rows.Count, "E").End(xlUp)).Value
End With
With List1.Type_of_latch.List = .Range("G2", .Cells(.Rows.Count, "G").End(xlUp)).Value
End With
With List1.Workstation.List = .Range("A2", .Cells(.Rows.Count, "A").End(xlUp)).Value
End With
With List1.Analyse.List = .Range("C2", .Cells(.Rows.Count, "C").End(xlUp)).Value
End With
With List1.Place.List = .Range("F2", .Cells(.Rows.Count, "F").End(xlUp)).Value
End With
End If
End With
End Sub




THISWORKBOOK
Option Explicit

Private Sub workbook_open()
On Error Resume Next
With Application
' Zapnout / vypnout celoobrazovkový režim
.DisplayFullScreen = True
' Zobrazit / skrýt hlavní nabídku
.CommandBars(1).Enabled = False
' zapnout překreslování obrazovky
.ScreenUpdating = True
End With

Application.WindowState = xlMaximized

With List1
.Line_Leader.List = .Range("E2", .Cells(.Rows.Count, "E").End(xlUp)).Value
.Type_of_latch.List = .Range("G2", .Cells(.Rows.Count, "G").End(xlUp)).Value
.Workstation.List = .Range("A2", .Cells(.Rows.Count, "A").End(xlUp)).Value
.Analyse.List = .Range("C2", .Cells(.Rows.Count, "C").End(xlUp)).Value
.Place.List = .Range("F2", .Cells(.Rows.Count, "F").End(xlUp)).Value
End With
On Error GoTo 0
End Sub

Private Sub Workbook_BeforeClose(Cancel As Boolean)
On Error Resume Next
With Application
' Zapnout / vypnout celoobrazovkový režim
.DisplayFullScreen = False
' Zobrazit / skrýt hlavní nabídku
.CommandBars(1).Enabled = True
End With

Application.DisplayFullScreen = False
Application.WindowState = xlMaximized
On Error GoTo 0
End Sub

[Reklama]

[navstevnik]

Pripoj jako prilohu predmetny sesit (pokud to je nezverejnitelne, tak s testovacimi daty), analyza problemu bude podstatne snazsi.

[Branscombe]

Vadný soubor v příloze.
Data jsem musel změnit ale stále to nefunguje.
Když kliknete do nějakého listboxu a zkusíte scrollovat nahoru či dolů tak se excel restartuje.

[mike007]

Rolování a záznam je v pořádku. Vše pracuje v pohodě, Excel nepadá.

[navstevnik]

Neshledavam zadne problemy pri kliknuti na kterykoliv Listbox a skrolovani - skroluje cely excelovsky list.

[Branscombe]

Ještě jsem zapoměl napsat že jedu na Office 2003. Kolega z práce používá 2007 a také mu to nepadá, ale já v práci i doma používám Office 2003 a na obou místech mi to padá.

[mike007]

Též jedu na Office2003 a je vše v pořádku. Zkus aktualizovat Office.

[Branscombe]

Mám všechny aktualizace...
Tak to je hodně špatné, potřebuji to vyřešit do zítřka do rána ...

[mike007]

Nápověda --> O aplikaci Microsoft Excel --> tlačítko Zakázané položky ...
Máš tam něco?

[Branscombe]

Ne ne, nic tam nemám ...

[Pic]

Žádný jiný problém s PC - jen ten Excel?

[Branscombe]

Ne ne, PC je na 100% OK a v práci na terminálu mi to taky nefunguje ... Takže bohužel jen ten excel