Can someone check my VBA code? Auto pivot table refresh and sheet name change

[mnmgal]

Hi,
Can someone please check my VBA code? I only have 2 components, one to change the sheet name to match cell C114 and the other to automatically refresh the pivot table when the source data changes (theyre both on the same sheet). Thank you

Private Sub Worksheet_Change(ByVal Target As Range)

ActiveSheet.Name = ActiveSheet.Range("C114").Value


Application.EnableEvents = False

ThisWorkbook.RefreshAll

Application.EnableEvents = True

End Sub

 

[DanteAmor]

Hi @mnmgal and welcome to MrExcel.

What is the problem with your code?

For it to work automatically, the code must be in the events of the sheet, for that you must do the following: Right click the tab of the sheet you want this to work, select view code and paste the code into the window that opens up.

That way the code will be executed every time you modify any cell in the sheet.