VBA マクロ実行ボタンをクリックする

Quick Edit Pencil
マクロ実行ボタン(フォームコントロール) 
Private Sub フォームコントロールのボタンを捕らえる()

'    ActiveSheet.Shapes ("情報取得ボタン")
    Dim btn As Button
    Set btn = ActiveSheet.Buttons(2)
    Debug.Print btn.Caption
    
End Sub

コマンドボタン(ActiveXコントロール ※古いバージョンのOfficeでは「コントロールツールボックス」)
'Application.Run "'集計.xls'!速報"
'Application.Run "'" & ActiveWorkbook.Path & "\" & ActiveWorkbook.Name & "'!入力.情報取得ボタン"
'Application.Run "'集計.xls'!速報取得"
Application.Run "'集計.xls'!Sheet1.ボタン 1_Click"
'Application.Run "'集計.xls'!情報取得ボタン"

Dim ws01 As Worksheet
Set ws01 = Worksheets("入力")

このブログの人気の投稿

旧エッジの閲覧履歴を検索 MS Edge

blender Curve Deform

AppleScript 改行 コード 置換

ヤバい!JAPANNEXT WQHD対応 27型ワイド液晶ディスプレイ「JN-IPS2716WQHD」を注文してみた!!!

Blender 辺の交差点に頂点を追加するアドオン