Excelでテンプレートシートを作り、予算申請などを各部署に依頼することがよくある。でも、各担当者がシートを編集する際、誤って変更されては困る情報もある。そこで、データ入力を依頼したいセルだけを編集可能にし、他のセルは保護する、という方法を説明する。 例えば全社予算を立てる場合、各部署から売上予想や経費予想などの情報を収集する必要がある。この際、入力テンプレート用のExcelシートを作成し、それを各部署に配布して、情報を入力して戻してもらう、といったことが一般に行われている。 このExcelシートのテンプレートには、あらかじめ決まったデータ（参考となる過去の実績値など）や数式を挿入しておき、マクロ（VBA）などの機能を使って入力支援や誤入力防止を図ったり、以後の集計処理を容易にしたりするケースが多いだろう。 しかし、あらかじめテンプレートに入力されたデータや数式を、入力者が誤って変更してし
公開日：2014-12-03 最終更新日：2014-12-03 Excel2003(xls)を2007以降(xlsx,xlsm)に変換する（HasVBProject） Excel2003形式(xls)のファイルを、一括でExcel2007以降形式(xlsx,xlsm)に変換するマクロVBAサンプルコードです。 サンプルコードでは、サブフォルダ「Excelファイル」にあるxlsを、 マクロ無しならxlsx、マクロ有りならxlsmにして保存しています。 また、同名のxlsxやxlsmが存在する場合は、日時付きのファイル名にしています。 Sub sample() Dim i As Long Dim strArray() As String Dim strFile As String Dim strPath As String Dim strBook As String strPath = Thi
Google Analyticsのデータを元に『インストラクターのネタ帳』の、月ごとの人気ページ（アクセス数の多い個別記事）をまとめておきます。 ●2013年11月 1位：ドロップダウンリストの作り方 2位：切り捨てしたい・切り上げしたい 3位：生年月日から年齢を計算 4位：縦書きにするには 5位：Excel ショートカットキー一覧 6位：エラー表示しないように 7位：別シートのデータを表示・別シートのセルを参照 8位：複数セルの文字を一つのセルに 9位：IF関数で「○○を含む」の指定 10位：チェックマーク・レ点を入力したい 11位：スペースをすべて削除する 12位：IF関数で複数条件「かつ」を指定 13位：Word 2010で消しゴムは？ 14位：千円単位・百万円単位で表示する 15位：小数点以下を切り捨てる ●2013年10月 1位：ドロップダウンリストの作り方 2位：切り捨てしたい
Excelマクロで、PDFの保存をやってみました。 Sub Macro1() ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _ "c:\\xxx.pdf", Quality:= _ xlQualityStandard, IncludeDocProperties:=True, _ IgnorePrintAreas:=False, _ OpenAfterPublish:=False End Sub ふむふむ。ちなみに、xlTypePDF=0 でした。JScriptでかくと、以下の感じです。 function convertToPDF(sheet, fname) { try { sheet.ExportAsFixedFormat(0/*xlTypePDF*/, fname); } catch (e) { } } 参考) 1
photo credit: gonzalo_ar via photopin cc はじめに このエントリでは、ExcelでUTF-8エンコーディングされたCSVファイルを開く方法を紹介します。 Excel VBAのプログラミングのツボとコツがゼッタイにわかる本―最初からそう教えてくれればいいのに!Excel2007/2003対応posted with amazlet at 12.12.23立山 秀利 秀和システム 売り上げランキング: 1,346 Amazon.co.jp で詳細を見る 結論 以下のような３つの方法があります。 拡張子をcsvからtxtに変更してから開く。 CSVファイルをBOMつきのUTF-8ファイルに保存しなおしてから開く。 CSVファイルの保存形式をANSIに変更してから開く。 ExcelはCSVファイルをShift_JISで開こうとする Excelは、CSVファイル
vab excel の基本は、Range Cells プロパティです。 vba excel range cells 簡単です！ 変換 vba excel rangeと cells プロパティは、相互に変換できます。 Range.Address プロパティ は、番地を表す文字列型 (String) の値を返します。 一方、Cellsプロパティは、一つひとつのセルを返します。 Range(Cells(1, 2).Address)は、Range("A2")を表します。 したがって、 CellsプロパティをRangeプロパティで表すことができ、変換できたことが分かります。 一方、Rows(2) は、アクティブシートの２行目を表す Rangeオブジェクトです。 このオブジェクトによりA2セルにアクセスできません。 Rwos(2).Cells(1, 1) のようにCellsによって、初めてA2セルにア
はじめに 改めて言うまでもないことですが、文字列処理で正規表現が使えると非常に便利です。VBAで正規表現を利用する方法を紹介したいと思います。 対象読者 VBAで正規表現を使用したい方 VBAで煩雑な文字列処理の行う必要のある方 なお、「正規表現についてよくわからない」という方は、以下のページの解説などを参考にしてください。 サルにもわかる正規表現入門 必要な環境 Windows VistaまたはWindows XP VBA開発環境 正規表現を使う前に VBAで文字列比較を行う場合、標準の機能としてStrComp関数やLike演算子があります。 特にLike演算子は、ワイルドカードなどによるパターンマッチングが行えます。正規表現よりも柔軟性は劣りますが、実現したい機能がLike演算子で済むのならば、無理に正規表現は使わずLike演算子を使った方がよいと思います。詳しくは、ヘルプにあるLik
操作の対象セル範囲が不定の場合 ここまでの解説では、操作の対象を「セルA1に」とか「セル範囲A1:C3に」などと簡単に決めてきました。もちろん解説なのですから、それは勘弁していただきたいのですけど、実際のマクロ作成では操作の対象を特定することに苦労するものです。操作の対象セルを、どう的確に特定するかが、VBAのビギナーとベテランで差が出るところでもあります。たとえば、次のようなデータを考えてみましょう。 このデータをマクロでクリアします。ただし、データが何行何列あるかは、そのときによって異なります。セルをクリアするにはRangeオブジェクトのClearContentsメソッドを使います。次のコードはセル範囲A1:D5をクリアします。 Sub Sample1() Range("A1:D5").ClearContents End Sub クリアすべきセル範囲の左上はセルA1です。したがって、セ
クレジットカード現金化の高還元率の優良店を選ぶためには クレジットカード現金化の優良店を選ぶポイントは、換金率やスピードもありますが、そのほかにも見ておきたいポイントもあります。 お金に厳しい人が利用しますので、手数料やキャンペーンの有無、価格交渉ができる業者ということは見ておきたいところです。 それぞれどのような内容なのでしょうか。 手数料が無料であるクレジットカード現金化の業者には、手数料をすべて無料でしてくれるところがあります。 業者によっては、単純に手数料という名目で業者側の利益がとられていたり、振込手数料、事務手数料という名目で少額ながらお金がかかることがあります。 せっかく高い換金率が記載されていても、手数料の分が差し引かれることで、損をしたような気持ちになったり後から気づくこともあります。 これらの手数料は最初から公式ホームページに記載がある場合は了承したうえで申し込みもでき
ワークシートの最終セル（最終行、最終列）を取得する… VBAをはじめた人は誰しも最初に引っかかる問題ではありますが、幸いにもインターネットで検索するといくつもの解決法が見つかります。 ところが…動いたり動かなかったり、想定外の動作をすることがあります。そもそもいくつもの解決法があること自体おかしい、いったい本当の答えはどれ？この際、白黒はっきりさせようじゃないかというのがこのページの趣旨です。 <S1> ワークシートの最大行、最大列を取得する MaxRow = Rows.Count MaxCol = Columns.Count まず基本からですが、ワークシートの最大行、最大列を取得するコードです。もちろんこれ自体は最終行、最終列を取得するものではありません。 Rowsはワークシートの行全体をあらわすオブジェクトで、Columnsは列全体をあらわすオブジェクトです。そのメソッドCountは数
■ Microsoft Excel 2000/2003（FileSystemObjectが使えるWindows）。うまく動作しないときはWSHをバージョンアップしてみてください。 プログラミングをしていると，「プログラム・ファイルの構成一覧をExcelで用意してくれ」と言われることがよくあります。手作業だと面倒なんですよね，こういう作業。で，ExcelのVBA（Visual Basic for Applications）を使う方法を紹介しちゃいます。マクロだったら記入漏れやミスタイプもありません。 今回作成するファイル一覧生成マクロは，Excel/VBAを使って，指定されたフォルダ（ディレクトリ）にあるファイルの名前とファイル種別，最終更新日，コメント用の空欄を自動で生成します（図1[拡大表示]）。大量のHTMLファイルや画像ファイルを扱う，PHP，PerlなどのWebプログラマの方なら，
FileSystemObjectオブジェクトは、ドライブ・フォルダ・ファイルなどを操作できるオブジェクトです。FileSystemObjectオブジェクトは、Scrrun.dllファイル内のスクリプティングタイプライブラリとして提供されます。 VBAからFileSystemObjectオブジェクトを利用するには、CreateObjectメソッドを実行してFileSystemObjectオブジェクトのインスタンスを作成し、そのインスタンスに対してプロパティの設定やメソッドを実行します。ここでは、FileSystemObjectオブジェクトのプロパティやメソッドのリファレンスと、使い方のサンプルを解説します。 なお、本文の内容はExcel VBAでの操作を前提に書きますが、AccessなどのVBAや、VisualBasic(VB)からも同じ考え方でFileSystemObjectオブジェクトを
任意のフォルダに存在するすべてのファイル名を取得するには、Dir関数にワイルドカードを指定します。次のコードは、C:\Sampleフォルダに存在するすべての「*.xlsx」をアクティブシートに書き出します。 Sub Sample1() Dim buf As String, cnt As Long Const Path As String = "C:\Sample\" buf = Dir(Path & "*.xlsx") Do While buf <> "" cnt = cnt + 1 Cells(cnt, 1) = buf buf = Dir() Loop End Sub Dir関数にワイルドカードを指定して実行すると、まずそのワイルドカードに一致するファイル名が返ります。次に、Dir関数の引数を省略して実行すると、前回に指定されたワイルドカードが指定されたものとしてファイルを探します。そ
Replace("対象文字列","置換前の文字(列)","置換後の文字(列)",検索開始位置(省略可),置換回数(省略可),比較モード(省略可)) strSamp = "123456789" strSamp = Replace(strSamp, "123", "000") '000456789を返す strSamp = "111122223333111122223333" strSamp = Replace(strSamp, "1111", "0000", 5) '22223333000022223333を返す strSamp = "111122223333111122223333" strSamp = Replace(strSamp, "1111", "0000", 1, 1) '000022223333111122223333を返す strSamp = "111122223333111
「AiperDiffex」は、以下のフォーマットのデータを比較することができます。 ・「Microsoft Excel」で作成されたファイル ・「Microsoft Word」で作成されたファイル ・クリップボードにコピーしたデータ（表形式 or テキスト形式） ・プリンタ「Microsoft XPS Document Writer」に出力したファイル（XPSファイル） また、比較した結果を色違いで画面に表示する為、相違点が一目で分かります。 ＜AiperDiffexの主な機能＞ １．Excelファイルの比較 ・Excelファイルをシート単位で比較 ・比較する方向を指定して比較 ・タイトルが一致するデータを比較 ・キーとなる項目が一致するレコードを比較 ・比較結果を色違いで画面に表示 ・比較結果の差分を実際のExcelファイルに反映 ・比較結果の画面から、選択したセル（Excelファイル）
Visual Basic 中学校 > 初級講座 > 第２７回 配列 配列は昔からある技術です。新鮮さがないためにまったく注目されませんが、昔から今まで生き延びているということ自体がその重要性を証明しています。今回は地味な説明になりますがじっくりと読んで配列の概要を把握することは有意義です。次回取りあげるコレクションの理解にもつながります。 この回の要約 ・配列を使うと似たような変数をまとめることができる。 ・配列は Dim MyArray(3) As String のように宣言する。 ・配列は添字を変数にしてループをまわせる。 ・配列をコピーするにはCloneメソッドを使う。 ・動的配列を作成すると、Redim Preserveを使うことにより後からサイズを変更できる。 １．はじめに 配列に関する説明をする前に少し今回の方針を書いておきます。 私は普段初級講座を書くに当たっては「VBに
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く