2010/05/16

VBAの画面描画を停止する方法

›
Sub NoDrawingSample() With Application .ScreenUpdating = False ' 画面描画を停止する ' .Calculation = xlCalculationManua...
2010/05/03

Excelのシートをまとめて再表示する

›
たぶん前の担当者が残したと思うんだけど、勤務先に使えるVBScriptファイルがあったのでメモ。 If WScript.Arguments.Count = 0 Then MsgBox "Excelの非表示シートをまとめて表示するVBScriptです。...
2010/05/02

VBAでシートの有無を確認する

›
任意のシートの有無によって処理を分けたい場合に使えるサンプルコードです。 ' シートの有無を確認する (1) ' Sub ChkSheetSample1() Dim xWsheet As Worksheet Dim xFlag As Boolean Fo...
1 件のコメント:
2010/05/01

VBAでVLOOKUPを使う

›
前回 はVLOOKUP関数についてでしたが、今回はVLOOKUP機能をVBAで使うサンプルを書きます。サンプルコードを実行すると、←のようにダイレクトにVLOOKUPの結果が挿入されます。
1 件のコメント:
2010/04/30

VLOOKUPで#N/Aエラーを表示させない

›
VLOOKUP関数を使うと、縦型の表からデータを探すことができます。（横型の検索はHLOOKUP関数） 関数の書式は以下のとおりです。 = VLOOKUP（検索値，検索する範囲，列番号，検索の型） 画像は、A1～C8の表からデータを探す例です。E2セルに任意のIDを入れ...
2010/04/29

Google Suggest の検索候補を取得する

›
Google の検索枠に文字を入力すると、↓のように検索キーワードの候補が表示されますが、これはGoogle サジェストという機能によって提供されています。 この機能は、Google Suggest API として一般に公開されているので手軽に利用できます。今回は、VBAで...

VBAで最終行、最終列を取得する

›
' 最終行の取得 ' MaxRow = Cells(Rows.Count, 1).End(xlUp).Row ' 最終列の取得 ' MaxCol = Cells(1, Columns.Count).End(xlToLeft).Column 最...