Powerquery: Naming Worksheet Tabs

[numberpro11]

Hello,

After doing my data transformation, when I load and save, I would like each worksheet to be named the same as the name of the query. It is really tedious having to double click and name them again, when it's the same name as the query. Is there a way to do this?

I'm using Excel 2010, and pretty much a beginner in power query, so not knowledgeable about M.

Thanks for any suggestions!

 

[Matt Allington]

Why do you want your worksheets named the same as the table? If you need this, then you will have to use vba. The sheet and the table are separate objects

 

[MarcelBeug]

You can use the following vba code as worksheetcode (in VBA editor (alt-F11) - select "ThisWorkbook" - view code (F7) and paste the following code:

Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)
    On Error Resume Next
    If Sh.ListObjects.Count = 1 Then Sh.Name = Sh.ListObjects(1).Name
    
End Sub

If you want the Sheet name to be changed when you change the name of the query, the following code will run once you select another worksheet:

Private Sub Workbook_SheetDeactivate(ByVal Sh As Object)
    On Error Resume Next
    If Sh.ListObjects.Count = 1 Then Sh.Name = Sh.ListObjects(1).Name
    
End Sub

Note: while testing, I noticed that the table name from the query is adjusted only once.
Any subsequent queryname changes are not reflected in the table name, unless you close and reopen the workbook first.