Type Mismatch Error when using InputBox Method

G

Guest

I'm getting a Type Mismatch error and the macro stops at Set myDir (see ERROR
below). Since I'm using a string of numbers, letters and symbols, I
Click to expand...
thought I would select the type as 2 for text. Please help!

Dim myCell, myRange, myDir, myDateTime
Set myRange = Application.InputBox(prompt:="Enter a Range", Type:=8)
ERROR > Set myDir = Application.InputBox(prompt:="Enter File Location",
Default:="U:\CC EB 500 Reports\mmddyy\", Type:=2)
Set myDateTime = Application.InputBox(prompt:="Enter Date and Time",
Default:="mm/dd/yy hh:mm am", Type:=2)
Windows("PERSONAL.XLS").Visible = True
Workbooks("Personal.xls").Activate
Sheets("Sheet1").Select
For Each myCell In myRange
Workbooks.Open Filename:=myFile.Text & myCell.Value
 
G

Guest

Hi,

Remove Set from MyDir and MydateTime


myDir = Application.InputBox(prompt:="Enter File Location", ....

HTH
 

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

InputBox 7
InputBox Method Logic Problem 2
type mismatch error 3
Selecting a Range using Inputbox Method 3
Trying to return Range from InputBox 3
Error 424 with inputbox method after OK 2
Using Arrays in InputBox Method 4
getting and error with autofill ":=" ? 1

Top