私はSSRSを一度も使用していないので、どのようにエクスポートするのかわかりません。 ただし、アプリケーションnew_Workbookイベントを設定して、開いている新しいワークブックをトラップし、SSRSレポートツールの製品である手がかり/機能を確認することができます。
例: 「mySSRS_Report20160628.xlsx」のようにエクスポートして保存すると、「mySSRS_」という文字列を確認することができます。
これを行うには、私の例では$ A $ 2のように、生成されたシートの同じセルに一貫して 'ページ名'を表示させる必要があります。
アドインが必要なので、ワークブックとcAppEventsと呼ばれる新しいクラスモジュールを作成し、その中でこれを置く:
Option Explicit
Private WithEvents app As Application
Private Sub app_WorkbookOpen(ByVal Wb As Workbook)
Dim i As Long
If InStr(1, Wb.Name, "mySSRS_", vbTextCompare) Then
For i = 1 To Wb.Worksheets.Count
Wb.Worksheets(i).Name = Wb.Worksheets(i).Range("A2").Value
Next i
Wb.Save
End If
End Sub
Private Sub Class_Initialize()
Set app = Application
End Sub
そのワークブックのはThisWorkbookモジュールでは、このコを置きますデイン:
Private newApp As cAppEvents
Private Sub Workbook_Open()
Set newApp = New cAppEvents
End Sub
Excelアドインとして保存します。 [ファイル] - [オプション] - [アドイン]をクリックしてアドインを管理し、ファイル名のボックスにチェックを入れます。
「mySSRS_」という文字列を含む名前のワークブックを開き、セル$ A $ 2のデータ。 あなたは考えを得る....
ありがとう、しかしこれはSSRSから成し遂げなければならないので、適用できません。 Excelファイルは、SSRSによって提供される「エクスポート」オプションを使用して作成されます。それはおそらく不可能です、私はストローで握っていただけです。 –