vba

    0熱度

    1回答

    我有一個JSON我想在VBA中解析。我已經成功解析了「offer」的數組。在「offer」陣列內部是另一個陣列「價格」「USD」。 問題是並非每個「offer」對象都有「USD」數組。我試圖創建一個對象,我可以創建一個表格/工作表,但我甚至無法使用調試模式打印對象。這種方法有效,但因爲不是每個Dict OfferDetails都包含「USD」對象。 我想要做的是能夠打印字符串,如果「USD」對象丟

    0熱度

    3回答

    我想從用戶定義函數返回值,但返回的值都是0。我覺得我分配給變量wk1和wk2的值沒有在函數中使用。 該子程序的目標是計算股票的每週回報,給定工作表「價格」中提供的價格。 我不是很精明與VBA所以任何幫助表示讚賞 感謝您的幫助! Public Sub wklyrtn() Dim wk1, wk2 As Long Dim row As Long, column As Long Dim matri

    1熱度

    2回答

    我每週運行一次報告,我必須採取的一個步驟是刪除包含某個短語的行,在我的案例「CFS-GHOST-DJKT」中,在A列中。行通過7開始讀取,並有一個變量結束。 我在網上看了一下,按我發現下面的代碼應該工作,但我得到的和錯誤,它並不像符合細胞(Lrow,「A」) 我相信只要刪除部分去寫就可以,但問題在於選擇方面。 Firstrow = 7 Lastrow = Cells(Rows.Count, "A

    -2熱度

    1回答

    我有2個工作表: 月1日 - 月度數據,在這裏我收集的數據只爲1個月(1〜12) 第二 - 由月每年數據(對於每個月12個表) 我需要宏將從每月片每年片根據一個月複製數據。例如,如果是9月份,它會複製到每年表格中的9月份表格。 如果十月到十月表在每年單等。我如何使用宏實現它(想要創建按鈕:單擊並複製)。

    0熱度

    1回答

    (使用Windows 10和MS Word 2016年全球模板是:Normal.dotx和Autoload.dotm附加的模板有些文檔是:Reference.dotx) 大家好, 我在VBA中獲取文檔的附加模板時出現問題。 我有一個全局模板,當我加載MS Word時調用Autoload.dotm。但是,對於某些特定的文檔,它們使用附加的模板,而不是全局模板(Autload.dotm)或常規模板(N

    0熱度

    1回答

    我在Excel中開發一個工具,在這裏我使用幾個宏。大約在一個月前,當我試圖在Excel 2016中打開文件時,啓用宏時出現「無響應」。在那之前就沒事了。而且,當發生這種情況時,我過去3個月保存的所有文件都不能正常工作。 有沒有人有任何想法,這可能是什麼原因? 我使用一些用戶表單,例如要求輸入密碼的文件,由workbook_open()子打開。

    1熱度

    2回答

    我正在添加所有邊界到一定的範圍,在我的情況下(A6:O6),在Excel VBA中,下面的代碼工作,但我會想象必須有一個更短的方式來寫它。我發現了一行代碼,它在整個選區周圍放置一個邊界,但不在每個單元格周圍。 Range("A6:O6").Select Selection.Borders(xlDiagonalDown).LineStyle = xlNone Selection.

    0熱度

    1回答

    我想將所有邊框添加到我擁有的標題下面的內容。範圍將從A7到Ox,其中x是最後一行內容。列出的代碼的第一部分查找CFS-GHOST-DJKT並刪除完美工作的行。我不確定如何正確選擇較低的結尾行。 Dim x As Long For x = Cells(Rows.Count, "A").End(xlUp).Row To 7 Step -1 If Cells(x, "A") = "CFS-G

    0熱度

    1回答

    我想從SysListView32使用LVM_GETITEMTEXT獲取數據,但我只是得到一個空字符串。它給我的字符數,但不顯示實際的文字。任何人都可以幫忙嗎?代碼如下 Private Const LVM_FIRST As Long = &H1000 Private Const LVM_GETITEMTEXT As Long = (LVM_FIRST + 45) Private Type LV

    0熱度

    2回答

    我使用定義爲Variant的1d數組填充單元格。這個數組中的所有3個變量都是公共字符串變量。有時候變量是VbNullString,並且像數組一樣。 不幸的是,在Excel中選擇與VbNullString值相對應的空單元格時,它們被計爲非空白,並且= IsBlank()函數返回false。從VBA的直接窗口的檢查不能在例如細胞檢測什麼: ?"check" & range("f4").Value &