submacro1()dimxrngasrange,firstrngasrangeifleft(range("a1"),3)="d1["thensetfirstrng=range("a1")elsesetfirstrng=cells.find("d1[")endifsetxrng=cells.find("d1[",firstrng)ifxrngisnothingthenmsgbox"沒有了"elsemsgboxxrng.rowendifendsub。
@vievo
頂0
加入收藏
相關問答推薦