VBA Code to Rename Folders

Quote:

---

snb's code won't work with Option Explicit, but it will rename all your files really fast. To use it, just comment out the "Option Explicit" line.

---

ergo...

Here we raise the valid question (imo) of using a non 'Option Expicit' environment..

Why.. Why not?

Whilst, i to, do try to Dim my variables.. I am felling that it is to appease traditionalism.. rather than for any logical purpose in today's context..

Having said that.. I may be wrong.. doin the best to work it out.. :)

Quote:

---

Here we raise the valid question (imo) of using a non 'Option Expicit'_(sic) environment..

---

When you're as proficient as snb, you don't need it.

When you're as bad a typist as I am, it is a must have item. Without it, "Expicit" and "Explicit" are two different valid variables, your code might not even raise an error, but still won't produce the right result; With it, VBA will tell me exactly where I goofed.

Which raises the question; "Why should you avoid using "Option Explicit," AKA, the VBE Spell Checker?

When I try to run that I get error message "run-time error '13', type mismatch. Any idea? It tries to debug the code below

If Dir(sn(j, 1), 16) <> "" And Dir(sn(j, 3), 16) = "" Then

You will see with:

Code:

---

msgbox j
msgbox sn(j,1)
msgbox sn(j,3)
If Dir(sn(j, 1), 16) <> "" And Dir(sn(j, 3), 16) = "" Then

---

When I execute that code, three message boxes pop up (as would be expected). The first box, from code "j" delivers a message box that reads "1". The second message box delivers "old name", and where I'm having trouble is that the third message box doesn't deliver "new name" as would be expected. Rather, it delivers a blank message box. Why?

Think about lines 2 and 3 of that code and compare it to the columns in your workbook.

BTW, j = Row number