[VBS]すべてのシートの名前を取得するExcel

2018年11月8日#excel #vbscript70

AI 翻訳

この記事はAIを通じて中国語から日本語に翻訳されました。原文を表示

AI が生成した要約

这篇文章介绍了如何使用VBS脚本在Excel中获取所有Sheet的名称。第一种方法是在当前Sheet中使用公式来获取当前Sheet的名称。第二种方法是使用VBS脚本在当前Sheet中获取Workbook下所有的Sheet名称。

1. 現在のシートで現在のシート名を取得するには、任意のセルを選択し、式を編集します。

=MID(CELL("filename",A1),FIND("]",CELL("filename",A1))+1,255)

2. 現在のシートで Workbook のすべてのシート名を取得するには、alt+f11 のキーボードショートカットを使用して vbe エディタに入り、新しいモジュールを挿入し、以下のコードを入力します。

Sub Maco1()
For i = 1 To Sheets.Count
Cells(i, 1) = Sheets(i).Name
Next
End Sub

その後、指定したマクロを実行すると、現在のシートで取得できます。