[原创]VBA实现自制进度条的几种方法

macross929

没有看到附件阿

zhengrui-csb

能传个例子吗？虽说简单 但也不会

zhengrui-csb

如此深奥的东西 再不让看代码 ……共享一下

ychsywxpxx

班号变班级代码
="1"&left(b2,1)&"0"&mid(b2,2,1)
aaaaaaaaaaaaaaaaaaaaaaaaaaaaaa
班号变班级名称
="小"&IF(LEFT(b2,1)="1","一",IF(LEFT(b2,1)="2","二",IF(LEFT(b2,1)="3","三",IF(LEFT(b2,1)="4","四",IF(LEFT(b2,1)="5","五",IF(LEFT(b2,1)="6","六",""))))))&"0"&MID(b2,2,1)&"班"
aaaaaaaaaaaaaaaaaaaaaaaaaaaaa
="二（"&MID(B2,2,1)&"）班"
aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa
班号升级1
=IF(LEFT(A2,1)="1","2"&RIGHT(A2,3),IF(LEFT(A2,1)="2","3"&RIGHT(A2,3),IF(LEFT(A2,1)="3","4"&RIGHT(A2,3),IF(LEFT(A2,1)="4","5"&RIGHT(A2,3),IF(LEFT(A2,1)="5","6"&RIGHT(A2,3),IF(LEFT(A2,1)="6","7"&RIGHT(A2,3)))))))
aaaaaaaaaaaaaaaaaaaaaaaaa
班号升级2
=VALUE(LEFT(A2,1))+1&RIGHT(A2,3)
aaaaaaaaaaaaaaaaaaaaaaa
文化户口册填年级
=IF(G6<>"","一",IF(H6<>"","二",IF(I6<>"","三",IF(J6<>"","四",IF(K6<>"","五",IF(L6<>"","六",""))))))

zhengrui-csb

想学 但没人教我 求高手指点

天生我材

学习一下，VBA的用处

flydove

附件删除了吗？

股评家

下来看看   seeeeeee

沙漠小鸟

附件上哪去了?

幽幽清风

附件了?上个给我.