→Office関連メモ
→Excel関連
→C#によるExcel制御
→Visual Basic(.NET以前)
サブトピック†
Tips†
VSCodeで開発†
添付ファイルをつけてメール†
画面をキャプチャする†
Googleマップ表示†
CSVやExcelにSQLを実行†
マクロの自動実行を抑制†
警告抑制†
Application.DisplayAlerts = False '警告抑制
アドイン関連†
ExcelにGoogle Maps APIで地図を埋め込み、住所検索、拡大/縮小、地図種類変更†
セルの値を文字列として取得したい場合†
Cells(i,j).Text
フィルタ系†
- フィルタをクリアする
ActiveSheet.ShowAllData
今選択しているシート†
- Application.SelectedSheets を参照する
「名前」の全消し†
手っ取り早くExcelシートの一覧を得るには†
[Esc]キーによるExcel VBAの実行中断を防止する†
互換性チェックのダイアログが出るのを抑制†
Excelで特定の値になったときのアクション†
- 特定のセルに特定の値が入力されたときにマクロを自動的に実行するには?
ツリービューコントロール†
VBA コンパイルエラーと実行時エラー†
描画抑制†
Application.ScreenUpdating = false
Excelシートアルファベット順並べ替え†
列幅を合わせる†
'ost は対象シート
ost.Activate
ost.Range(ost.Cells(1, 1), ost.Cells(osr, 8)).Columns.AutoFit
マクロのあるブック†
AddTextBox に渡す座標の渡し方†
プログラムの同期的な実行†
表示倍率を変える†
ActiveWindow.Zoom = 75
印刷設定 右下にページ数を入れる†
ActiveSheet.PageSetup.RightFooter = "&P/&N"
印刷範囲の設定†
ActiveSheet.PageSetup.PrintArea = "$A$1:$N$83" 'A1形式 Rangeではダメです
RangeからA1形式の文字列を得るには†
str = Cells(row, col).Address
Worksheets.AddのAfter引数などで渡すのはシート名ではない†
CSV形式で保存する†
ActiveWorkbook.SaveAs Filename:="hoge.csv", FileFormat:=xlCSV, CreateBackup:=False
ゴールシークを実行させる†
'E3の値が0になるようにB3を変化させる場合
Range("E3").GoalSeek Goal:=0, ChangingCell:=Range("B3")
VBAプロジェクトをロックする†
VBAファイルのデータ構造†