Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


27393 / 76732 ←次へ | 前へ→

【54660】Re:オブジェクトを選択状態でmsgbox表示
発言  Jaka  - 08/3/25(火) 15:47 -

引用なし
パスワード
       略
>  Set CBB = Nothing
>  Cbr.Protection = msoBarNoChangeVisible
>  Cbr.Visible = True
  Application.CommandBars.DisableCustomize = True '←追加
>  For Each ooo In ActiveSheet.Shapes
>    ooo.TopLeftCell.Select 'オブジェクトを画面内に表示するため

    略

>  Next
>  Application.CommandBars("図形の削除").Delete
  Application.CommandBars.DisableCustomize = False '←追加
>End Sub

0 hits

【54635】オブジェクトを選択状態でmsgbox表示 ひげくま 08/3/25(火) 10:31 質問
【54638】Re:オブジェクトを選択状態でmsgbox表示 Jaka 08/3/25(火) 11:00 発言
【54639】Re:オブジェクトを選択状態でmsgbox表示 ひげくま 08/3/25(火) 11:04 発言
【54643】Re:オブジェクトを選択状態でmsgbox表示 Jaka 08/3/25(火) 11:33 発言
【54646】Re:オブジェクトを選択状態でmsgbox表示 ひげくま 08/3/25(火) 11:51 発言
【54655】Re:オブジェクトを選択状態でmsgbox表示 Jaka 08/3/25(火) 14:51 発言
【54657】Re:オブジェクトを選択状態でmsgbox表示 ひげくま 08/3/25(火) 14:57 お礼
【54660】Re:オブジェクトを選択状態でmsgbox表示 Jaka 08/3/25(火) 15:47 発言
【54683】Re:オブジェクトを選択状態でmsgbox表示 VBWASURETA 08/3/26(水) 9:14 発言
【54686】Re:オブジェクトを選択状態でmsgbox表示 ichinose 08/3/26(水) 10:30 発言
【54688】Re:オブジェクトを選択状態でmsgbox表示 VBWASURETA 08/3/26(水) 12:02 発言
【54689】Re:オブジェクトを選択状態でmsgbox表示 ichinose 08/3/26(水) 12:38 発言
【54690】Re:オブジェクトを選択状態でmsgbox表示 VBWASURETA 08/3/26(水) 12:56 発言
【54701】Re:オブジェクトを選択状態でmsgbox表示 ichinose 08/3/26(水) 17:32 発言
【54640】Re:オブジェクトを選択状態でmsgbox表示 VBWASURETA 08/3/25(火) 11:06 発言
【54644】Re:オブジェクトを選択状態でmsgbox表示 ひげくま 08/3/25(火) 11:34 発言
【54645】Re:オブジェクトを選択状態でmsgbox表示 VBWASURETA 08/3/25(火) 11:47 発言
【54647】Re:オブジェクトを選択状態でmsgbox表示 ひげくま 08/3/25(火) 11:53 発言
【54648】Re:オブジェクトを選択状態でmsgbox表示 VBWASURETA 08/3/25(火) 11:57 発言
【54649】Re:オブジェクトを選択状態でmsgbox表示 ひげくま 08/3/25(火) 12:01 発言
【54650】Re:オブジェクトを選択状態でmsgbox表示 ひげくま 08/3/25(火) 12:01 お礼
【54651】Re:オブジェクトを選択状態でmsgbox表示 VBWASURETA 08/3/25(火) 12:42 発言
【54682】Re:オブジェクトを選択状態でmsgbox表示 再... ichinose 08/3/26(水) 7:07 発言

27393 / 76732 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free