Previous Topic Next Topic

Macro only for Alphabetic Sheets

Solved/Closed
smuneeb Posts 67 Registration date Saturday September 5, 2015 Status Member Last seen March 8, 2017 - May 28, 2016 at 03:13 PM
smuneeb Posts 67 Registration date Saturday September 5, 2015 Status Member Last seen March 8, 2017 - Jun 3, 2016 at 09:10 AM
Hello,

I would like to request for a Macro which will run only for those sheets where Names started with Alphabets from A to Z

Thanks & Regards

1 response

Answer 1 / 1
TrowaD Posts 2921 Registration date Sunday September 12, 2010 Status Moderator Last seen December 27, 2022 555
Jun 2, 2016 at 11:33 AM
Hi Smuneeb,

Try the following code, where you enter your code where the green text is: 
Sub RunMe()
Dim ws As Worksheet
Dim CheckNum As Double

For Each ws In Worksheets
    ws.Select
    On Error GoTo MyCode
    CheckNum = Left(ws.Name, 1)
Next ws

Exit Sub
MyCode:
'Your code here
Resume Next

End Sub


Best regards,
Trowa
smuneeb Posts 67 Registration date Saturday September 5, 2015 Status Member Last seen March 8, 2017 1
Jun 3, 2016 at 09:10 AM
Hi
TrowaD
Highly appreciable for your work

Thanks & Regards

Similar discussions

macro to compare two excel sheets
annajins -
Aks -

Hello,


I need help to write macro to compare two sheets, sheet1 and sheet2 on same excel book and display the result on the third sheet.

The number of rows and columns may not be equal and it can vary each time. So, we need to find the range of columns and rows first. I am struggling with this.

I tried the following code to compare the values,
Sub Macro7()
'
' Macro7 Macro
' Macro recorded 12/11/2008 by UBOC User
'
'
Range("A2").Select
ActiveCell.FormulaR1C1 = _
"=IF(SIT!RC=PPE!RC,"" "",CONCATENATE(SIT!RC,"" - "",PPE!RC))"
Range("A2").Select

6 responses
Automatically Run Macro from a calculated cell value change
smiller -
TrowaD -

Hello,

I am not having any luck using this code(and haver tried others).

Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address = "$V$4" Then Call VALIDATION_LOOKUP End If End Sub

I need to automatically start a Macro then the value of a cell that contains a calculation changes.

Thanks

1 response