Range.NumberFormat プロパティ (Excel)
オブジェクトの表示形式を表すバリアント型 (Variant) の値を取得または設定します。 構文 expression.NumberFormat expression は Range オブジェクトを表す変数です。 注釈 指定されたすべてのセル範囲の表示形式が同じでない場合、Null を返します。 表示形式を示す文字列は、[ セルの書式設定] ダイアログ ボックスの [ 表示形式] の文字列と同じです。 この文字列は、NumberFormat プロパティと NumberFormatLocal プロパティで使われますが、Format 関数で使う表示形式とは異なります。 詳細については、 表示形式の書式記号 (Microsoft サポート) を参照してください。 例 次の使用例は、シート 1 のセル A17、行 1、および列 C にそれぞれ表示形式を設定します。 Worksheets("Shee
Workbook.Close メソッド (Excel)
ブックを次の受信者に回覧する必要がない場合 (回覧用紙がないか、既に回覧されている場合)、この引数は無視されます。 それ以外の場合、このパラメーターの値に応じてブックが回覧されます。 True を指定すると、次の受信者にブックが送信されます。 False を指定すると、ブックは送信されません。 この引数を省略すると、ブックを送信するかどうかを確認するダイアログ ボックスがユーザーに表示されます。 注釈 Visual Basic からブックを閉じるとき、ブックの Auto_Close マクロは実行されません。 RunAutoMacros メソッドを使用して、Auto_Close マクロを実行します。 例 次の使用例は、Book1.xls を閉じます。内容の変更は保存しません。 Workbooks("BOOK1.XLS").Close SaveChanges:=False サポートとフィードバ
Office アドイン プラットフォームの概要 - Office Add-ins
Office アドインのプラットフォームを使用すると、Office アプリケーションを拡張し、Office ドキュメント内のコンテンツと対話するソリューションを構築できます。 Office アドインを使用すると、HTML、CSS、JavaScript などの使い慣れた Web テクノロジを使用して、Outlook、Excel、Word、PowerPoint、OneNote、Project を拡張して操作できます。 ソリューションは、Windows、Mac、iPad、ブラウザーなど、複数のプラットフォームにわたって Office で実行できます。 Office アドインでは、ブラウザー内で Web ページが実行できる操作のほとんどすべてを実行できます。 Office アドイン プラットフォームを使用して、次のことができます。 Office クライアントに新しい機能を追加する - 外部データを
Office TANAKA - Excel VBA Tips[正規表現のようなマッチング]
一般的な正規表現に比べると使用できるメタキャラクタの種類は少ないですが、いくつも条件分岐を重ねるよりは効率的にパターンマッチングできるでしょう。いくつか使用例をご紹介します。 上のような住所録で「東京、横浜、千葉ではない住所を赤字」にするには、次のようにします。 Sub Sample1() Dim i As Long For i = 1 To 8 If Cells(i, 1).Value Like "[!東京,横浜,千葉]*" Then Cells(i, 1).Font.ColorIndex = 3 Next i End Sub Like演算子を使わないなら、次のようになりますね。 Sub Sample2() Dim i As Long For i = 1 To 8 If Left(Cells(i, 1), 2) <> "東京" And _ Left(Cells(i, 1), 2) <>
［Excel VBA］ファイルの種類を調べるには？
VBAには、ファイルの種類を調べる関数などがありません。ファイルの種類を調べるには、FileSystemObjectを利用します。FileSystemObjectのFileオブジェクトには、Typeプロパティがあり、ファイルの種類を取得できます。 下のサンプルコードは、Application.GetOpenFilename（）を使って「ファイルを開く」ダイアログを表示させ、そこで選択したファイルの種類を表示するものです。選択したファイルのパスが変数Targetに入るので、このパスをFileSystemObjectのGetFileメソッドに渡すことで、そのFileオブジェクトのTypeプロパティを取得しています。
【EXCEL VBA】フォルダ配下のファイル一覧を再帰的に取得したい
前回の記事ではファイル一覧を取得する際に「fso.GetFolder(path).Files」を使用しましたが、今回はフォルダ一覧も取得する必要があるため「fso.GetFolder(path).SubFolders」も使用します。 サンプルプログラムを確認する（コピペOK） Sub sample() Call getFilesRecursive("C:\Drivers") End Sub Sub getFilesRecursive(path As String) Dim fso As FileSystemObject: Set fso = New FileSystemObject Dim objFolder As folder Dim objFile As file ' GetFolder(フォルダ名).SubFoldersでフォルダ配下のフォルダ一覧を取得 For Each objFo
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く
File オブジェクト