[算表] VBA 範圍迴圈相加問題

作者: rd2l4 (唉呦就是那個啊~~)   2015-06-11 14:53:10
軟體:EXCEL
版本:2013
標題寫得很複雜其實我的問題只是一個不知道怎麼刪掉逗點的故事...
A B
1 1
2 1
3 1
4 0
5 0
6 1
7 0
就兩行data
我用VBA尋找B等於1的值當作範圍列(1,2,3,6列),希望可以出來類似這樣的東西:
1:1,2:2,3:3,6:6
1. 目標是對指定列做出一些動作(隱藏或其他),是否有更好的寫法
直接指定row之類的...
2. 如果不行,怎麼把最後的逗點去掉...
已下是我目前菜菜的寫法
Dim hideu As String
Dim i
For i = 1 To 7
If Cells(i, 2) = "1" Then
hideu = hideu & i & ":" & i & ","
End If
Next i
Cells(10, 3).Value = hideu
顯示的結果是
1:1,2:2,3:3,6:6,
不知道怎麼把最後的逗點去掉..
請板友們幫忙看一下,謝謝!
作者: soyoso (我是耀宗)   2015-06-11 15:02:00
最後逗點去掉left(hideu,len(hideu)-1)或是原po在hideu字串累加上改為hideu = hideu & "," & i & ":" & i就可用mid(hideu,2)
作者: rd2l4 (唉呦就是那個啊~~)   2015-06-11 15:07:00
謝謝樓上~~~~~soyoso大人真的是神人一個,非常想拜師啊(跪
作者: soyoso (我是耀宗)   2015-06-11 15:10:00
不敢當,我也在學習中
作者: ericmis (魔流劍)   2015-06-11 22:14:00
s大利害又謙虛
作者: newton41 (Newton)   2015-06-12 07:34:00
可以選出來直接 rows(i) 做動作。
作者: soyoso (我是耀宗)   2015-06-12 07:50:00
但直接rows(i)做動作,如是刪除列delete的話,以原文的迴圈遞增來看,會有問題應以遞減的方式
作者: newton41 (Newton)   2015-06-12 14:53:00
For i =7 to 1 step -1 幫忙補充

Links booklink

Contact Us: admin [ a t ] ucptt.com