Re: [VBA ] 字段COPY

楼主: LiLiHsien   2013-10-13 02:07:55
'for(int i = 0 ;i < array_A的阵列大小 ; i++)
For i = 1 To 25
'if(i!=0)
If i <> 0 Then
'if(array_A[i] == NULL)
If Cells(i, 1).Value = "" Then
'array_B[i] = Array_A[i-1]
Cells(i, 2) = Cells(i - 1, 1)
Else
'array_B[i] = Array_A[1]
Cells(i, 2) = Cells(i, 1)
End If
Else
'array_B[i] = Array_A[1]
Cells(i, 2) = Cells(i, 1)
End If
Next
以上是我更改大大提供的程式码
不过他在A列空值的状况只能印出两个
且不能达到我有两个同一类需求的时候
A B
1 dog dog
2 cat cat1
3 cat1
4 cat cat2
5 cat2
6 bird bird
7 bird
8 bird
9 bird
A的原有的 , 我想产生B列
若如果A的类别只有一种(dog) , 则B只会依序印出dog
但如果A的类别重复(cat有两个) , 则B会列出cat1,cat1
等碰到A列的另一个cat , B在继续印出cat2,cat2.....
不知这该如何表示
麻烦大大提供一些意见 谢谢 : )
※ 引述《timestoprun (忧郁米虫)》之铭言:
: ※ 引述《LiLiHsien ()》之铭言:
: : 请问各位大大
: : 我想将col A COPY过去 col B
: : 产生方式如下
: : A B
: : 1 dog dog
: : 2 cat cat1
: : 3 cat1
: : 4 cat1
: : 5 cat cat2
: : 6 cat2
: : 7 bird bird
: : 8 bird
: : 9 bird
: : 第一列原有的资料 我想要产生成第二列的dog,cat1,cat2,bird...那些资料
: : A为大类别 , 如果有两个A类则会在第二列呈现A1与A2(cat1,cat2)
: : 请问大大这个语法该如何写?
: : 谢谢 : )
: 刚好没事!!随手写的!!!
: 自己改语法看是VB还是C#巴
: for(int i = 0 ;i < array_A的阵列大小 ; i++)
: {
: if(i!=0)
: {
: if(array_A[i] == NULL)
: {
: array_B[i] = Array_A[i-1];
: }
: else
: {
: array_B[i] = Array_A[1];
: }
: }
: else
: {
: array_B[i] = Array_A[1];
: }
: }

Links booklink

Contact Us: admin [ a t ] ucptt.com