Excel VBA 質問スレッド No.88 (未解決)

ソート時、1台のPCだけエラーが出る

投稿者 : ヘンリー     投稿日時 : 2020/07/08(Wed) 19:10:49     OS : Windows 10     EXCEL : 未指定
NASにマクロ付きエクセルファイルがあります。

ActiveWorkbook.Worksheets(strSheetName).Sort.SortFields.Clear

'以下の部分でエラーが出る
ActiveWorkbook.Worksheets(strSheetName).Sort.SortFields.Add2 _
Key:=Range("L2:L" & Str(lngLastRow)) _
, SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:=xlSortNormal

エラー内容は、"オブジェクトは、このプロパティまたはメソッドをサポートしていません"
です。

しかし、社内LAN上の複数のPCで同じプログラムを実行してもエラーが出ませんが、
1台だけエラーが出ます

[返信 1] Re : ソート時、1台のPCだけエラーが出る
投稿者 : ヘンリー     投稿日時 : 2020/07/09(Thu) 09:04:18
恐れ入ります。
自己回答になりますが、解決出来ましたのでご報告いたします。

Add2メソッドはExcel2016以降で実装されたものだそうで、
エラーの出るPCはExcel2013でした。

ご協力いただき、誠にありがとうございます。


■[質問] ヘンリーさん(2020-07-08 19:10:49)の記事
> NASにマクロ付きエクセルファイルがあります。

> ActiveWorkbook.Worksheets(strSheetName).Sort.SortFields.Clear

'以下の部分でエラーが出る
> ActiveWorkbook.Worksheets(strSheetName).Sort.SortFields.Add2 _
> Key:=Range("L2:L" & Str(lngLastRow)) _
> , SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:=xlSortNormal

> エラー内容は、"オブジェクトは、このプロパティまたはメソッドをサポートしていません"
> です。

> しかし、社内LAN上の複数のPCで同じプログラムを実行してもエラーが出ませんが、
> 1台だけエラーが出ます


スポンサード リンク
 
 
当掲示板について
返信入力フォーム
お 名 前  :
内  容   :
ステータス  : この質問を解決済みにする

認証コード  :
        キャプチャ画像


( 処理日時 : 2020-08-10 16:29:59 )

Page
Top