シート名の最初の8文字だけを置き換えます
SMuneeb 解決済
最終更新日:2021-07-17 22:30
こんにちは
私は、ワークブックの望み8文字のシート名の最初の8文字だけを置き換える方法を尋ねたいと思います.
同様に、シートの名前は「2020年12月の固定具」であり、「2021年6月フィクスチャ」に変更したいと思います.
2020年12月2020年12月2020年12月、2020年12月の輸出、12月2020年12月のシール名があります
そして、ワークブックのすべてのシートを変更したいです.
ワークシートとしてDIM WS
次の
ActiveWorkbook.Worksheetsの各WSについて
ws.nameのような "dec 2020*"
の場合は終了
次のWS
ありがとう
Muneeb
返信リスト(回答:3)
2 #
SMuneeb
私はこのマクロを試してみましたが解決できませんでした.
サブレネームシート()
ワークシートとしてDIM WS
ワークシートの各WSについて
左(ws.name、8)= "dec 2020"
ws.name= "2021年6月"&左(right(ws.name)、len(ws.name)-8、len(ws.name))
の場合は終了
次のWS
終了SUB
ありがとう
Muneeb
3 #
Lz. 1
こんにちは
サブレネームシート()
薄暗いWS. ワークシートとして
このWorkbook.Worksheets
の各WSについて左(ws.name、8)= "dec 2020"
ws.name=置換(ws.name、 "dec 2020"、 "2021" ")
の場合は終わります次の
終了SUB
(私はVBA男性ではありません)
√