老師,vba代碼助手安裝以后,提示 運(yùn)行錯(cuò)誤'91'
未設(shè)置對(duì)象變量或with block 變量,
然后就打不開(kāi)保存導(dǎo)入導(dǎo)出代碼的窗口
老師我哪里操作錯(cuò)了嗎?
![]() ![]() 學(xué)習(xí)達(dá)人
|
abdukuddus13
展開(kāi)
|
![]() |
pop0937
展開(kāi)
老師我寫(xiě)的,請(qǐng)指教 無(wú)開(kāi)關(guān),因字?jǐn)?shù)不夠
Private Sub Test()
Dim a As Range, n
For Each a In Range("f1", [f1].End(xlDown))
a.Select
n = 1
For n = 1 To Cells.Find("*", Cells(1, 1), xlValues, xlWhole, xlByRows, xlPrevious).Row
If a.Value = a(n, 1).Value Then
a.Resize(n, 1).Merge
Else: Exit For
End If
Next
n = 1
Next
End Sub |
![]() |
東風(fēng)風(fēng)行汽車(chē)劉巍
展開(kāi)
|
![]() |
鄭廣學(xué)老師
講師
展開(kāi)
|
![]() ![]() 學(xué)習(xí)達(dá)人
|
lufvip
展開(kāi)
|
承擔(dān)因您的行為而導(dǎo)致的法律責(zé)任,
本站有權(quán)保留或刪除有爭(zhēng)議評(píng)論。
參與本評(píng)論即表明您已經(jīng)閱讀并接受
上述條款。