在Excel用戶窗體上單擊「X」有時會關閉電子表格

我在寫一個電子表格，其中雙擊某些單元格會打開一個用戶窗體。當某些用戶單擊「X」關閉用戶窗體時，整個工作簿關閉（這不是預期的行爲）。如果單元格有內容，就會發生這種情況如果單元格爲空白，則在用戶窗體關閉時工作簿不會關閉。在Excel用戶窗體上單擊「X」有時會關閉電子表格

這裏是調用用戶窗體的通用代碼：

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) 

Dim requestID As Long 
Dim rowCount As Long 

rowCount = UsedRange.Rows.Count 

If (Target.Row > 2) And (Target.Row <= rowCount) Then 
    requestID = Cells(Target.Row, 1) 
    Select Case Target.Column 
     Case 2 To 4 
      requestUpdateForm.populate requestID 
      requestUpdateForm.Show 

     Case 5 
      initialSearchForm.populate requestID 
      initialSearchForm.Show 

     'etc, more forms using Case statements 

    End Select 
End If

我以前見過這種行爲，除了它是相反的：點擊「X」關閉窗體打開從空白單元格關閉工作簿，並且當我創建新工作簿並將所有代碼複製到該工作簿時，此問題就消失了。

讓我感到困惑的是，這個錯誤發生在一個用戶的系統上，而不是另一個用戶的系統上，儘管它們都具有相同的Excel安裝。

來源

2011-12-08 sigil

表單中是否存在QueryClose事件？如果是這樣，它的代碼是什麼？ –

也許在您的系統中安裝excel時出現問題。

嘗試重新安裝或修復安裝。

來源

2011-12-09 01:27:13 Ian

這很有趣。我不確定爲什麼這個答案被否決。看到問題，這個問題只發生在一臺機器上。這當然是由於安裝問題。在安裝Excel時，某些添加可能無法正常工作，這些問題也在Microsoft答覆站點中進行了報告。嘗試使用Microsoft提供的工具重新安裝或修復安裝。 – Ian

我不知道爲什麼這個選票被拒絕了，所以我投票支持。即使它不是答案，這聽起來不是一個壞主意。 – Fionnuala

感謝那個Remou的姿態。我所看到的是由於某些安裝問題，excel的某些功能不起作用。 – Ian

我解決了它...通過重新啓動 - 只需關閉計算機並再次打開。

就是這樣。我不知道它爲什麼起作用，但它的工作。

來源

2011-12-12 16:42:01 sigil

在Excel用戶窗體上單擊「X」有時會關閉電子表格

回答

相關問題