ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   Worksheets (https://www.excelbanter.com/excel-programming/444016-worksheets.html)

MB1

Worksheets
 
I'm new to VBA and programming, so be gentle!

I am trying to get a match for a string on one of my worksheets. With
the example below if the BTRT Winter 0809 sheet is manually
preselected then the statement works fine, however if another sheet
has been selected it doesn't work. Also if I use:
Workbooks("TaxCalculator").Worksheets(btrt).Activa te prior to the
statement it also works.

Dim btrt As String
btrt = "BTRT Winter 0809"

logBookArray(3) =
Workbooks("TaxCalculator").Worksheets(btrt).Applic ation.Match(logBookArray(1)
& logBookArray(2) & "346 ", Range("A1:A200"), 0) '.Offset(0, 1).Value

Any ideas?

Dave Peterson[_2_]

Worksheets
 
I'd try qualifying the Range("A1:A200") to make sure it referred to the sheet
you want.

Should it be:
Workbooks("TaxCalculator").Worksheets(btrt).Range( "A1:A200")
????

On 12/15/2010 04:38, MB1 wrote:
I'm new to VBA and programming, so be gentle!

I am trying to get a match for a string on one of my worksheets. With
the example below if the BTRT Winter 0809 sheet is manually
preselected then the statement works fine, however if another sheet
has been selected it doesn't work. Also if I use:
Workbooks("TaxCalculator").Worksheets(btrt).Activa te prior to the
statement it also works.

Dim btrt As String
btrt = "BTRT Winter 0809"

logBookArray(3) =
Workbooks("TaxCalculator").Worksheets(btrt).Applic ation.Match(logBookArray(1)
& logBookArray(2)& "346 ", Range("A1:A200"), 0) '.Offset(0, 1).Value

Any ideas?


--
Dave Peterson


All times are GMT +1. The time now is 07:40 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com