|
akamomo さん、 uchu さん、こんばんは。
>早速お答えを頂きありがとうございます。教えていただいた方法でやってみましたが、マクロ記録ではうまくいきますが、記録したマクロを実行すると”列見出しを含むリストまたは選択範囲の行を特定できません。−−−−と表示されうまく動きません。マクロ記録以外に何か+しなければいけないのでしょうか。お手数ですが再度ご教示お願いいたします。
あら、本当ですね、
ごめんなさい。マクロの記録で作成されたものを確認してませんでした。
(手動操作で出来たので、てっきり 大丈夫だと思ってました)。
uchu さんのExcel4Macroだときちんと表示されました!!
ありがとうございます。
Excel4Macroを使わないと出来ないのでしょうかねえ??
Sub testtest()
Const cmbid = 30011
Const btnid = 860
Dim cont As CommandBarControl
Dim btn As CommandBarControl
Range("D11:G11").Select
For Each cont In CommandBars("Worksheet Menu Bar").Controls
If cont.ID = cmbid Then
For Each btn In cont.Controls
If btn.ID = btnid Then
btn.Execute
End
End If
Next
End If
Next
End Sub
無理やりだとこんなコードしか思いつきませんでした。
ExecuteExcel4Macro "DATA.FORM()"
これは、メモメモです。
ありがとうございました。
|
|