【问题标题】:Need a VBA code. rename sheets from list需要 VBA 代码。从列表中重命名工作表
【发布时间】:2015-06-11 21:53:44
【问题描述】:

需要 VBA 代码。从列表中重命名工作表

我在工作表 2 单元格 w3 到 w22 中有一个姓名列表。我需要从名称列表中命名工作表/标签 3 至 22。名字变了。 如果在 w3 到 w22 中没有名称。我希望标签编号为 1 到 20 有任何想法吗?

【问题讨论】:

  • Stack Overflow 是一个社区运营的网站,程序员可以在其中回答有关特定编码问题的问题。不幸的是,要求社区提供给定一组规范的代码的问题超出了本网站的范围。请参阅how to askhelp center 了解所有详细信息。

标签: vba table-rename


【解决方案1】:
    Dim MyCell As Range, MyRange As Range, Dim i As Integer 

    Set MyRange = Sheets("Summary").Range("w3") 
    Set MyRange = Range(MyRange, MyRange.End(xlDown)) 

    For Each MyCell In MyRange 
    If MyCell.Value IS NULL
    Sheets(Sheets.Count + 3).Name = i
    Sheets(Sheets.Count + 3).Name = MyCell.Value ' renames the new worksheet 
    Next MyCell 

或者类似的事情,我没有测试它,因为你没有给我们任何东西来解决或自己努力解决它。 http://en.kioskea.net/faq/27361-excel-a-macro-to-create-and-name-worksheets-based-on-a-list 感谢这个网站给了我一个基础。

【讨论】:

  • 是的,我可能有点跛。只是似乎无法弄清楚。谢谢你的回答。
  • 没关系,只需阅读 Mat's Mug 发送给您的链接,它将帮助您学习如何提出更好的问题。每个人都必须学习和实践:)
猜你喜欢
  • 1970-01-01
  • 1970-01-01
  • 1970-01-01
  • 1970-01-01
  • 1970-01-01
  • 1970-01-01
  • 2017-05-12
  • 1970-01-01
  • 2016-07-20
相关资源
最近更新 更多