お世話になります。
EXCEL2003(32bit版)で正常に動作していたマクロがEXCEL2010(64bit版)でエラーになります。
Win32API関連は修正したつもりです。
具体的には,以下のモジュール内のSelection.OnAction=sMacNameで
実行エラー'1004';
ButtonクラスのOnActionプロパティを設定できません。となります。
sMacNameの引数が正確にきていることは確認済みです。
どなたか教えてください。
よろしくお願いします。
Function Add更新ボタン(sht As Worksheet, sMacName As String, xpos As Double, ypos As Double)
sht.Buttons.Add(xpos, ypos, 75, 50).Select
Selection.OnAction = sMacName ←ココでエラーになります!
Selection.Characters.text = "更新"
Selection.Placement = xlFreeFloating
With Selection.Characters(Start:=1, Length:=2).Font
.name = "MS Pゴシック"
.FontStyle = "標準"
.size = 16
.Strikethrough = False
.Superscript = False
.Subscript = False
.OutlineFont = False
.Shadow = False
.Underline = xlUnderlineStyleNone
.ColorIndex = xlAutomatic
End With
End Function
No.1ベストアンサー
- 回答日時:
こちら(Win7 Excel2010 64bit)ではエラーになりません。
もしかしたら、そちらでも新規ファイルで質問のコードだけを試したら
エラーにはならないのでは?
※確認はイミディエイトウィンドウで
?Add更新ボタン(worksheets(1),"aaa",100,100) としました。
ご参考まで。
nicotinism様
アドバイス,ありがとうございます。
おっしゃるとおり,エラーに関連したコードだけで
流れるかデバックしてみます。
ありがとうございました。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) VBAでファイルを開くプログラムがエラーです 2 2023/02/21 16:56
- Visual Basic(VBA) excel vbaでvlooupの変数がわかりません。 7 2022/05/30 09:35
- Visual Basic(VBA) エクセルのマクロについて教えてください。 7 2023/07/04 09:18
- Visual Basic(VBA) エクセルのマクロについて教えてください。 3 2023/02/22 08:53
- Visual Basic(VBA) パーソナルXLSBのfuctionを呼び出すと「Functionが定義されていません」のエラーになる 2 2022/08/22 22:51
- Visual Basic(VBA) 【VBA】写真の貼り付けコードがうまく機能しません。 5 2022/09/01 18:43
- Visual Basic(VBA) 【Excel VBA】自動メール送信の機能追加 5 2022/09/29 12:53
- Visual Basic(VBA) エクセルのマクロを使ってメールを送る方法について教えてください 2 2022/03/29 01:36
- Excel(エクセル) VBA オリジナル関数で選択セルの合計を作成したい 3 2023/03/19 19:45
- Visual Basic(VBA) 別シートから年齢別の件数をカウントしたいの続き 5 2023/01/24 00:16
このQ&Aを見た人はこんなQ&Aも見ています
関連するカテゴリからQ&Aを探す
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
UserForm1.Showでエラーになり...
-
String""から型'Double'への変...
-
文字列内で括弧を使うには
-
VBAでfunctionを利用しようとし...
-
マクロで"#N/A"のエラー行を削...
-
VBA データ(特定値)のある最...
-
【VBA】ワークブックを開く時に...
-
実行時エラー 438 の解決策をお...
-
On ErrorでエラーNoが0
-
「実行時エラー '3167' レコー...
-
ApplicationとWorksheetFunctio...
-
paizaで下記コードを提出すると...
-
実行時エラー'-2147467259(8000...
-
【VBAエラー】Nextに対するFor...
-
エクセルVBA 「On Error GoTo...
-
VB.net 重複チェックがしたいです
-
error C2664: 'LPCTSTR' に変換...
-
VB2008 comboboxを連動させた...
-
インポート時のエラー「データ...
-
お助けください!VBAのファイル...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
UserForm1.Showでエラーになり...
-
String""から型'Double'への変...
-
マクロで"#N/A"のエラー行を削...
-
VBAでfunctionを利用しようとし...
-
文字列内で括弧を使うには
-
実行時エラー 438 の解決策をお...
-
エクセル関数を教えてください
-
On ErrorでエラーNoが0
-
お助けください!VBAのファイル...
-
VBA データ(特定値)のある最...
-
【VBA】ワークブックを開く時に...
-
インポート時のエラー「データ...
-
実行時エラー'-2147467259(8000...
-
マクロの「SaveAs」でエラーが...
-
WindowsでのPythonの挙動について
-
ApplicationとWorksheetFunctio...
-
Excel vbaについての質問
-
エクセルVBA 「On Error GoTo...
-
Filter関数を用いた結果、何も...
-
ACCESSで値を代入できないとは?
おすすめ情報