Macro to use tab that is in front

[bklabel1]

I have ordinary VBA code shown below. I'm only showing the code because it is just every day kind of stuff. It works on a specific sheet fine. I want to know how to have it run against which ever Tab/Sheet is in front.
I want the code to run on the active tab. Maybe its called the active sheet.

I tried searching the forum but I couldn't narrow it down.

Best and thank you,

Kevin


'Fill array with values. One letter per location.
For row = 2 To 300

rowContents = Cells(row, 1).Value
colContents = Cells(row, 2).Value
length = Cells(row, 3).Value
field = Cells(row, 4).Value
OutputText = Cells(row, 5).Value

'Truncate data according to length. Maybe it could change color on sheet as a warning.
OutputText = Mid(OutputText, 1, length)


For pos = 1 To Len(OutputText)
'Examine the current element in the array



I tried searching the board but too many results came back and I could not tell what I needed.

 

[nemmi69]

I think you want

Sub abc()
Dim Ws As Worksheet

Set Ws = ActiveSheet

'Fill array with values. One letter per location.
For Row = 2 To 300

rowContents = Ws.Cells(Row, 1).Value
colContents = Ws.Cells(Row, 2).Value
Length = Ws.Cells(Row, 3).Value
field = Ws.Cells(Row, 4).Value
OutputText = Ws.Cells(Row, 5).Value

'Truncate data according to length. Maybe it could change color on sheet as a warning.
OutputText = Mid(OutputText, 1, Length)


For pos = 1 To Len(OutputText)
'Examine the current element in the array
Next
Next

End Sub

 

[Fluff]

I want the code to run on the active tab

That's exactly what your code already does assuming it's in a standard module, rather than a sheet module.

 

[bklabel1]

Thank you for reviewing the code, but that was not my question.

The answer I was looking for was that Excel assumes the front sheet is the activeSheet. To guarantee it in the code, put it in front such as:

Length = activeSheet.Ws.Cells(Row, 3).Value

I have not tried it yet, but this is what I was looking for.

Kevin

 

[nemmi69]

Thank you for reviewing the code, but that was not my question.

The answer I was looking for was that Excel assumes the front sheet is the activeSheet. To guarantee it in the code, put it in front such as:

Length = activeSheet.Ws.Cells(Row, 3).Value

I have not tried it yet, but this is what I was looking for.

Kevin

That's basically what mine does. Though with a little more code you can block it setting on a sheet thats' you do not want