Help with if...then

[brownnr]

I have code that will find and list subfolders, I need help writing an if...then...else statement that basically says if the subfolder is already listed, don't add it to list, if not, then add at end of list. I've tried all I could, but I don't think I'm putting it in the right place in the code, or something. Here is my code:

'Lists Folders '
    Worksheets(1).Activate
    Dim row As Integer
    Dim SearchFolders As Variant
    row = 3
    LookInTheFolder = "I:\projects2\Koch\58MY8900\PROCESS\2013 Work (Phase 3)\DIH_Sulfolane\Equipment"
    Set FileSystemObject = CreateObject("Scripting.FileSystemObject")
    For Each SearchFolders In FileSystemObject.GetFolder(LookInTheFolder).SubFolders
    Cells(row, 1) = Mid(SearchFolders, InStrRev(SearchFolders, "\") + 1)
    row = row + 1
    Next SearchFolders

Thanks!

 

[Solosideshow]

Nevermind, Jim your code worked, thank you both for your help!!

Solosideshow.....GO ARMY!

lol...
Clean up crew...
Enjoy mate.. sorry not much help.. couldn't really test it all at...

 

[brownnr]

Thanks, I don't know how you can do all that just by thinking! I need more practice!

We only clean up what the bullet catchers couldn't get...

 

[jamcall]

Nevermind, Jim your code worked, thank you both for your help!!

Solosideshow.....GO ARMY!

Glad we could assist.

GO Coast Guard!!!

 

[Solosideshow]

Thanks, I don't know how you can do all that just by thinking! I need more practice!

We only clean up what the bullet catchers couldn't get...

here is a funny story I was working for pizza hut and just signed into the corps. And i delivered to a Army recruiter. i told him, "I just swore in and signed for the corps". He responded, "Di you think about jioning the army?".
"no, sir".
"why not?"
"all my friends are in the army"
"doesn't that tell you somthing about the army!"
"yes, sir. It's to easy to get into the army"

And the Coast guard is one i respect and wanted to join but was only going to if a buddy was signing with me. he chickened out at didn't want to join the armed forces.

 

[EPURON]

I do Co-op using Excel and VBA is a boost to me. I know your at work but when you have the time to yourself you should really check out hes videos. Helped me out alot