Range("Variable") issue - Xtreme Visual Basic Talk

10-01-2010, 10:56 AM

Touks

Newcomer

Join Date: Sep 2010

Posts: 12

Range("Variable") issue

Hello,
Im having an issue of going to a cell that my array holds,

Code:

'putting UserPromptTime  elements into array
Dim iX As Integer
For iX = 0 To (Len(UserPromptTime) - 1)
ColumnArray(iX) = Mid(UserPromptTime, iX + 1, 1)
Next

Now I'm trying to make it go to the cell that the full array is in eg if ZZ3

Code:

Range("ZZ3").select

I tried using the original var as well but no luck

range("userprompttime").select

no luck

any help is welcomed. Ty

10-01-2010, 11:31 AM

Gruff

Bald Mountain Survivor

Super Moderator
* Expert *

Join Date: Aug 2003

Location: Oregon, USA

Posts: 5,877

Kind of tough for us to guess what your sample value inside the string UserPromptTime is. (Assuming it is a string)

Is it numerical or letters?

Also you really should be using: "Optiion Explicit" at the top of your module.
...
The Cells() object has a bit more flexible input than the range object.
Examples:
sCol = "ZZ"
nRow = 3
Cells(nRow,sCol).Select
-or-
nCol = 41
nRow = 6
Cells(nRow,nCol).Select

__________________
Burn the land and boil the sea
You can't take the sky from me

~T

10-01-2010, 12:02 PM

Touks

Newcomer

Join Date: Sep 2010

Posts: 12

Yes userprompt i have as a string. basically i want to
if the input is 2 value eg A5

ColumnArray(0) gets A
ColumnArray(1) get 5

then I make it go to range("A5")

Code:

Sub UserPromptTimeStampLocation()
' Declaring TimeStamp Allocated Variables and prompting user for timestamp colunme
Dim UserPromptTime As String
UserPromptTime = InputBox("Please enter the TIME STAMP start Row and Column location e.g, A5")

' Declare array with length of userpromptTime
ReDim ColumnArray(Len(UserPromptTime))

'putting UserPromptTime  elements into array
Dim iX As Integer
For iX = 0 To (Len(UserPromptTime) - 1)
ColumnArray(iX) = Mid(UserPromptTime, iX + 1, 1)

Next

' putting the individual array into cells
Range("Z1").Value = ColumnArray(0)
Range("Z2").Value = ColumnArray(1)


' Go to R location Z2 and C location Z1
Range("columnarray(0)").Select<-----:( cant do this wish i could!

10-01-2010, 12:28 PM

Bob Phillips Bob Phillips is offline

Contributor

Join Date: Jul 2009

Posts: 506

Why put it in an array, just use the input

Code:

Range(UserPromptTime).Select

10-01-2010, 12:37 PM

Touks

Newcomer

Join Date: Sep 2010

Posts: 12

TY for the help what i did was
Cells(ColumnArray(1), ColumnArray(0)).Select and it worked perfect

The funny weird thing is, I tried Range(UserPromptTime).Select and it refused to work for me. But After trying the method up top, it started working..

TY all for the help