submacro1()dimxrngasrange,firstrngasrangeifleft(range("a1"),3)="d1["thensetfirstrng=range("a1")elsesetfirstrng=cells.find("d1[")endifsetxrng=cells.find("d1[",firstrng)ifxrngisnothingthenmsgbox"没有了"elsemsgboxxrng.rowendifendsub。
@vievo
顶0
加入收藏
相关问答推荐