View Single Post
  #1   Report Post  
Prets Prets is offline
Junior Member
 
Posts: 11
Default VBA not selecting worksheet with titles

Hi,

I think its the late night but I would like some help with a code which I am struggling with.

To summarise my issue, I need this vba code to look at the worksheets which contains the words ", select a specific cell and paste some words.

Now I have got the last bit working but the main issue is that vba does not select the worksheet which contains ".
If the worksheets are called "testing1", "testing2", etc, I can get vba to work but its when I tell it to look for a sheet name containing "testing.com", it doesnt.

At the moment, the sheets are called , and


Sub ConsolidateHoldings()

Dim mysheet As Worksheet

Sheets("master").Select
Cells.Clear

For Each mysheet In Worksheets

mysheet.Select

If Left(mysheet.Name, 6) Like "testing.com" Then

Range("f2").Select
ActiveCell.FormulaR1C1 = "Hi,"
Range("f4").Select
ActiveCell.FormulaR1C1 = "Please review the data on the left"
Range("f6").Select
ActiveCell.FormulaR1C1 = "If this is incorrect, please advise?"
Range("f8").Select
ActiveCell.FormulaR1C1 = "Thanks"

End If

Next mysheet
Range("A1").Select

End Sub


Hopefully this is an easy fix but I would like some help please.

Thanks
Pri

P.s. sorry, I tried to load the excel file but I couldnt.

Last edited by Prets : February 4th 13 at 10:16 PM Reason: update to request