userform

0熱度

2回答

我認爲這並不複雜，但是作爲VBA新手，在Google和Google玩了幾天之後，我一直無法找到答案不同的代碼。我有一個宏：打開一個文件中的任何文件夾路徑被命名爲搜索特定的文本文件中查找特定部分的開始，即A100 發現本節的結尾，即A110（根據文件長度可變）將此範圍內的單元格複製並粘貼到另一個特定範圍，即O1：O10 使用複選框填充用戶窗體在這個新的可變長度範圍每個小區我現在需要用戶點擊

0熱度

1回答

有從主模塊和填充imageBox用戶窗體調用函數

Public Function LoadImage() As Object For Each pics In sheetImages.Shapes If (CStr(pics.Name) = CStr(currpartImage)) Then Me.ImagePreview.Picture =PictureFromShape(sheetImages.Shapes(

-1熱度

1回答

用戶表單中沒有計算的值

有人可以幫助我嗎？我有一個用戶窗體有一些數字字段。問題是我的Total框不會計算它們，因爲它將文本識別爲一個數字。所以例如，如果我要說HE.Value（10）+ ME.Value（10）例如應該= 20然而Total是來到1010.如果我*它，而是我收到一個錯誤調試，因爲它將該值識別爲文本格式。我從來沒有在用戶窗體中出現過這個問題。有人能夠協助嗎？感謝，

2熱度

2回答

加載JPEG圖片的錯誤

這個錯誤已經有大量的帖子，但我似乎無法找到解決方案; （與LoadPicture()功能）編程加載圖片上的用戶窗體的圖像控制當出現此錯誤： Run-time error 481 - Invalid picture 和類似時，它的手動加載 Invalid picture 消息。從我的網絡搜索中，我發現了關於這個錯誤的一整套建議;大多數帖子往往是因爲user is uploading a png或其

1熱度

1回答

Excel用戶自定義文本框拖動或拖動

如果我爲Excel用戶窗體上的文本框啓用拖放操作，只需將鼠標懸停在texbox上即可觸發事件。如果我然後移動鼠標而不將物品放到texbox上，我希望事件被取消。有什麼辦法可以做到這一點？簡單的例子：我將鼠標懸停在文本框上，勾選了一個複選框。我將鼠標移開而不丟棄，複選框未勾選。

1熱度

3回答

對待用戶窗體的功能

我創建了一個VBA用戶窗體基本上是一個榮耀的輸入框就像一個輸入框，可以採用這樣 Dim returnVal As String returnVal = InputBox("Write some string") 我想我的窗體像運行這 Dim returnVal As customClass Set returnVal = MyUserForm([some arguments]) ie

1熱度

1回答

多頁標籤可見，但不活動

我有一個多頁的用戶表單。我希望在頂部顯示多頁面的標籤，以便用戶知道他在哪個頁面上以及剩下多少頁面。但我想通過按下標籤名稱來禁用在標籤之間跳轉的可能性。相反，只有下一個和後退按鈕可用於在頁面之間導航。僅僅通過使用這些屬性是可能的，還是必須編寫代碼來更改MULPIP？

0熱度

1回答

致電UpdateBookmark＆useAforB作爲布爾代碼幫助

我一直在一些代碼一起在這個網站上的人的幫助。我遇到了一些問題 - 我使用Call UpdateBookmark函數將以前輸入的信息替換爲word文檔，並且在我的現有代碼中遇到了問題。 Private Sub cmdOk_Click() Dim useAforB As Boolean useAforB = CheckBox1.Value Application.S

0熱度

2回答

對象所需運行時錯誤'424'

我在下面的代碼行中得到了對象所需的運行時錯誤，我檢查了它們的正確表名，但仍然顯示相同的錯誤Sheet1.Range（「A1」）。Value = Date & 「」 &時間 Private Sub CommandButton1_Click() Dim username As String Dim password As String username = TextBox1.Text pas

0熱度

1回答

運行時錯誤13 - 不匹配

我是新的VBA編碼和工作的匹配代碼。代碼工作得很好，當我運行「數據表」中的代碼時（表單中的數據都是我的數據，並且必須找到匹配），但是當我在frontpage上運行代碼時（Sheet 1 with userforms ）代碼是debuggen並且說「運行時錯誤13」。有人可以告訴問題是什麼嗎？有人可以告訴我爲什麼我的「If isError」不起作用嗎？在此先感謝！溴 'Find SKU and