rename the active sheet name after concatenate three criteria in vba

nkashyap3

New Member
Joined
Jun 27, 2019
Messages
17
Hi I am not able to change active sheet based on 3 criteria, I have done with first 2 criteria but third one is not able do do.

1- change tab name according the active workbook
2 should be add MTD in Sheet name
3- Add Month name (MMM) based on next sheet cell value.

Example:- my file name is Neetu and next sheet (sheet name not fixed) Cell C2 value is 8 then my activesheet name should be
(Neetu MTD Aug)

I have done with first 2 criteria but third one is not able do do.


Dim a As String

With ActiveWorkbook
ActiveSheet.Name = Left(.Name, Len(.Name) - 4) & " MTD " & response

End With

Please help
 

Fluff

MrExcel MVP, Moderator
Joined
Jun 12, 2014
Messages
30,569
Office Version
365
Platform
Windows
How about
Code:
Dim Mnth As String

With Sheets(ActiveSheet.Index + 1)
   Mnth = Left(MonthName(.Range("C2")), 3)
End With
With ActiveWorkbook
   ActiveSheet.Name = Left(.Name, Len(.Name) - 4) & " MTD " & Mnth
End With
 

Forum statistics

Threads
1,078,520
Messages
5,340,931
Members
399,399
Latest member
SravanaSandhya

Some videos you may like

This Week's Hot Topics

  • Problem with Radio Button's format control
    I am creating an employee evaluation template (a sample is below) Column A is the category Column B, C D, E and F will be ratings (unacceptable...
  • Last Display on userform to a Listbox
    [CODE=vba] lstdisplay.ColumnCount = 15 lstdisplay.RowSource = "A1:O600000" [/CODE] So when i do this it Displays everything on the sheet i am...
  • Rename and move files to a new location
    Dear all, I have an excel file with the following information. The actual file name is at column A but i want to rename it using the following...
  • Help with True/False Formula
    Hello! Am stumped how to fix this formula, in which my result returns 'True', but it should return False. =IF(AG2=True...
  • Clear extra characters from a provided range of cells
    Dear All, I have following code which gives me desired output to remove extra characters from a provided range. But it takes too much time when...
  • Help with Current and highest streaks
    Hi there, I've just joined the forum and this is my first post. I've already spent quite a bit of time searching the net and this forum for a...
Top