Question

我有3本工作簿。 A，B和C.

工作簿A中有一个超链接，用于打开B.
C只是在后台打开。
B有一个宏，当文件打开时会打开一个用户窗体。

userform有两个按钮。一个是"Okay"，它将数据放入电子表格中。另一个是"Save and close"执行相同的操作，但也保存并关闭工作簿。

如果我从文件资源管理器中打开B，一切正常。但是，如果我使用A中的超链接打开B，并点击＆＃34;保存并关闭＆＃34;按钮，代码工作，但随后工作簿C变得隐藏。 C与A或B无关。

知道为什么以及如何防止这种情况？

Private Sub Workbook_Open()

Sheets("Weekly Update").Select
Range("a5").Select
Selection.End(xlDown).Select
ActiveCell.Offset(1, 0).Select
UserForm1.Show

End Sub

＆＃34;保存并关闭＆＃34;

用户形式代码按钮

Private Sub CommandButton3_Click()

r = ActiveCell.Row
Cells(r, 1) = TextBox5.Value
Cells(r, 3) = TextBox3.Value
Cells(r, 5) = TextBox4.Value
Cells(r, 7) = TextBox1.Value
Worksheets("Program Financials").Range("F3").Value = UserForm1.TextBox6.Value
Worksheets("Program Schedule").Range("F3").Value = UserForm1.TextBox7.Value
Me.Hide
'okay button code ends here
ActiveWorkbook.Save
ActiveWorkbook.Close

End Sub

另外，从userform B我尝试调用A中的sub来接近B，然后再次起作用，然而C又被隐藏了。

当我关闭另一个工作簿时，工作簿变得隐藏

0 个答案: