userform

0熱度

1回答

我是VBA的新手，我的問題可能很愚蠢，但我無法修復它，所以請幫助我，如果可以的話！這是事情：我得到了一個用戶表單，它完美地填充了電子表格，但是如果沒有輸入信息，它會發生瘋狂的事情。正如你在下面看到的，我發現了一些代碼來檢查數據是否被輸入，所以如果它沒有彈出窗口，你必須輸入一些東西，但是當你做表格填充2行數據而不是一行。例如，如果選擇'x'行並希望將值'a'，'b'，'c'，'d'，但忘記將值'c

0熱度

1回答

如何使用用戶表單暫停代碼

所以基本上我需要暫停宏代碼，等待用戶輸入，然後繼續代碼的其餘部分。我知道通過使用「無模式用戶表單」，這可以完成。但現在的重點是，彈出用戶窗體後的所有代碼都需要寫入命令按鈕部分（基本上它是用戶窗體自己的模塊）。正因爲如此，所有的初始化，我仍然需要的所有變量都已被清除。所以我問的是有沒有辦法在的VBA代碼，中間暫停，然後，等待用戶輸入，然後繼續代碼的其餘部分非常感謝您的幫助

0熱度

1回答

Silverlight - 超出瀏覽器 - 隱藏當前用戶窗體並顯示另一個？

我習慣在VB.net中編寫少量的程序，但使用Windows窗體應用程序。我目前正在研究VB.net中的一個小型Silverlight 4項目，但我似乎無法在Silverlight 4中找到與Me.Hide()或Me.Show()相同的功能。這樣我就可以隱藏一個用戶窗體並在另一個窗體上顯示另一個窗體按鈕點擊事件。感謝，喬希

1熱度

1回答

在VBA用戶窗體中是否存在關鍵字TreeView

在VBA treeview用戶窗體中，如何通過鍵或其他方法判斷節點是否存在？有沒有一種很好的方法來查看節點是否存在？ Public Sub Test Dim thisNode as New Node ' Determine if node exists If tvNodeExample.Nodes.Item("TestKey") is Nothing Then

0熱度

1回答

如何從用戶窗體中添加信息到2列，尋找每個

看起來很容易的第一個空行，但我仍然無法弄清楚，爲什麼everyting被添加到A列，爲什麼不列「AN」我定義iRowB 非常感謝您的幫助 Private Sub CommandButton1_Click() Dim iRowA As Long Dim iRowB As Long Dim ws As Worksheet Set ws = Worksheets("Results draft"

0熱度

1回答

用戶表單計算VBA excel

我有一個包含combox和兩個文本框的用戶表單用戶從combobox1中選擇一個化學文本並輸入文本框1（數字）中的化學品高度。然後根據他選擇的化學品，我定義了化學品罐的密度和麪積。然後我需要計算：textbox2.value =密度*面積* textbox1.value 密度和麪積是不同的每一個化學品。該公式是質量=密度*面積*體積。我試圖此代碼：私人小組ComboBox1_Chang

1熱度

1回答

VBA：Userform中的複選框 - 應該很簡單但不起作用

我是Visual Basic的新手（迄今爲止2天），而且我唯一做過的其他編程是MATlab。我想讓程序在Excel的不同列中打印不同的數字，具體取決於是否檢查了用戶窗體中的複選框。總共有26個複選框 - 以及一些文本框 - 我試圖使用For Each控制循環遍歷所有複選框。我查了一些教程和一些論壇，但是當我嘗試運行測試時，代碼不起作用。更具體地說，沒有錯誤出現，但是「測試它是否工作？」不在任何

0熱度

1回答

VBA用戶窗體：根據Combobox訪問不同的圖表

我是VBA的初學者，只有MATlab的一些經驗。目前我正在嘗試使用Userform來顯示不同的圖形（在同一個用戶窗體上），具體取決於ComboBox的輸出。我將我的圖表顯示在this tutorial.上本質上，圖片保存爲GIF，然後用圖像控件打開。例如，我將圖表保存爲Chart＃_ ####; Chart1_4301。數字的順序是一樣的，在組合框的選項 - 我想1_4301在組合框中設置Cu

0熱度

1回答

隱藏用戶窗體到打印機在VBA

我有這個問題與設備我想節目：我需要添加一個「打印」按鈕，用戶窗體，這將對打印屏幕圖像。我設法構建了用戶表單，添加按鈕並最終找到將打印設備屏幕顯示內容的內置VBA命令。當然，我的用戶表單沒有用於顯示在我的打印件中，但無論我無法將其隱藏到打印機中。我想： Userform.hide Userform.zoom = 10 Userform.visible = false 但所有這些似乎工作

1熱度

1回答

用戶窗體設置多個篩選條件

我有6個用戶窗體其彈出，並請您選擇您要排序的變量： ClientFilter CostCenterFilter UtilityFilter TypeOfWorkfilter AnalystFilter ProjMgrFilter 在每個變量中使用if語句。 Sub UpdateCF() Integer_CF = -1 If AU_CF.Value = True Then