2020-06-01から1ヶ月間の記事一覧

ブック内の各シートに対する目次シート作成

1 For Eachの各シートからの戻りは,sheet(1)から順に終わりまで.順番は保障されているわけではない.戻る順番はコレクションオブジェクトにに依存するらしい。 VBA For Eachが順番を保証しない理由を自作のコレクションで説明 - t-hom’s diary sheetsコレ…

エビデンス貼付Take4

Option Explicit '** '* 画像貼付のセル結合対応版 '* 貼付順をコントロールするためにファイル名に数字をふること '* 画像があったら,そのセルを飛ばして下のセルに貼る. Sub 画像貼付12() ' Application.ScreenUpdating = False '前提:MicroSoft Script…

エビデンス貼付マクロその3

1 その3の経緯 その2では画像があったら勝手に消した.さすがに乱暴なので,消すか消さないか選択できるようにしようかと考えたが,画像があったらジャンプして下に行けばよいことに気付いた. 2 コード (1)同一フォルダ内の画像を貼付 '** '* 画像貼付…

イベントのOnOffをボタンで切り替える.

1 目的 特定のイベントのオンオフを切り替えるワンタッチで切替えつつ,現在オンなのかオフなのかが分かるようにしたい.そこで,ボタンを設置して,ボタンの表示をその都度変えることにする. 2 コード 開発タブ,挿入,フォームコントロール,から「ボタ…