看板 [ Office ]
討論串[算表] 某欄位的值小於10就自動刪除某一行的問題
共 2 篇文章
首頁
上一頁
1
下一頁
尾頁

推噓1(1推 0噓 2→)留言3則,0人參與, 最新作者kan2001kimo ( 4X)時間15年前 (2011/02/06 17:00), 編輯資訊
0
0
0
內容預覽:
Sub A1(). Dim e As Integer. e = Cells(1, 1).End(xlDown).Row. For i = 1 To e. f = Cells(i, 1).Value. If Application.And(f < 5, f <> "") Then. Cells(i,
(還有157個字)

推噓0(0推 0噓 0→)留言0則,0人參與, 最新作者dgun (Dgun)時間15年前 (2011/02/06 16:25), 編輯資訊
0
0
0
內容預覽:
軟體: excel. 版本: 2003. Sub marco(). For i = 1 To 50. With Cells(i, 1). If .Value < 10 Then Rows((i) & ":" & (i)).EntireRow.Delete Shift:=xlUp. End With.
(還有74個字)
首頁
上一頁
1
下一頁
尾頁