Location via proxy:   [ UP ]  
[Report a bug]   [Manage cookies]                

タグ

ブックマーク / tks.or.tv (1)

  • Excel:VBA:シートを個別にxlsファイル出力する - mo.ro.雑記

    xlsファイルの複数シートを、個別にxlsファイルとして出力する。 (これも何かを参考にして作成した気がするが...) 出力先は基ファイルと同じフォルダとなる。 未保存のファイルに対し実行するとカレントドライブ直下(C:\とか)に出力されるため注意。 'シートを個別にファイルとして出力する Public Sub OutputSheetFile() Dim intIdx As Integer       '処理用インデックス Dim intWksCnt As Integer    '処理用カウンタ Dim objWks As Object        'シート作成用オブジェクト Dim strWbkNme As String     'Excelワークブック名(拡張子含まず) Dim strWbkDir As String     'Excelワークブック保存場所 Dim

  • 1