Few improvements : Define the sheet in which you work (change Sheet's name in the line Set wS = ... Use of With; Use of Select Case and Like ...
確定! 回上一頁