Range Mismatch

D

davegb

I'm writing a small test macro to create folders for Excel files to be
placed in.
I've put the folder names in cells a2:a4. I put the path to the new
folders in C1. here is the code:

Sub MkDirTest()

Dim CtyRange As Range
Dim myCell As Range

Set CtyRange = Range("a2:a4")
For Each myCell In CtyRange.Cells
MkDir Range("c1").Value & Range("A2:a4").Value
Next

End Sub


I'm getting a "Type Mismatch" error when I run the macro on the "MkDir
Range...." line. Can't figure out why? any ideas? Thanks for the help.
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

Create Sheets from a Range and Copy Data on copy Data on newlycreated Sheets with the Sheet Names 2
VBA set thick borders around non empty cells in range 0
Scattered array cells copy to scattered array cells another workbook 14
Array coding type mismatch 6
Sheet to sheet code Type Mismatch 6
Code to delete names works in one WB, but not another WB? 2
Inputbox information sent to cell A2 2
Macro fails in different WB 3

Top